INIGPTR Subroutine

public subroutine INIGPTR(KGPTRSEND, KGPTRRECV)

Uses

  • proc~~inigptr~2~~UsesGraph proc~inigptr~2 INIGPTR PARKIND1 PARKIND1 proc~inigptr~2->PARKIND1 module~abort_trans_mod ABORT_TRANS_MOD proc~inigptr~2->module~abort_trans_mod module~eq_regions_mod eq_regions_mod proc~inigptr~2->module~eq_regions_mod module~tpm_distr TPM_DISTR proc~inigptr~2->module~tpm_distr module~tpm_gen TPM_GEN proc~inigptr~2->module~tpm_gen module~tpm_trans TPM_TRANS proc~inigptr~2->module~tpm_trans EC_PARKIND EC_PARKIND module~eq_regions_mod->EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_gen->EC_PARKIND module~tpm_trans->PARKIND1

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(out) :: KGPTRSEND(2,NGPBLKS,NPRTRNS)
integer(kind=JPIM), intent(out) :: KGPTRRECV(NPRTRNS)