26 |
& useSeaiceSponge |
& useSeaiceSponge |
27 |
LOGICAL useSeaiceSponge |
LOGICAL useSeaiceSponge |
28 |
|
|
29 |
C A/Hrelaxobcsinner/bound :: relaxation time scale (in seconds) on the boundary |
C [A,H,SL,SN]relaxobcs[inner,bound] :: relaxation time scale (in seconds) on the |
30 |
C (bound) and at the innermost grid point of the sponge |
C boundary (bound) and at the innermost grid point of the |
31 |
C layer (inner); relaxation time scales in-between |
C sponge layer (inner); relaxation time scales in-between |
32 |
C are linearly interpolated from these values |
C are linearly interpolated from these values |
33 |
COMMON /OBC_SEAICE_PARM_R/ |
COMMON /OBC_SEAICE_PARM_R/ |
34 |
& Arelaxobcsinner, Arelaxobcsbound, |
& Arelaxobcsinner, Arelaxobcsbound, |
35 |
& Hrelaxobcsinner, Hrelaxobcsbound |
& Hrelaxobcsinner, Hrelaxobcsbound, |
36 |
_RS Arelaxobcsinner, Arelaxobcsbound |
& SLrelaxobcsinner, SLrelaxobcsbound, |
37 |
_RS Hrelaxobcsinner, Hrelaxobcsbound |
& SNrelaxobcsinner, SNrelaxobcsbound |
38 |
|
_RS Arelaxobcsinner, Arelaxobcsbound |
39 |
|
_RS Hrelaxobcsinner, Hrelaxobcsbound |
40 |
|
_RS SLrelaxobcsinner, SLrelaxobcsbound |
41 |
|
_RS SNrelaxobcsinner, SNrelaxobcsbound |
42 |
|
|
43 |
C OB[N,S,E,W][u,v,t,s,a,h,sn,sl,uice,vice]File :: Files with boundary conditions, |
C OB[N,S,E,W][u,v,t,s,a,h,sn,sl,uice,vice]File :: Files with boundary conditions, |
44 |
C the letter combinations mean: |
C the letter combinations mean: |