| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
38 |
GAD_OS7MP_ADV_Y |
_RL vLoc,Fac,DelIp,DelI,Phi,Eps,rp1h,rp1h_cfl |
|
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
65 |
GAD_OS7MP_ADV_Y |
vLoc = vFld(i,j) |
|
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
66 |
GAD_OS7MP_ADV_Y |
cfl = vLoc |
|
./pkg/generic_advdiff/gad_os7mp_adv_y.F |
67 |
GAD_OS7MP_ADV_Y |
IF ( calcCFL ) cfl = abs(vLoc*deltaTloc*recip_dyC(i,j,bi,bj)) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
177 |
GAD_SOM_ADV_Y |
vLoc = vTrans(i,j)*deltaTloc |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
179 |
GAD_SOM_ADV_Y |
fp_v (i,j) = MAX( zeroRL, vLoc ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
199 |
GAD_SOM_ADV_Y |
fn_v (i,j) = MAX( zeroRL, -vLoc ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
94 |
GAD_SOM_ADV_Y |
_RL vLoc, alf1, alf1q, alpmn |
|
./pkg/shelfice/shelfice_thermodynamics.F |
245 |
SHELFICE_THERMODYNAMICS |
vLoc(I,J) = recip_hFacC(I,J,K,bi,bj) * |
|
./pkg/shelfice/shelfice_thermodynamics.F |
274 |
SHELFICE_THERMODYNAMICS |
vLoc(I,J) = ( vLoc(I,J) * drF(K)*_hFacC(I,J,K,bi,bj) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
303 |
SHELFICE_THERMODYNAMICS |
& 0.25 _d 0 *(uLoc(I,J)*uLoc(I,J)+vLoc(I,J)*vLoc(I,J)) ) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
83 |
SHELFICE_THERMODYNAMICS |
_RL vLoc(1:sNx,1:sNy) |
|
./pkg/thsice/thsice_get_velocity.F |
15 |
THSICE_GET_VELOCITY |
O uLoc, vLoc, |
|
./pkg/thsice/thsice_get_velocity.F |
48 |
THSICE_GET_VELOCITY |
_RL vLoc(1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/thsice/thsice_get_velocity.F |
69 |
THSICE_GET_VELOCITY |
vLoc(i,j) = VICE(i,j,bi,bj) |
|
./pkg/thsice/thsice_get_velocity.F |
80 |
THSICE_GET_VELOCITY |
vLoc(i,j) = 0. |