| Symbol | Description | Uses |
| maskP1 |
=1 for k |
4 |
| File | Line number | Procedure | Code |
| ./pkg/generic_advdiff/gad_u3c4_impl_r.F | 73 | GAD_U3C4_IMPL_R |
_RL mskM, mskP, maskM2, maskP1 |
| ./pkg/generic_advdiff/gad_u3c4_impl_r.F | 81 | GAD_U3C4_IMPL_R |
maskP1 = 1. _d 0 |
| ./pkg/generic_advdiff/gad_u3c4_impl_r.F | 84 | GAD_U3C4_IMPL_R |
IF ( k.GE.Nr) maskP1 = 0. _d 0 |
| ./pkg/generic_advdiff/gad_u3c4_impl_r.F | 93 | GAD_U3C4_IMPL_R |
mskP = maskC(i,j,kp1,bi,bj)*maskP1 |