LEDIR_MOD Module


Uses

  • module~~ledir_mod~2~~UsesGraph module~ledir_mod~2 LEDIR_MOD module~buffered_allocator_mod BUFFERED_ALLOCATOR_MOD module~ledir_mod~2->module~buffered_allocator_mod module~parkind_ectrans PARKIND_ECTRANS module~ledir_mod~2->module~parkind_ectrans module~buffered_allocator_mod->module~parkind_ectrans 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~~ledir_mod~2~~UsedByGraph module~ledir_mod~2 LEDIR_MOD proc~ltdir LTDIR proc~ltdir->module~ledir_mod~2 proc~ltdir~2 LTDIR proc~ltdir~2->module~ledir_mod~2 proc~prepare_ltdir PREPARE_LTDIR proc~prepare_ltdir->module~ledir_mod~2 proc~prepare_trltom_unpack PREPARE_TRLTOM_UNPACK proc~prepare_trltom_unpack->module~ledir_mod~2 proc~trltom_unpack TRLTOM_UNPACK proc~trltom_unpack->module~ledir_mod~2

Subroutines

public subroutine LEDIR_STRIDES(KF_FS, 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_FS
integer(kind=JPIM), optional :: IOUT_STRIDES0
integer(kind=JPIM), optional :: IOUT_SIZE
integer(kind=JPIM), optional :: IIN_STRIDES0
integer(kind=JPIM), 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 LEDIR(ALLOCATOR, ZINPS, ZINPA, ZINPS0, ZINPA0, ZOUT, ZOUT0, POA1, KF_FS)

*** LEDIR - Direct Legendre transform.

Read more…

Arguments

Type IntentOptional Attributes Name
type(BUFFERED_ALLOCATOR), intent(in) :: ALLOCATOR
real(kind=JPRBT), intent(in) :: ZINPS(:)
real(kind=JPRBT), intent(in) :: ZINPA(:)
real(kind=JPRD), intent(in) :: ZINPS0(:)
real(kind=JPRD), intent(in) :: ZINPA0(:)
real(kind=JPRBT), intent(inout) :: ZOUT(:)
real(kind=JPRD), intent(inout) :: ZOUT0(:)
real(kind=JPRBT), intent(out), POINTER :: POA1(:,:,:)
integer(kind=JPIM), intent(in) :: KF_FS