EASRE1BAD Subroutine

public subroutine EASRE1BAD(KFC, KM, KMLOC, PIA)

Uses

  • proc~~easre1bad~~UsesGraph proc~easre1bad EASRE1BAD PARKIND1 PARKIND1 proc~easre1bad->PARKIND1 YOMHOOK YOMHOOK proc~easre1bad->YOMHOOK module~tpm_dim TPM_DIM proc~easre1bad->module~tpm_dim module~tpm_distr TPM_DISTR proc~easre1bad->module~tpm_distr module~tpm_trans TPM_TRANS proc~easre1bad->module~tpm_trans module~tpmald_dim TPMALD_DIM proc~easre1bad->module~tpmald_dim EC_PARKIND EC_PARKIND module~tpm_dim->EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_trans->PARKIND1 module~tpmald_dim->PARKIND1

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

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

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KFC
integer(kind=JPIM), intent(in) :: KM
integer(kind=JPIM), intent(in) :: KMLOC
real(kind=JPRB), intent(out) :: PIA(RALD%NDGLSUR+R%NNOEXTZG,KFC)

Calls

proc~~easre1bad~~CallsGraph proc~easre1bad EASRE1BAD dr_hook dr_hook proc~easre1bad->dr_hook

Called by

proc~~easre1bad~~CalledByGraph proc~easre1bad EASRE1BAD proc~easre1ad EASRE1AD proc~easre1ad->proc~easre1bad proc~eltinvad ELTINVAD proc~eltinvad->proc~easre1bad proc~eltinv_ctlad ELTINV_CTLAD proc~eltinv_ctlad->proc~eltinvad proc~einv_trans_ctlad EINV_TRANS_CTLAD proc~einv_trans_ctlad->proc~eltinv_ctlad proc~einv_transad EINV_TRANSAD proc~einv_transad->proc~einv_trans_ctlad