*** LTINVAD - adjoint of inverse Legendre transform
Purpose.
--------
Adjoint of the "tranform from Laplace space to Fourier space, compute U and V
and north/south derivatives of state variables".
Interface. ---------- CALL *LTINVAD(...)
PERFORM LEGENDRE TRANFORM. --------------------------
Adjoint of INVERSE LEGENDRE TRANSFORM. ---------------------------
Adjoint of SPECTRAL COMPUTATIONS FOR U,V AND DERIVATIVES. ---------------------------------------------- Compute NS derivatives if needed
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(BUFFERED_ALLOCATOR), | intent(in) | :: | ALLOCATOR | |||
type(LTINVAD_HANDLE), | intent(in) | :: | HLTINVAD | |||
integer(kind=JPIM), | intent(in) | :: | KF_UV | |||
integer(kind=JPIM), | intent(in) | :: | KF_SCALARS | |||
real(kind=JPRB), | intent(inout), | optional | :: | PSPVOR(:,:) | ||
real(kind=JPRB), | intent(inout), | optional | :: | PSPDIV(:,:) | ||
real(kind=JPRB), | intent(inout), | optional | :: | PSPSCALAR(:,:) | ||
real(kind=JPRB), | intent(inout), | optional | :: | PSPSC3A(:,:,:) | ||
real(kind=JPRB), | intent(inout), | optional | :: | PSPSC3B(:,:,:) | ||
real(kind=JPRB), | intent(inout), | optional | :: | PSPSC2(:,:) | ||
real(kind=JPRBT), | intent(in) | :: | ZOUTS(:) | |||
real(kind=JPRBT), | intent(in) | :: | ZOUTA(:) | |||
real(kind=JPRD), | intent(in) | :: | ZOUTS0(:) | |||
real(kind=JPRD), | intent(in) | :: | ZOUTA0(:) |