File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_implicit_r.F |
360 |
GAD_IMPLICIT_R |
kp2=MIN(Nr,k+2) |
./pkg/generic_advdiff/gad_implicit_r.F |
375 |
GAD_IMPLICIT_R |
& + gTracer(i,j,kp2)*e5d(i,j,k) |
./pkg/generic_advdiff/gad_implicit_r.F |
93 |
GAD_IMPLICIT_R |
INTEGER km1, km2, kp1, kp2 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
34 |
GAD_OS7MP_ADV_R |
INTEGER i,j,kp3,kp2,kp1,km1,km2,km3,km4 |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
56 |
GAD_OS7MP_ADV_R |
kp2=MIN(Nr,k+2) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
66 |
GAD_OS7MP_ADV_R |
Qippp = Q(i,j,kp2) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
74 |
GAD_OS7MP_ADV_R |
MskIpp = maskC(i,j,kp2,bi,bj) * float(kp2-kp1) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
86 |
GAD_OS7MP_ADV_R |
Qimm = Q(i,j,kp2) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
93 |
GAD_OS7MP_ADV_R |
MskImm = maskC(i,j,kp2,bi,bj) * float(kp2-kp1) |
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
94 |
GAD_OS7MP_ADV_R |
MskImmm = maskC(i,j,kp3,bi,bj) * float(kp3-kp2) |