*** 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) |