| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
126 |
GAD_SOM_ADV_R |
fn_o(1,1,kDw) = fn_o(1,1,kDw) |
|
./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 |
198 |
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 |
209 |
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 |
225 |
GAD_SOM_ADV_R |
fn_o (i,j,kUp) = aln(i,j,kUp)* |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
242 |
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 |
264 |
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 |
271 |
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 |
289 |
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 |
321 |
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 |
342 |
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 |
85 |
GAD_SOM_ADV_R |
_RL fn_o (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
102 |
GAD_SOM_ADV_X |
_RL fn_o (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
204 |
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 |
217 |
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 |
239 |
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 |
271 |
GAD_SOM_ADV_X |
locTn = alfn*sm_o(i,j) - aln1*fn_o(i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
291 |
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 |
102 |
GAD_SOM_ADV_Y |
_RL fn_o (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
205 |
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 |
218 |
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 |
240 |
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 |
272 |
GAD_SOM_ADV_Y |
locTn = alfn*sm_o(i,j) - aln1*fn_o(i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
292 |
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 |
110 |
GAD_SOM_ADVECT |
_RL fn_o (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./pkg/generic_advdiff/gad_som_advect.F |
486 |
GAD_SOM_ADVECT |
fn_o (i,j,kDown) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_som_advect.F |
570 |
GAD_SOM_ADVECT |
U alp, aln, fp_v, fn_v, fp_o, fn_o, |