File |
Line number |
Procedure |
Code |
./pkg/cheapaml/cheapaml_init_fixed.F |
149 |
CHEAPAML_INIT_FIXED |
xgs(i,j,bi,bj)=1. _d 0/relaxMask(i,j,bi,bj)/8.64 _d 4 |
./pkg/cheapaml/cheapaml_init_fixed.F |
151 |
CHEAPAML_INIT_FIXED |
xgs(i,j,bi,bj)=0. _d 0 |
./pkg/cheapaml/cheapaml_init_fixed.F |
153 |
CHEAPAML_INIT_FIXED |
xrelf(i,j,bi,bj)= xgs(i,j,bi,bj)*deltaT |
./pkg/cheapaml/cheapaml_init_fixed.F |
154 |
CHEAPAML_INIT_FIXED |
& /(1. _d 0+xgs(i,j,bi,bj)*deltaT) |
./pkg/cheapaml/cheapaml_init_fixed.F |
227 |
CHEAPAML_INIT_FIXED |
xgs(i,j,bi,bj) = 0. _d 0 |
./pkg/cheapaml/cheapaml_init_fixed.F |
234 |
CHEAPAML_INIT_FIXED |
xgs(i,j,bi,bj) = relaxMask(i,j,bi,bj)*tmpVar |
./pkg/cheapaml/cheapaml_init_fixed.F |
243 |
CHEAPAML_INIT_FIXED |
xgs(i,j,bi,bj) = MAX( xgs(i,j,bi,bj), tmpVar ) |
./pkg/cheapaml/cheapaml_init_fixed.F |
250 |
CHEAPAML_INIT_FIXED |
tmpVar = xgs(i,j,bi,bj)*deltaT |
./pkg/cheapaml/cheapaml_init_fixed.F |
262 |
CHEAPAML_INIT_FIXED |
CALL WRITE_FLD_XY_RL('Cheap_xgs', ' ', xgs, 0, myThid ) |
./pkg/cheapaml/cheapaml_init_fixed.F |
48 |
CHEAPAML_INIT_FIXED |
_RL xgs (1-OLx:sNx+OLx,1-OLy:sNy+OLy,nSx,nSy) |
./pkg/cheapaml/cheapaml_init_fixed.F |
66 |
CHEAPAML_INIT_FIXED |
xgs (i,j,bi,bj) = 0. _d 0 |