| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
38 |
GAD_OS7MP_ADV_X |
_RL uLoc,Fac,DelIp,DelI,Phi,Eps,rp1h,rp1h_cfl |
|
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
65 |
GAD_OS7MP_ADV_X |
uLoc = uFld(i,j) |
|
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
66 |
GAD_OS7MP_ADV_X |
cfl = uLoc |
|
./pkg/generic_advdiff/gad_os7mp_adv_x.F |
67 |
GAD_OS7MP_ADV_X |
IF ( calcCFL ) cfl = abs(uLoc*deltaTloc*recip_dxC(i,j,bi,bj)) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
177 |
GAD_SOM_ADV_X |
uLoc = uTrans(i,j)*deltaTloc |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
179 |
GAD_SOM_ADV_X |
fp_v (i,j) = MAX( zeroRL, uLoc ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
198 |
GAD_SOM_ADV_X |
fn_v (i,j) = MAX( zeroRL, -uLoc ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
94 |
GAD_SOM_ADV_X |
_RL uLoc, alf1, alf1q, alpmn |
|
./pkg/shelfice/shelfice_thermodynamics.F |
271 |
SHELFICE_THERMODYNAMICS |
uLoc(I,J) = 0. |
|
./pkg/shelfice/shelfice_thermodynamics.F |
294 |
SHELFICE_THERMODYNAMICS |
uLoc(I,J) = recip_hFacC(I,J,K,bi,bj) * halfRL * |
|
./pkg/shelfice/shelfice_thermodynamics.F |
300 |
SHELFICE_THERMODYNAMICS |
velSq(I,J) = uLoc(I,J)*uLoc(I,J)+vLoc(I,J)*vLoc(I,J) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
324 |
SHELFICE_THERMODYNAMICS |
uLoc(I,J) = ( uLoc(I,J) * drF(K)*_hFacC(I,J,K,bi,bj) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
334 |
SHELFICE_THERMODYNAMICS |
velSq(I,J) = uLoc(I,J)*uLoc(I,J)+vLoc(I,J)*vLoc(I,J) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
90 |
SHELFICE_THERMODYNAMICS |
_RL uLoc(1:sNx,1:sNy) |
|
./pkg/thsice/thsice_get_velocity.F |
15 |
THSICE_GET_VELOCITY |
O uLoc, vLoc, |
|
./pkg/thsice/thsice_get_velocity.F |
47 |
THSICE_GET_VELOCITY |
_RL uLoc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_get_velocity.F |
68 |
THSICE_GET_VELOCITY |
uLoc(i,j) = UICE(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_velocity.F |
79 |
THSICE_GET_VELOCITY |
uLoc(i,j) = 0. |