ASRE1BAD Subroutine

public subroutine ASRE1BAD(KFIELD, KM, KMLOC, PAOA, PSOA)

Uses

  • proc~~asre1bad~~UsesGraph proc~asre1bad ASRE1BAD PARKIND1 PARKIND1 proc~asre1bad->PARKIND1 module~tpm_dim TPM_DIM proc~asre1bad->module~tpm_dim module~tpm_distr TPM_DISTR proc~asre1bad->module~tpm_distr module~tpm_geometry TPM_GEOMETRY proc~asre1bad->module~tpm_geometry module~tpm_trans TPM_TRANS proc~asre1bad->module~tpm_trans EC_PARKIND EC_PARKIND module~tpm_dim->EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_geometry->EC_PARKIND module~tpm_trans->PARKIND1

*** ASRE1BAD - Recombine antisymmetric and symmetric parts - adjoint

  • Interface. ---------- CALL *ASRE1BAD(..)

    1.2 RECOMBINE

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KFIELD
integer(kind=JPIM), intent(in) :: KM
integer(kind=JPIM), intent(in) :: KMLOC
real(kind=JPRB), intent(out) :: PAOA(:,:)
real(kind=JPRB), intent(out) :: PSOA(:,:)

Called by

proc~~asre1bad~~CalledByGraph proc~asre1bad ASRE1BAD proc~asre1ad ASRE1AD proc~asre1ad->proc~asre1bad proc~ltinvad~2 LTINVAD proc~ltinvad~2->proc~asre1bad