*** GPNORM_TRANS_CTL - calculate grid-point norms simplified version to be projected to adjoint
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| real(kind=JPRB), | intent(in) | :: | PGP(:,:,:) | |||
| integer(kind=JPIM), | intent(in) | :: | KFIELDS | |||
| integer(kind=JPIM), | intent(in) | :: | KPROMA | |||
| real(kind=JPRB), | intent(out) | :: | PAVE(:) | |||
| real(kind=JPRD), | intent(in) | :: | PW(R%NDGL) |