| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
138 |
GAD_SOM_ADV_R |
& + alp1*(alp1-alp(i,j,kUp))*sm_zz(i,j, k ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
141 |
GAD_SOM_ADV_R |
& ( sm_z(i,j, k ) + three*alp1*sm_zz(i,j, k ) ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
142 |
GAD_SOM_ADV_R |
fp_zz(i,j,kUp) = alp(i,j,kUp)*alpq*sm_zz(i,j, k ) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
14 |
GAD_SOM_ADV_R |
U sm_xx, sm_yy, sm_zz, sm_xy, sm_xz, sm_yz, |
|
./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 |
201 |
GAD_SOM_ADV_R |
fn_zz(i,j,kUp) = aln(i,j,kUp)*alnq*sm_zz(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
257 |
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 |
258 |
GAD_SOM_ADV_R |
sm_zz(i,j,k) = alf1*alf1q*sm_zz(i,j,k) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
283 |
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 |
75 |
GAD_SOM_ADV_R |
_RL sm_zz (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
16 |
GAD_SOM_ADV_X |
U sm_xx, sm_yy, sm_zz, sm_xy, sm_xz, sm_yz, |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
201 |
GAD_SOM_ADV_X |
fp_zz(i,j) = alp(i,j)*sm_zz(i-1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
220 |
GAD_SOM_ADV_X |
fn_zz(i,j) = aln(i,j)*sm_zz( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
258 |
GAD_SOM_ADV_X |
sm_zz(i,j) = sm_zz(i,j) - fn_zz(i,j) - fp_zz(i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
300 |
GAD_SOM_ADV_X |
sm_zz(i,j) = sm_zz(i,j) + fp_zz(i,j) + fn_zz(i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
72 |
GAD_SOM_ADV_X |
_RL sm_zz (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
16 |
GAD_SOM_ADV_Y |
U sm_xx, sm_yy, sm_zz, sm_xy, sm_xz, sm_yz, |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
202 |
GAD_SOM_ADV_Y |
fp_zz(i,j) = alp(i,j)*sm_zz(i,j-1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
221 |
GAD_SOM_ADV_Y |
fn_zz(i,j) = aln(i,j)*sm_zz(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
259 |
GAD_SOM_ADV_Y |
sm_zz(i,j) = sm_zz(i,j) - fn_zz(i,j) - fp_zz(i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
301 |
GAD_SOM_ADV_Y |
sm_zz(i,j) = sm_zz(i,j) + fp_zz(i,j) + fn_zz(i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
72 |
GAD_SOM_ADV_Y |
_RL sm_zz (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
12 |
GAD_SOM_FILL_CS_CORNER |
U sm_xx, sm_yy, sm_zz, sm_xy, sm_xz, sm_yz, |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
54 |
GAD_SOM_FILL_CS_CORNER |
_RL sm_zz (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_fill_cs_corner.F |
83 |
GAD_SOM_FILL_CS_CORNER |
& sm_zz, bi,bj, myThid ) |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
13 |
GAD_SOM_LIM_R |
U sm_xx, sm_yy, sm_zz, sm_xy, sm_xz, sm_yz, |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
50 |
GAD_SOM_LIM_R |
_RL sm_zz (1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr) |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
74 |
GAD_SOM_LIM_R |
& MAX(ABS(s1new)-slpmax,sm_zz(i,j,k)) ) |
|
./pkg/generic_advdiff/gad_som_lim_r.F |
78 |
GAD_SOM_LIM_R |
sm_zz(i,j,k) = s2new |