| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
116 |
GAD_SOM_ADV_R |
_RL alfp, alpq, alp1, locTp |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
314 |
GAD_SOM_ADV_R |
alfp = fp_v(i,j,kDw)/sm_v(i,j,k) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
316 |
GAD_SOM_ADV_R |
alf1 = 1. _d 0 - alfp - alfn |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
317 |
GAD_SOM_ADV_R |
alp1 = 1. _d 0 - alfp |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
319 |
GAD_SOM_ADV_R |
alpmn = alfp - alfn |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
320 |
GAD_SOM_ADV_R |
locTp = alfp*sm_o(i,j,k) - alp1*fp_o(i,j,kDw) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
322 |
GAD_SOM_ADV_R |
sm_zz(i,j,k) = alf1*alf1*sm_zz(i,j,k) + alfp*alfp*fp_zz(i,j,kDw) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
324 |
GAD_SOM_ADV_R |
& - 5. _d 0*(-alpmn*alf1*sm_z(i,j,k) + alfp*alp1*fp_z(i,j,kDw) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
326 |
GAD_SOM_ADV_R |
& + twoRL*alfp*alfn*sm_o(i,j,k) + (alp1-alfp)*locTp |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
329 |
GAD_SOM_ADV_R |
sm_xz(i,j,k) = alf1*sm_xz(i,j,k) + alfp*fp_xz(i,j,kDw) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
334 |
GAD_SOM_ADV_R |
sm_yz(i,j,k) = alf1*sm_yz(i,j,k) + alfp*fp_yz(i,j,kDw) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
339 |
GAD_SOM_ADV_R |
sm_z (i,j,k) = alf1*sm_z(i,j,k) + alfp*fp_z(i,j,kDw) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
264 |
GAD_SOM_ADV_X |
alfp = fp_v( i ,j)/sm_v(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
266 |
GAD_SOM_ADV_X |
alf1 = 1. _d 0 - alfp - alfn |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
267 |
GAD_SOM_ADV_X |
alp1 = 1. _d 0 - alfp |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
269 |
GAD_SOM_ADV_X |
alpmn = alfp - alfn |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
270 |
GAD_SOM_ADV_X |
locTp = alfp*sm_o(i,j) - alp1*fp_o(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
272 |
GAD_SOM_ADV_X |
sm_xx(i,j) = alf1*alf1*sm_xx(i,j) + alfp*alfp*fp_xx(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
274 |
GAD_SOM_ADV_X |
& - 5. _d 0*(-alpmn*alf1*sm_x(i,j) + alfp*alp1*fp_x(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
276 |
GAD_SOM_ADV_X |
& + twoRL*alfp*alfn*sm_o(i,j) + (alp1-alfp)*locTp |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
279 |
GAD_SOM_ADV_X |
sm_xy(i,j) = alf1*sm_xy(i,j) + alfp*fp_xy(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
284 |
GAD_SOM_ADV_X |
sm_xz(i,j) = alf1*sm_xz(i,j) + alfp*fp_xz(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
289 |
GAD_SOM_ADV_X |
sm_x (i,j) = alf1*sm_x(i,j) + alfp*fp_x(i,j) + alfn*fn_x(i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
95 |
GAD_SOM_ADV_X |
_RL alfp, alpq, alp1, locTp |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
265 |
GAD_SOM_ADV_Y |
alfp = fp_v(i, j )/sm_v(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
267 |
GAD_SOM_ADV_Y |
alf1 = 1. _d 0 - alfp - alfn |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
268 |
GAD_SOM_ADV_Y |
alp1 = 1. _d 0 - alfp |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
270 |
GAD_SOM_ADV_Y |
alpmn = alfp - alfn |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
271 |
GAD_SOM_ADV_Y |
locTp = alfp*sm_o(i,j) - alp1*fp_o(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
273 |
GAD_SOM_ADV_Y |
sm_yy(i,j) = alf1*alf1*sm_yy(i,j) + alfp*alfp*fp_yy(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
275 |
GAD_SOM_ADV_Y |
& - 5. _d 0*(-alpmn*alf1*sm_y(i,j) + alfp*alp1*fp_y(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
277 |
GAD_SOM_ADV_Y |
& + twoRL*alfp*alfn*sm_o(i,j) + (alp1-alfp)*locTp |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
280 |
GAD_SOM_ADV_Y |
sm_xy(i,j) = alf1*sm_xy(i,j) + alfp*fp_xy(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
285 |
GAD_SOM_ADV_Y |
sm_yz(i,j) = alf1*sm_yz(i,j) + alfp*fp_yz(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
290 |
GAD_SOM_ADV_Y |
sm_y (i,j) = alf1*sm_y(i,j) + alfp*fp_y(i,j) + alfn*fn_y(i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
95 |
GAD_SOM_ADV_Y |
_RL alfp, alpq, alp1, locTp |