EASRE1B Subroutine

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

Uses

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

*** ASRE1B - Recombine antisymmetric and symmetric parts

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

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(in) :: PIA(RALD%NDGLSUR+R%NNOEXTZG,KFC)

Calls

proc~~easre1b~~CallsGraph proc~easre1b EASRE1B dr_hook dr_hook proc~easre1b->dr_hook

Called by

proc~~easre1b~~CalledByGraph proc~easre1b EASRE1B proc~eltinv ELTINV proc~eltinv->proc~easre1b proc~eltinv~2 ELTINV proc~eltinv~2->proc~easre1b proc~einv_trans_ctl EINV_TRANS_CTL proc~einv_trans_ctl->proc~eltinv proc~eltinv_ctl ELTINV_CTL proc~eltinv_ctl->proc~eltinv proc~einv_trans EINV_TRANS proc~einv_trans->proc~einv_trans_ctl proc~einv_trans_ctl~2 EINV_TRANS_CTL proc~einv_trans_ctl~2->proc~eltinv_ctl proc~einv_trans~2 EINV_TRANS proc~einv_trans~2->proc~einv_trans_ctl