| File |
Line number |
Procedure |
Code |
|
./pkg/flt/flt_init_varia.F |
113 |
FLT_INIT_VARIA |
kz = FLT_MAP_R2K( tmp(5), bi, bj, myThid ) |
|
./pkg/flt/flt_init_varia.F |
117 |
FLT_INIT_VARIA |
kz = tmp(5) |
|
./pkg/flt/flt_init_varia.F |
132 |
FLT_INIT_VARIA |
kpart( npart_tile(bi,bj),bi,bj) = kz |
|
./pkg/flt/flt_init_varia.F |
47 |
FLT_INIT_VARIA |
_RL ix, jy, kz |
|
./pkg/flt/flt_interp_linear.F |
107 |
FLT_TRILINEAR |
I ix, jy, kz, |
|
./pkg/flt/flt_interp_linear.F |
132 |
FLT_TRILINEAR |
_RL ix, jy, kz |
|
./pkg/flt/flt_interp_linear.F |
168 |
FLT_TRILINEAR |
k1 = INT(kz) |
|
./pkg/flt/flt_interp_linear.F |
169 |
FLT_TRILINEAR |
ddz = kz - DFLOAT(k1) |
|
./pkg/flt/flt_interp_linear.F |
171 |
FLT_TRILINEAR |
k1 = NINT(kz) |
|
./pkg/flt/flt_interp_linear.F |
172 |
FLT_TRILINEAR |
ddz = 0.5 _d 0 + kz - DFLOAT(k1) |
|
./pkg/flt/flt_runga2.F |
106 |
FLT_RUNGA2 |
kz=kpart(ip,bi,bj) |
|
./pkg/flt/flt_runga2.F |
107 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(ix,jy,kz,uu,uVel,1,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
108 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(ix,jy,kz,vv,vVel,2,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
109 |
FLT_RUNGA2 |
CALL FLT_TRILINEAR(ix,jy,kz,ww,wVel,4,bi,bj,myThid) |
|
./pkg/flt/flt_runga2.F |
143 |
FLT_RUNGA2 |
ktz=kz+0.5*flt_deltaT*ww*scalez |
|
./pkg/flt/flt_runga2.F |
46 |
FLT_RUNGA2 |
_RL ww, w1, ktz, kz, scalez |