*** ASRE1 - Recombine antisymmetric and symmetric parts
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer(kind=JPIM), | intent(in) | :: | KM | |||
integer(kind=JPIM), | intent(in) | :: | KMLOC | |||
integer(kind=JPIM), | intent(in) | :: | KF_OUT_LT | |||
real(kind=JPRB), | intent(in) | :: | PAOA1(:,:) | |||
real(kind=JPRB), | intent(in) | :: | PSOA1(:,:) |