File |
Line number |
Procedure |
Code |
./pkg/streamice/streamice_adv_flux_fl_x.F |
124 |
STREAMICE_ADV_FLUX_FL_X |
psi = d0+d1*Cr |
./pkg/streamice/streamice_adv_flux_fl_x.F |
125 |
STREAMICE_ADV_FLUX_FL_X |
phi = MAX(0. _d 0,MIN(MIN(1. _d 0,psi), |
./pkg/streamice/streamice_adv_flux_fl_x.F |
177 |
STREAMICE_ADV_FLUX_FL_X |
psi = d0+d1*Cr |
./pkg/streamice/streamice_adv_flux_fl_x.F |
178 |
STREAMICE_ADV_FLUX_FL_X |
phi = MAX(0. _d 0,MIN(MIN(1. _d 0,psi), |
./pkg/streamice/streamice_adv_flux_fl_x.F |
43 |
STREAMICE_ADV_FLUX_FL_X |
_RL uface, phi, cfl, Cr, rdenom, d0, d1, psi |
./pkg/streamice/streamice_adv_flux_fl_y.F |
127 |
STREAMICE_ADV_FLUX_FL_Y |
psi = d0+d1*Cr |
./pkg/streamice/streamice_adv_flux_fl_y.F |
128 |
STREAMICE_ADV_FLUX_FL_Y |
phi = MAX(0. _d 0,MIN(MIN(1. _d 0,psi), |
./pkg/streamice/streamice_adv_flux_fl_y.F |
179 |
STREAMICE_ADV_FLUX_FL_Y |
psi = d0+d1*Cr |
./pkg/streamice/streamice_adv_flux_fl_y.F |
180 |
STREAMICE_ADV_FLUX_FL_Y |
phi = MAX(0. _d 0,MIN(MIN(1. _d 0,psi), |
./pkg/streamice/streamice_adv_flux_fl_y.F |
43 |
STREAMICE_ADV_FLUX_FL_Y |
_RL vface, phi, cfl, Cr, rdenom, d0, d1, psi |
./verification/advect_cs/code/ini_vel.F |
38 |
INI_VEL |
_RL psi,omegaprime,fac |
./verification/advect_cs/code/ini_vel.F |
41 |
INI_VEL |
psi(i,j,bi,bj)=fac*fCoriG(i,j,bi,bj) |
./verification/advect_cs/code/ini_vel.F |
60 |
INI_VEL |
& +(psi(i,j,bi,bj)-psi(i,jp1,bi,bj))*recip_dyG(i,j,bi,bj) |
./verification/advect_cs/code/ini_vel.F |
62 |
INI_VEL |
& +(psi(ip1,j,bi,bj)-psi(i,j,bi,bj))*recip_dxG(i,j,bi,bj) |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
36 |
INI_VEL |
_RL psi,omegaprime,fac |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
38 |
INI_VEL |
psi(i,j,bi,bj)=fac*fCoriG(i,j,bi,bj) |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
57 |
INI_VEL |
& +(psi(i,j,bi,bj)-psi(i,jp1,bi,bj))*recip_dyg(i,j,bi,bj) |
./verification/solid-body.cs-32x32x1/code/ini_vel.F |
59 |
INI_VEL |
& +(psi(ip1,j,bi,bj)-psi(i,j,bi,bj))*recip_dxg(i,j,bi,bj) |