fft2d_lib Module

  1. fft2d_lib.f03
  2. fft2d_lib

Uses

  • module~~fft2d_lib~~UsesGraph module~fft2d_lib fft2d_lib mpi mpi module~fft2d_lib->mpi

Used by

  • module~~fft2d_lib~~UsedByGraph module~fft2d_lib fft2d_lib proc~pprntpose PPRNTPOSE proc~pprntpose->module~fft2d_lib module~fft2d_class fft2d_class module~fft2d_class->module~fft2d_lib proc~pprtpose PPRTPOSE proc~pprtpose->module~fft2d_lib module~field2d_class field2d_class module~field2d_class->module~fft2d_class module~species2d_class species2d_class module~species2d_class->module~field2d_class module~beam3d_class beam3d_class module~beam3d_class->module~field2d_class module~simulation_class simulation_class module~simulation_class->module~field2d_class module~simulation_class->module~species2d_class module~simulation_class->module~beam3d_class program~quickpic quickpic program~quickpic->module~simulation_class

Contents

Common Blocks

Interfaces

Subroutines


Common Blocks

common /PPARMS/

Type AttributesNameInitial
integer :: nproc
integer :: lgrp
integer :: mreal
integer :: mint
integer :: mcplx
integer :: mdouble
integer :: lworld

Interfaces

