| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
13 |
GAD_SOM_ADV_R |
U sm_v, sm_o, sm_x, sm_y, sm_z, |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
167 |
GAD_SOM_ADV_R |
& ( sm_o(i,j, k ) + alp1*sm_z(i,j, k ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
171 |
GAD_SOM_ADV_R |
& ( sm_z(i,j, k ) + three*alp1*sm_zz(i,j, k ) ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
226 |
GAD_SOM_ADV_R |
& ( sm_o(i,j,km1) - aln1*sm_z(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
230 |
GAD_SOM_ADV_R |
& ( sm_z(i,j,km1) - three*aln1*sm_zz(i,j,km1) ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
290 |
GAD_SOM_ADV_R |
sm_z (i,j,k) = alf1q*( sm_z(i,j,k) - three*alpmn*sm_zz(i,j,k) ) |
|
./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 |
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_r.F |
73 |
GAD_SOM_ADV_R |
_RL sm_z (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
15 |
GAD_SOM_ADV_X |
U sm_v, sm_o, sm_x, sm_y, sm_z, |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
191 |
GAD_SOM_ADV_X |
fp_z (i,j) = alp(i,j)*( sm_z(i-1,j) + alp1*sm_xz(i-1,j) ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
210 |
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 |
246 |
GAD_SOM_ADV_X |
sm_z (i,j) = sm_z (i,j) - fn_z (i,j) - fp_z (i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
286 |
GAD_SOM_ADV_X |
& + three*( alpmn*sm_z(i,j) - alp1*fp_z(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
294 |
GAD_SOM_ADV_X |
sm_z (i,j) = sm_z (i,j) + fp_z (i,j) + fn_z (i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
72 |
GAD_SOM_ADV_X |
_RL sm_z (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
15 |
GAD_SOM_ADV_Y |
U sm_v, sm_o, sm_x, sm_y, sm_z, |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
191 |
GAD_SOM_ADV_Y |
fp_z (i,j) = alp(i,j)*( sm_z(i,j-1) + alp1*sm_yz(i,j-1) ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
211 |
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 |
247 |
GAD_SOM_ADV_Y |
sm_z (i,j) = sm_z (i,j) - fn_z (i,j) - fp_z (i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
287 |
GAD_SOM_ADV_Y |
& + three*( alpmn*sm_z(i,j) - alp1*fp_z(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
295 |
GAD_SOM_ADV_Y |
sm_z (i,j) = sm_z (i,j) + fp_z (i,j) + fn_z (i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
72 |
GAD_SOM_ADV_Y |
_RL sm_z (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
11 |
GAD_SOM_FILL_CS_CORNER |
U sm_v, sm_o, sm_x, sm_y, sm_z, |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
51 |
GAD_SOM_FILL_CS_CORNER |
_RL sm_z (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
79 |
GAD_SOM_FILL_CS_CORNER |
& sm_z , bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
12 |
GAD_SOM_LIM_R |
U sm_v, sm_o, sm_x, sm_y, sm_z, |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
47 |
GAD_SOM_LIM_R |
_RL sm_z (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
72 |
GAD_SOM_LIM_R |
s1new = MIN( s1max, MAX(-s1max,sm_z(i,j,k)) ) |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
77 |
GAD_SOM_LIM_R |
sm_z (i,j,k) = s1new |