| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
116 |
GAD_SOM_ADV_R |
_RL alfn, alnq, aln1, locTn |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
165 |
GAD_SOM_ADV_R |
aln1 = 1. _d 0 - aln(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
192 |
GAD_SOM_ADV_R |
aln1 = 1. _d 0 - aln(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
196 |
GAD_SOM_ADV_R |
& ( sm_o(i,j,km1) - aln1*sm_z(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
197 |
GAD_SOM_ADV_R |
& + aln1*(aln1-aln(i,j,kUp))*sm_zz(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
200 |
GAD_SOM_ADV_R |
& ( sm_z(i,j,km1) - three*aln1*sm_zz(i,j,km1) ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
203 |
GAD_SOM_ADV_R |
& ( sm_x(i,j,km1) - aln1*sm_xz(i,j,km1) ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
205 |
GAD_SOM_ADV_R |
& ( sm_y(i,j,km1) - aln1*sm_yz(i,j,km1) ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
279 |
GAD_SOM_ADV_R |
aln1 = 1. _d 0 - alfn |
|
./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 |
286 |
GAD_SOM_ADV_R |
& - alfn*aln1*fn_z(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
288 |
GAD_SOM_ADV_R |
& + (aln1-alfn)*locTn |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
293 |
GAD_SOM_ADV_R |
& + aln1*fn_x(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
298 |
GAD_SOM_ADV_R |
& + aln1*fn_y(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
207 |
GAD_SOM_ADV_X |
aln1 = 1. _d 0 - aln(i,j) |
|
./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 |
211 |
GAD_SOM_ADV_X |
& + aln1*(aln1-aln(i,j))*sm_xx( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
213 |
GAD_SOM_ADV_X |
fn_x (i,j) = alnq *( sm_x( i ,j) - three*aln1*sm_xx( i ,j) ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
215 |
GAD_SOM_ADV_X |
fn_y (i,j) = aln(i,j)*( sm_y( i ,j) - aln1*sm_xy( i ,j) ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
216 |
GAD_SOM_ADV_X |
fn_z (i,j) = aln(i,j)*( sm_z( i ,j) - aln1*sm_xz( i ,j) ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
273 |
GAD_SOM_ADV_X |
aln1 = 1. _d 0 - alfn |
|
./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 |
280 |
GAD_SOM_ADV_X |
& - alfn*aln1*fn_x(i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
282 |
GAD_SOM_ADV_X |
& + (aln1-alfn)*locTn |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
287 |
GAD_SOM_ADV_X |
& + aln1*fn_y(i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
292 |
GAD_SOM_ADV_X |
& + aln1*fn_z(i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
94 |
GAD_SOM_ADV_X |
_RL alfn, alnq, aln1, locTn |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
208 |
GAD_SOM_ADV_Y |
aln1 = 1. _d 0 - aln(i,j) |
|
./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 |
212 |
GAD_SOM_ADV_Y |
& + aln1*(aln1-aln(i,j))*sm_yy(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
214 |
GAD_SOM_ADV_Y |
fn_y (i,j) = alnq *( sm_y(i, j ) - three*aln1*sm_yy(i, j ) ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
216 |
GAD_SOM_ADV_Y |
fn_x (i,j) = aln(i,j)*( sm_x(i, j ) - aln1*sm_xy(i, j ) ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
217 |
GAD_SOM_ADV_Y |
fn_z (i,j) = aln(i,j)*( sm_z(i, j ) - aln1*sm_yz(i, j ) ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
274 |
GAD_SOM_ADV_Y |
aln1 = 1. _d 0 - alfn |
|
./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 |
281 |
GAD_SOM_ADV_Y |
& - alfn*aln1*fn_y(i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
283 |
GAD_SOM_ADV_Y |
& + (aln1-alfn)*locTn |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
288 |
GAD_SOM_ADV_Y |
& + aln1*fn_x(i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
293 |
GAD_SOM_ADV_Y |
& + aln1*fn_z(i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
94 |
GAD_SOM_ADV_Y |
_RL alfn, alnq, aln1, locTn |