EASRE1B Subroutine

public subroutine EASRE1B(KFIELD, PFFT, FOUBUF_IN)

Uses

  • proc~~easre1b~2~~UsesGraph proc~easre1b~2 EASRE1B PARKIND1 PARKIND1 proc~easre1b~2->PARKIND1 YOMHOOK YOMHOOK proc~easre1b~2->YOMHOOK module~tpm_dim TPM_DIM proc~easre1b~2->module~tpm_dim module~tpm_distr TPM_DISTR proc~easre1b~2->module~tpm_distr EC_PARKIND EC_PARKIND module~tpm_dim->EC_PARKIND module~tpm_distr->EC_PARKIND

*** ASRE1B - Recombine antisymmetric and symmetric parts

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

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in) :: KFIELD
real(kind=JPRB), intent(in) :: PFFT(:,:,:)
real(kind=JPRB), intent(out) :: FOUBUF_IN(:)

Calls

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