File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_som_adv_r.F |
15 |
GAD_SOM_ADV_R |
U alp, aln, fp_v, fn_v, fp_o, fn_o, |
./pkg/generic_advdiff/gad_som_adv_r.F |
168 |
GAD_SOM_ADV_R |
fn_o (i,j,kUp) = aln(i,j,kUp)*sm_o(i,j,km1) |
./pkg/generic_advdiff/gad_som_adv_r.F |
179 |
GAD_SOM_ADV_R |
wT(i,j) = ( fp_o(i,j,kUp) - fn_o(i,j,kUp) )*recip_dT |
./pkg/generic_advdiff/gad_som_adv_r.F |
195 |
GAD_SOM_ADV_R |
fn_o (i,j,kUp) = aln(i,j,kUp)* |
./pkg/generic_advdiff/gad_som_adv_r.F |
212 |
GAD_SOM_ADV_R |
wT(i,j) = ( fp_o(i,j,kUp) - fn_o(i,j,kUp) )*recip_dT |
./pkg/generic_advdiff/gad_som_adv_r.F |
234 |
GAD_SOM_ADV_R |
fn_o (i,j,kUp) = aln(i,j,kUp)*sm_o(i,j,km1) |
./pkg/generic_advdiff/gad_som_adv_r.F |
241 |
GAD_SOM_ADV_R |
wT(i,j) = ( fp_o(i,j,kUp) - fn_o(i,j,kUp) )*recip_dT |
./pkg/generic_advdiff/gad_som_adv_r.F |
256 |
GAD_SOM_ADV_R |
sm_o (i,j,k) = sm_o (i,j,k) - fn_o (i,j,kDw) - fp_o (i,j,kUp) |
./pkg/generic_advdiff/gad_som_adv_r.F |
282 |
GAD_SOM_ADV_R |
locTn = alfn*sm_o(i,j,k) - aln1*fn_o(i,j,kUp) |
./pkg/generic_advdiff/gad_som_adv_r.F |
303 |
GAD_SOM_ADV_R |
sm_o (i,j,k) = sm_o (i,j,k) + fp_o (i,j,kDw) + fn_o (i,j,kUp) |
./pkg/generic_advdiff/gad_som_adv_r.F |
84 |
GAD_SOM_ADV_R |
_RL fn_o (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
./pkg/generic_advdiff/gad_som_adv_x.F |
100 |
GAD_SOM_ADV_X |
_RL fn_o (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_som_adv_x.F |
210 |
GAD_SOM_ADV_X |
fn_o (i,j) = aln(i,j)*( sm_o( i ,j) - aln1*sm_x( i ,j) |
./pkg/generic_advdiff/gad_som_adv_x.F |
223 |
GAD_SOM_ADV_X |
uT(i,j) = ( fp_o(i,j) - fn_o(i,j) )*recip_dT |
./pkg/generic_advdiff/gad_som_adv_x.F |
250 |
GAD_SOM_ADV_X |
sm_o (i,j) = sm_o (i,j) - fn_o (i,j) - fp_o (i+1,j) |
./pkg/generic_advdiff/gad_som_adv_x.F |
276 |
GAD_SOM_ADV_X |
locTn = alfn*sm_o(i,j) - aln1*fn_o(i+1,j) |
./pkg/generic_advdiff/gad_som_adv_x.F |
296 |
GAD_SOM_ADV_X |
sm_o (i,j) = sm_o (i,j) + fp_o (i,j) + fn_o (i+1,j) |
./pkg/generic_advdiff/gad_som_adv_y.F |
100 |
GAD_SOM_ADV_Y |
_RL fn_o (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
./pkg/generic_advdiff/gad_som_adv_y.F |
211 |
GAD_SOM_ADV_Y |
fn_o (i,j) = aln(i,j)*( sm_o(i, j ) - aln1*sm_y(i, j ) |
./pkg/generic_advdiff/gad_som_adv_y.F |
224 |
GAD_SOM_ADV_Y |
vT(i,j) = ( fp_o(i,j) - fn_o(i,j) )*recip_dT |
./pkg/generic_advdiff/gad_som_adv_y.F |
251 |
GAD_SOM_ADV_Y |
sm_o (i,j) = sm_o (i,j) - fn_o (i,j) - fp_o (i,j+1) |
./pkg/generic_advdiff/gad_som_adv_y.F |
277 |
GAD_SOM_ADV_Y |
locTn = alfn*sm_o(i,j) - aln1*fn_o(i,j+1) |
./pkg/generic_advdiff/gad_som_adv_y.F |
297 |
GAD_SOM_ADV_Y |
sm_o (i,j) = sm_o (i,j) + fp_o (i,j) + fn_o (i,j+1) |
./pkg/generic_advdiff/gad_som_advect.F |
117 |
GAD_SOM_ADVECT |
_RL fn_o (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
./pkg/generic_advdiff/gad_som_advect.F |
513 |
GAD_SOM_ADVECT |
fn_o (i,j,kDown) = 0. _d 0 |
./pkg/generic_advdiff/gad_som_advect.F |
607 |
GAD_SOM_ADVECT |
U alp, aln, fp_v, fn_v, fp_o, fn_o, |