interface

  • public subroutine WPFST2RINIT(mixup, sctd, indx, indy, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    integer, intent(inout), dimension(nxhyd):: mixup
    complex, intent(inout), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFSST2R(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFSCT2R(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFCST2R(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFCCT2R(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFCST2R2(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(2,nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(2,kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(2,kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFSCT2R2(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(2,nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(2,kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(2,kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFCST2R3(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(3,nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(3,kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(3,kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFSCT2R3(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(3,nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(3,kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(3,kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPFS3T2R3(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nxvh, nyv, kxp2, kyp, kypd, kxp2d, jblok, kblok, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout) :: f
    real, intent(inout), dimension(3,nyv,kxp2d,jblok):: g
    real, intent(inout), dimension(3,kxp2+1,kyp+1,kblok):: bs
    real, intent(inout), dimension(3,kxp2+1,kyp+1,jblok):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: jblok
    integer, intent(in) :: kblok
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PDIVFD2(f, df, nx, ny, kstrt, ndim, nyv, kxp2, j2blok)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(ndim,nyv,kxp2+1,j2blok):: f
    real, intent(inout), dimension(nyv,kxp2+1,j2blok):: df
    integer, intent(in) :: nx
    integer, intent(in) :: ny
    integer, intent(in) :: kstrt
    integer, intent(in) :: ndim
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: j2blok

interface

  • public subroutine PGRADFD2(df, f, nx, ny, kstrt, ndim, nyv, kxp2, j2blok)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(nyv,kxp2+1,j2blok):: df
    real, intent(inout), dimension(ndim,nyv,kxp2+1,j2blok):: f
    integer, intent(in) :: nx
    integer, intent(in) :: ny
    integer, intent(in) :: kstrt
    integer, intent(in) :: ndim
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: j2blok

interface

  • public subroutine PCURLFD2(f, g, nx, ny, kstrt, nyv, kxp2, j2blok)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,nyv,kxp2+1,j2blok):: f
    real, intent(inout), dimension(3,nyv,kxp2+1,j2blok):: g
    integer, intent(in) :: nx
    integer, intent(in) :: ny
    integer, intent(in) :: kstrt
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: j2blok

interface

  • public subroutine PCURLFD22(f, g, nx, ny, kstrt, nyv, kxp2, j2blok)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,nyv,kxp2+1,j2blok):: f
    real, intent(inout), dimension(nyv,kxp2+1,j2blok):: g
    integer, intent(in) :: nx
    integer, intent(in) :: ny
    integer, intent(in) :: kstrt
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: j2blok

interface

  • public subroutine WPPFSST2RM(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2*nxvh,kypd):: f
    real, intent(inout), dimension(nyv,kxp2d):: g
    real, intent(inout), dimension(kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFSCT2RM(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2*nxvh,kypd):: f
    real, intent(inout), dimension(nyv,kxp2d):: g
    real, intent(inout), dimension(kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFCST2RM(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2*nxvh,kypd):: f
    real, intent(inout), dimension(nyv,kxp2d):: g
    real, intent(inout), dimension(kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFCCT2RM(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2*nxvh,kypd):: f
    real, intent(inout), dimension(nyv,kxp2d):: g
    real, intent(inout), dimension(kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFST2RMXX(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFCT2RMXX(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFST2RMXY(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFCT2RMXY(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFCST2RM2(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,2*nxvh,kypd):: f
    real, intent(inout), dimension(2,nyv,kxp2d):: g
    real, intent(inout), dimension(2,kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(2,kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFSCT2RM2(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,2*nxvh,kypd):: f
    real, intent(inout), dimension(2,nyv,kxp2d):: g
    real, intent(inout), dimension(2,kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(2,kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFCST2RM2X(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSCT2RM2X(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSCT2RM2Y(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFCST2RM2Y(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFCST2RM3(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,2*nxvh,kypd):: f
    real, intent(inout), dimension(3,nyv,kxp2d):: g
    real, intent(inout), dimension(3,kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(3,kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFSCT2RM3(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,2*nxvh,kypd):: f
    real, intent(inout), dimension(3,nyv,kxp2d):: g
    real, intent(inout), dimension(3,kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(3,kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFCSST2RM3X(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSCCT2RM3X(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSCST2RM3Y(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFCSCT2RM3Y(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFSCT2RM4(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(4,2*nxvh,kypd):: f
    real, intent(inout), dimension(4,nyv,kxp2d):: g
    real, intent(inout), dimension(4,kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(4,kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSCCST2RM4X(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(4,2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSCSCT2RM4Y(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(4,nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFSCT2RM22(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,2*nxvh,kypd):: f
    real, intent(inout), dimension(2,nyv,kxp2d):: g
    real, intent(inout), dimension(2,kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(2,kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSCCST2RM22X(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSCSCT2RM22Y(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(2,nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine WPPFSST2RM23(f, g, bs, br, isign, ntpose, mixup, sctd, ttp, indx, indy, kstrt, nvp, nxvh, nyv, kxp2, kyp, kypd, kxp2d, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,2*nxvh,kypd):: f
    real, intent(inout), dimension(3,nyv,kxp2d):: g
    real, intent(inout), dimension(3,kxp2+1,kyp+1):: bs
    real, intent(inout), dimension(3,kxp2+1,kyp+1):: br
    integer, intent(in) :: isign
    integer, intent(in) :: ntpose
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    real, intent(inout) :: ttp
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: nvp
    integer, intent(in) :: nxvh
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2
    integer, intent(in) :: kyp
    integer, intent(in) :: kypd
    integer, intent(in) :: kxp2d
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSSCT2RM32X(f, isign, mixup, sctd, indx, indy, kstrt, kypi, kypp, nxvh, kypd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,2*nxvh,kypd):: f
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kypi
    integer, intent(in) :: kypp
    integer, intent(in) :: nxvh
    integer, intent(in) :: kypd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine PPFSSCT2RM23Y(g, isign, mixup, sctd, indx, indy, kstrt, kxpi, kxpp, nyv, kxpd, nxhyd, nxyd)

    Arguments

    Type IntentOptional AttributesName
    real, intent(inout), dimension(3,nyv,kxpd):: g
    integer, intent(in) :: isign
    integer, intent(in), dimension(nxhyd):: mixup
    complex, intent(in), dimension(nxyd):: sctd
    integer, intent(in) :: indx
    integer, intent(in) :: indy
    integer, intent(in) :: kstrt
    integer, intent(in) :: kxpi
    integer, intent(in) :: kxpp
    integer, intent(in) :: nyv
    integer, intent(in) :: kxpd
    integer, intent(in) :: nxhyd
    integer, intent(in) :: nxyd

interface

  • public subroutine MPPDIVFD2(f, df, nx, ny, kstrt, ndim, nyv, kxp2)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), dimension(3,nyv,kxp2+1):: f
    real, intent(inout), dimension(nyv,kxp2+1):: df
    integer, intent(in) :: nx
    integer, intent(in) :: ny
    integer, intent(in) :: kstrt
    integer, intent(in) :: ndim
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2

interface

  • public subroutine MPPGRADFD2(df, f, nx, ny, kstrt, ndim, nyv, kxp2)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), dimension(nyv,kxp2+1):: df
    real, intent(inout), dimension(3,nyv,kxp2+1):: f
    integer, intent(in) :: nx
    integer, intent(in) :: ny
    integer, intent(in) :: kstrt
    integer, intent(in) :: ndim
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2

interface

  • public subroutine MPPCURLFD2(f, g, nx, ny, kstrt, nyv, kxp2)

    Arguments

    Type IntentOptional AttributesName
    real, intent(in), dimension(3,nyv,kxp2+1):: f
    real, intent(inout), dimension(3,nyv,kxp2+1):: g
    integer, intent(in) :: nx
    integer, intent(in) :: ny
    integer, intent(in) :: kstrt
    integer, intent(in) :: nyv
    integer, intent(in) :: kxp2

Subroutines

public subroutine PPRTPOSE(f, g, s, t, nx, ny, kxp, kyp, kstrt, nvp, nxv, nyv, kxpd, kypd)

Arguments

Type IntentOptional AttributesName
real, intent(in), dimension(nxv,kypd):: f
real, intent(inout), dimension(nyv,kxpd):: g
real, intent(inout), dimension((kxp+1)*(kyp+1)):: s
real, intent(inout), dimension((kxp+1)*(kyp+1)):: t
integer, intent(in) :: nx
integer, intent(in) :: ny
integer, intent(in) :: kxp
integer, intent(in) :: kyp
integer, intent(in) :: kstrt
integer, intent(in) :: nvp
integer, intent(in) :: nxv
integer, intent(in) :: nyv
integer, intent(in) :: kxpd
integer, intent(in) :: kypd

public subroutine PPRNTPOSE(f, g, s, t, nx, ny, kxp, kyp, kstrt, nvp, ndim, nxv, nyv, kxpd, kypd)

Arguments

Type IntentOptional AttributesName
real, intent(in), dimension(ndim,nxv,kypd):: f
real, intent(inout), dimension(ndim,nyv,kxpd):: g
real, intent(inout), dimension(ndim,(kxp+1)*(kyp+1)):: s
real, intent(inout), dimension(ndim,(kxp+1)*(kyp+1)):: t
integer, intent(in) :: nx
integer, intent(in) :: ny
integer, intent(in) :: kxp
integer, intent(in) :: kyp
integer, intent(in) :: kstrt
integer, intent(in) :: nvp
integer, intent(in) :: ndim
integer, intent(in) :: nxv
integer, intent(in) :: nyv
integer, intent(in) :: kxpd
integer, intent(in) :: kypd