LEINV_MOD Module


Uses

  • module~~leinv_mod~2~~UsesGraph module~leinv_mod~2 LEINV_MOD module~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD module~leinv_mod~2->module~buffered_allocator_mod module~parkind_ectrans PARKIND_ECTRANS module~leinv_mod~2->module~parkind_ectrans EC_PARKIND EC_PARKIND module~buffered_allocator_mod->EC_PARKIND iso_c_binding iso_c_binding module~buffered_allocator_mod->iso_c_binding module~abort_trans_mod ABORT_TRANS_MOD module~buffered_allocator_mod->module~abort_trans_mod module~growing_allocator_mod GROWING_ALLOCATOR_MOD module~buffered_allocator_mod->module~growing_allocator_mod PARKIND1 PARKIND1 module~parkind_ectrans->PARKIND1 module~growing_allocator_mod->iso_c_binding

Used by

  • module~~leinv_mod~2~~UsedByGraph module~leinv_mod~2 LEINV_MOD proc~ltinv LTINV proc~ltinv->module~leinv_mod~2 proc~ltinv~2 LTINV proc~ltinv~2->module~leinv_mod~2 proc~prepare_ltinv PREPARE_LTINV proc~prepare_ltinv->module~leinv_mod~2 proc~trmtol_pack TRMTOL_PACK proc~trmtol_pack->module~leinv_mod~2

Subroutines

public subroutine LEINV_STRIDES(KF_LEG, IOUT_STRIDES0, IOUT_SIZE, IIN_STRIDES0, IIN_SIZE, IOUT0_STRIDES0, IOUT0_SIZE, IIN0_STRIDES0, IIN0_SIZE)

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KF_LEG
integer(kind=JPIM), optional :: IOUT_STRIDES0
integer(kind=JPIB), optional :: IOUT_SIZE
integer(kind=JPIM), optional :: IIN_STRIDES0
integer(kind=JPIB), optional :: IIN_SIZE
integer(kind=JPIM), optional :: IOUT0_STRIDES0
integer(kind=JPIM), optional :: IOUT0_SIZE
integer(kind=JPIM), optional :: IIN0_STRIDES0
integer(kind=JPIM), optional :: IIN0_SIZE

public subroutine LEINV(ALLOCATOR, PIA, ZINP, ZINP0, ZOUTS, ZOUTA, ZOUTS0, ZOUTA0, KF_LEG)

*** LEINV - Inverse Legendre transform.

Read more…

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(in) :: ALLOCATOR
real(kind=JPRB), intent(in) :: PIA(:,:,:)
real(kind=JPRBT), intent(out) :: ZINP(:)
real(kind=JPRD), intent(out) :: ZINP0(:)
real(kind=JPRBT), intent(out) :: ZOUTS(:)
real(kind=JPRBT), intent(out) :: ZOUTA(:)
real(kind=JPRD), intent(out) :: ZOUTS0(:)
real(kind=JPRD), intent(out) :: ZOUTA0(:)
integer(kind=JPIM), intent(in) :: KF_LEG