| File |
Line number |
Procedure |
Code |
|
./pkg/flt/flt_exch2.F |
112 |
FLT_EXCH2 |
iNew = ipart(ip,bi,bj) - DFLOAT(sNx) |
|
./pkg/flt/flt_exch2.F |
145 |
FLT_EXCH2 |
iNew = ipart(ip,bi,bj) + DFLOAT(sNx) |
|
./pkg/flt/flt_exch2.F |
215 |
FLT_EXCH2 |
jhi = 0.5 _d 0 + DFLOAT(sNy) |
|
./pkg/flt/flt_exch2.F |
237 |
FLT_EXCH2 |
jNew = jpart(ip,bi,bj) - DFLOAT(sNy) |
|
./pkg/flt/flt_exch2.F |
275 |
FLT_EXCH2 |
jNew = jpart(ip,bi,bj) + DFLOAT(sNy) |
|
./pkg/flt/flt_exch2.F |
92 |
FLT_EXCH2 |
ihi = 0.5 _d 0 + DFLOAT(sNx) |
|
./pkg/flt/flt_exchg.F |
112 |
FLT_EXCHG |
iNew = ipart(ip,bi,bj) - DFLOAT(sNx) |
|
./pkg/flt/flt_exchg.F |
145 |
FLT_EXCHG |
iNew = ipart(ip,bi,bj) + DFLOAT(sNx) |
|
./pkg/flt/flt_exchg.F |
323 |
FLT_EXCHG |
jhi = 0.5 _d 0 + DFLOAT(sNy) |
|
./pkg/flt/flt_exchg.F |
345 |
FLT_EXCHG |
jNew = jpart(ip,bi,bj) - DFLOAT(sNy) |
|
./pkg/flt/flt_exchg.F |
383 |
FLT_EXCHG |
jNew = jpart(ip,bi,bj) + DFLOAT(sNy) |
|
./pkg/flt/flt_exchg.F |
90 |
FLT_EXCHG |
ihi = 0.5 _d 0 + DFLOAT(sNx) |
|
./pkg/flt/flt_init_varia.F |
73 |
FLT_INIT_VARIA |
iHi = 0.5 _d 0 + DFLOAT(sNx) |
|
./pkg/flt/flt_init_varia.F |
75 |
FLT_INIT_VARIA |
jHi = 0.5 _d 0 + DFLOAT(sNy) |
|
./pkg/flt/flt_interp_linear.F |
153 |
FLT_TRILINEAR |
ddx = ix - DFLOAT(i1) |
|
./pkg/flt/flt_interp_linear.F |
156 |
FLT_TRILINEAR |
ddx = 0.5 _d 0 + ix - DFLOAT(i1) |
|
./pkg/flt/flt_interp_linear.F |
161 |
FLT_TRILINEAR |
ddy = jy - DFLOAT(j1) |
|
./pkg/flt/flt_interp_linear.F |
164 |
FLT_TRILINEAR |
ddy = 0.5 _d 0 + jy - DFLOAT(j1) |
|
./pkg/flt/flt_interp_linear.F |
169 |
FLT_TRILINEAR |
ddz = kz - DFLOAT(k1) |
|
./pkg/flt/flt_interp_linear.F |
172 |
FLT_TRILINEAR |
ddz = 0.5 _d 0 + kz - DFLOAT(k1) |
|
./pkg/flt/flt_interp_linear.F |
245 |
FLT_BILINEAR2D |
ddx = ix - DFLOAT(i1) |
|
./pkg/flt/flt_interp_linear.F |
248 |
FLT_BILINEAR2D |
ddx = 0.5 _d 0 + ix - DFLOAT(i1) |
|
./pkg/flt/flt_interp_linear.F |
253 |
FLT_BILINEAR2D |
ddy = jy - DFLOAT(j1) |
|
./pkg/flt/flt_interp_linear.F |
256 |
FLT_BILINEAR2D |
ddy = 0.5 _d 0 + jy - DFLOAT(j1) |
|
./pkg/flt/flt_interp_linear.F |
62 |
FLT_BILINEAR |
ddx = ix - DFLOAT(i1) |
|
./pkg/flt/flt_interp_linear.F |
65 |
FLT_BILINEAR |
ddx = 0.5 _d 0 + ix - DFLOAT(i1) |
|
./pkg/flt/flt_interp_linear.F |
70 |
FLT_BILINEAR |
ddy = jy - DFLOAT(j1) |
|
./pkg/flt/flt_interp_linear.F |
73 |
FLT_BILINEAR |
ddy = 0.5 _d 0 + jy - DFLOAT(j1) |
|
./pkg/flt/flt_mapping.F |
133 |
FLT_MAP_IJLOCAL2XY |
ddx = 0.5 _d 0 + ix - DFLOAT(i) |
|
./pkg/flt/flt_mapping.F |
134 |
FLT_MAP_IJLOCAL2XY |
ddy = 0.5 _d 0 + jy - DFLOAT(j) |
|
./pkg/flt/flt_mapping.F |
143 |
FLT_MAP_IJLOCAL2XY |
ddx = 0.5 _d 0 + ix - DFLOAT(i) |
|
./pkg/flt/flt_mapping.F |
144 |
FLT_MAP_IJLOCAL2XY |
ddy = 0.5 _d 0 + jy - DFLOAT(j) |
|
./pkg/flt/flt_mapping.F |
218 |
FLT_MAP_IJLOCAL2XY |
FLT_MAP_R2K = DFLOAT(k)+fm-0.5 _d 0 |
|
./pkg/flt/flt_mapping.F |
265 |
FLT_MAP_IJLOCAL2XY |
ddz = 0.5 _d 0 + kr - DFLOAT(k) |
|
./pkg/flt/flt_mapping.F |
63 |
FLT_MAP_XY2IJLOCAL |
ix = DFLOAT(i)+fm-0.5 _d 0 |
|
./pkg/flt/flt_mapping.F |
74 |
FLT_MAP_XY2IJLOCAL |
jy = DFLOAT(j)+fm-0.5 _d 0 |
|
./pkg/flt/flt_runga2.F |
75 |
FLT_RUNGA2 |
kzhi = 0.5 _d 0 + DFLOAT(Nr) |
|
./pkg/flt/flt_runga4.F |
75 |
FLT_RUNGA4 |
kzhi = 0.5 _d 0 + DFLOAT(Nr) |
|
./pkg/flt/flt_traj.F |
100 |
FLT_TRAJ |
j0y = DFLOAT( myYGlobalLo-1 + (bj-1)*sNy ) |
|
./pkg/flt/flt_traj.F |
96 |
FLT_TRAJ |
i0x = DFLOAT( exch2_txGlobalo(nT) - 1 ) |
|
./pkg/flt/flt_traj.F |
97 |
FLT_TRAJ |
j0y = DFLOAT( exch2_tyGlobalo(nT) - 1 ) |
|
./pkg/flt/flt_traj.F |
99 |
FLT_TRAJ |
i0x = DFLOAT( myXGlobalLo-1 + (bi-1)*sNx ) |
|
./pkg/flt/flt_up.F |
88 |
FLT_UP |
i0x = DFLOAT( myXGlobalLo-1 + (bi-1)*sNx ) |
|
./pkg/flt/flt_up.F |
89 |
FLT_UP |
j0y = DFLOAT( myYGlobalLo-1 + (bj-1)*sNy ) |
|
./pkg/longstep/longstep_check_iters.F |
61 |
LONGSTEP_CHECK_ITERS |
endTime = baseTime + deltaTClock*DFLOAT(nEndIter) |
|
./model/src/find_hyd_press_1d.F |
125 |
FIND_HYD_PRESS_1D |
diffRMS = diffRMS/DFLOAT(Nr) |
|
./pkg/thsice/thsice_salt_plume.F |
106 |
THSICE_SALT_PLUME |
cplTimeFraction = 1. _d 0 / DFLOAT(cplSendFrq_iter) |
|
./model/src/ini_parms.F |
1001 |
INI_PARMS |
IF ( startTime .NE. baseTime+deltaTClock*DFLOAT(nIter0) ) THEN |
|
./model/src/ini_parms.F |
971 |
INI_PARMS |
startTime = baseTime + deltaTClock*DFLOAT(nIter0) |
|
./model/src/ini_parms.F |
977 |
INI_PARMS |
baseTime = startTime - deltaTClock*DFLOAT(nIter0) |
|
./model/src/ini_parms.F |
995 |
INI_PARMS |
& endTime = startTime + deltaTClock*DFLOAT(nTimeSteps) |
|
./model/src/ini_parms.F |
998 |
INI_PARMS |
& endTime = baseTime + deltaTClock*DFLOAT(nEndIter) |
|
./model/src/set_parms.F |
269 |
SET_PARMS |
tmpVar = startTime + deltaTClock*DFLOAT(nTimeSteps) |
|
./pkg/atm_compon_interf/atm_store_aim_fields.F |
64 |
ATM_STORE_AIM_FIELDS |
cplTimeFraction = 1. _d 0 / DFLOAT(cplSendFrq_iter) |
|
./pkg/atm_compon_interf/atm_store_aim_wndstr.F |
72 |
ATM_STORE_AIM_WNDSTR |
cplTimeFraction = 1. _d 0 / DFLOAT(cplSendFrq_iter) |
|
./pkg/atm_compon_interf/atm_store_land.F |
62 |
ATM_STORE_LAND |
cplTimeFraction = 1. _d 0 / DFLOAT(cplSendFrq_iter) |
|
./pkg/atm_compon_interf/atm_store_land.F |
73 |
ATM_STORE_LAND |
cplTimeFraction = 1. _d 0 / DFLOAT(cplSendFrq_iter) |
|
./pkg/atm_compon_interf/atm_store_surfflux.F |
53 |
ATM_STORE_SURFFLUX |
cplTimeFraction = 1. _d 0 / DFLOAT(cplSendFrq_iter) |