*** LTDIR - Control of Direct Legendre transform step
Interface. ---------- CALL LTDIR(...)
PREPARE LEGENDRE POLONOMIALS AND EPSNM --------------------------------------
PREPARE WORK ARRAYS. --------------------
COMPUTE VORTICITY AND DIVERGENCE. ---------------------------------
UPDATE SPECTRAL ARRAYS. -----------------------
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(BUFFERED_ALLOCATOR), | intent(in) | :: | ALLOCATOR | |||
type(LTDIR_HANDLE), | intent(in) | :: | HLTDIR | |||
real(kind=JPRBT), | intent(in) | :: | ZINPS(:) | |||
real(kind=JPRBT), | intent(in) | :: | ZINPA(:) | |||
real(kind=JPRD), | intent(in) | :: | ZINPS0(:) | |||
real(kind=JPRD), | intent(in) | :: | ZINPA0(:) | |||
integer(kind=JPIM), | intent(in) | :: | KF_FS | |||
integer(kind=JPIM), | intent(in) | :: | KF_UV | |||
integer(kind=JPIM), | intent(in) | :: | KF_SCALARS | |||
real(kind=JPRB), | intent(out), | optional | :: | PSPVOR(:,:) | ||
real(kind=JPRB), | intent(out), | optional | :: | PSPDIV(:,:) | ||
real(kind=JPRB), | intent(out), | optional | :: | PSPSCALAR(:,:) | ||
real(kind=JPRB), | intent(out), | optional | :: | PSPSC3A(:,:,:) | ||
real(kind=JPRB), | intent(out), | optional | :: | PSPSC3B(:,:,:) | ||
real(kind=JPRB), | intent(out), | optional | :: | PSPSC2(:,:) | ||
integer(kind=JPIM), | intent(in), | optional | :: | KFLDPTRUV(:) | ||
integer(kind=JPIM), | intent(in), | optional | :: | KFLDPTRSC(:) |