ETRANS_INQ Subroutine

subroutine ETRANS_INQ(KRESOL, KSPEC, KSPEC2, KSPEC2G, KSPEC2MX, KNUMP, KGPTOT, KGPTOTG, KGPTOTMX, KGPTOTL, KMYMS, KESM0, KUMPP, KPOSSP, KPTRMS, KALLMS, KDIM0G, KFRSTLAT, KLSTLAT, KFRSTLOFF, KPTRLAT, KPTRFRSTLAT, KPTRLSTLAT, KPTRFLOFF, KSTA, KONL, KULTPP, KPTRLS, KPRTRW, KMYSETW, KMYSETV, KMY_REGION_NS, KMY_REGION_EW, LDSPLITLAT, LDLINEAR_GRID, KSMAX, KMSMAX, KNVALUE, KMVALUE, PLEPINM, KDEF_RESOL, LDLAM, PMU, PGW, PRPNM, KLEI3, KSPOLEGL, KPMS, KCPL2M, KCPL4M, KPROCM)

Uses

  • proc~~etrans_inq~~UsesGraph proc~etrans_inq ETRANS_INQ PARKIND1 PARKIND1 proc~etrans_inq->PARKIND1 YOMHOOK YOMHOOK proc~etrans_inq->YOMHOOK module~abort_trans_mod ABORT_TRANS_MOD proc~etrans_inq->module~abort_trans_mod module~eq_regions_mod eq_regions_mod proc~etrans_inq->module~eq_regions_mod module~eset_resol_mod ESET_RESOL_MOD proc~etrans_inq->module~eset_resol_mod module~tpm_dim TPM_DIM proc~etrans_inq->module~tpm_dim module~tpm_distr TPM_DISTR proc~etrans_inq->module~tpm_distr module~tpm_fields TPM_FIELDS proc~etrans_inq->module~tpm_fields module~tpm_gen TPM_GEN proc~etrans_inq->module~tpm_gen module~tpm_geometry TPM_GEOMETRY proc~etrans_inq->module~tpm_geometry module~tpmald_dim TPMALD_DIM proc~etrans_inq->module~tpmald_dim module~tpmald_distr TPMALD_DISTR proc~etrans_inq->module~tpmald_distr module~tpmald_fields TPMALD_FIELDS proc~etrans_inq->module~tpmald_fields EC_PARKIND EC_PARKIND module~eq_regions_mod->EC_PARKIND module~tpm_dim->EC_PARKIND module~tpm_distr->EC_PARKIND module~tpm_fields->EC_PARKIND module~tpm_gen->EC_PARKIND module~tpm_geometry->EC_PARKIND module~tpmald_dim->PARKIND1 module~tpmald_distr->PARKIND1 module~tpmald_fields->PARKIND1

*** ETRANS_INQ - Extract information from the transform package

  • Interface. ---------- CALL ETRANS_INQ(...) Explicit arguments : All arguments are optional. -------------------- KRESOL - resolution tag for which info is required ,default is the first defined resolution (input)

Arguments

Type IntentOptional Attributes Name
integer(kind=JPIM), intent(in), optional :: KRESOL
integer(kind=JPIM), intent(inout), optional :: KSPEC
integer(kind=JPIM), intent(inout), optional :: KSPEC2
integer(kind=JPIM), intent(inout), optional :: KSPEC2G
integer(kind=JPIM), intent(inout), optional :: KSPEC2MX
integer(kind=JPIM), intent(inout), optional :: KNUMP
integer(kind=JPIM), intent(inout), optional :: KGPTOT
integer(kind=JPIM), intent(inout), optional :: KGPTOTG
integer(kind=JPIM), intent(inout), optional :: KGPTOTMX
integer(kind=JPIM), intent(inout), optional :: KGPTOTL(:,:)
integer(kind=JPIM), intent(inout), optional :: KMYMS(:)
integer(kind=JPIM), intent(inout), optional :: KESM0(0:)
integer(kind=JPIM), intent(inout), optional :: KUMPP(:)
integer(kind=JPIM), intent(inout), optional :: KPOSSP(:)
integer(kind=JPIM), intent(inout), optional :: KPTRMS(:)
integer(kind=JPIM), intent(inout), optional :: KALLMS(:)
integer(kind=JPIM), intent(inout), optional :: KDIM0G(0:)
integer(kind=JPIM), intent(inout), optional :: KFRSTLAT(:)
integer(kind=JPIM), intent(inout), optional :: KLSTLAT(:)
integer(kind=JPIM), intent(inout), optional :: KFRSTLOFF
integer(kind=JPIM), intent(inout), optional :: KPTRLAT(:)
integer(kind=JPIM), intent(inout), optional :: KPTRFRSTLAT(:)
integer(kind=JPIM), intent(inout), optional :: KPTRLSTLAT(:)
integer(kind=JPIM), intent(inout), optional :: KPTRFLOFF
integer(kind=JPIM), intent(inout), optional :: KSTA(:,:)
integer(kind=JPIM), intent(inout), optional :: KONL(:,:)
integer(kind=JPIM), intent(inout), optional :: KULTPP(:)
integer(kind=JPIM), intent(inout), optional :: KPTRLS(:)
integer(kind=JPIM), intent(out), optional :: KPRTRW
integer(kind=JPIM), intent(out), optional :: KMYSETW
integer(kind=JPIM), intent(out), optional :: KMYSETV
integer(kind=JPIM), intent(out), optional :: KMY_REGION_NS
integer(kind=JPIM), intent(out), optional :: KMY_REGION_EW
logical, intent(inout), optional :: LDSPLITLAT(:)
logical, intent(out), optional :: LDLINEAR_GRID
integer(kind=JPIM), intent(out), optional :: KSMAX
integer(kind=JPIM), intent(out), optional :: KMSMAX
integer(kind=JPIM), intent(out), optional :: KNVALUE(:)
integer(kind=JPIM), intent(out), optional :: KMVALUE(:)
real(kind=JPRB), intent(out), optional :: PLEPINM(:)
integer(kind=JPIM), intent(out), optional :: KDEF_RESOL
logical, intent(out), optional :: LDLAM
real(kind=JPRB), intent(inout), optional :: PMU(:)
real(kind=JPRB), optional :: PGW(:)
real(kind=JPRB), intent(inout), optional :: PRPNM(:,:)
integer(kind=JPIM), intent(inout), optional :: KLEI3
integer(kind=JPIM), intent(inout), optional :: KSPOLEGL
integer(kind=JPIM), intent(inout), optional :: KPMS(0:)
integer(kind=JPIM), intent(inout), optional :: KCPL2M(0:)
integer(kind=JPIM), intent(inout), optional :: KCPL4M(0:)
integer(kind=JPIM), intent(inout), optional :: KPROCM(0:)

Calls

proc~~etrans_inq~~CallsGraph proc~etrans_inq ETRANS_INQ dr_hook dr_hook proc~etrans_inq->dr_hook ellips ellips proc~etrans_inq->ellips proc~abort_trans ABORT_TRANS proc~etrans_inq->proc~abort_trans proc~eset_resol ESET_RESOL proc~etrans_inq->proc~eset_resol mpl_abort mpl_abort proc~abort_trans->mpl_abort sdl_srlabort sdl_srlabort proc~abort_trans->sdl_srlabort sdl_traceback sdl_traceback proc~abort_trans->sdl_traceback proc~eset_resol->dr_hook proc~eset_resol->proc~abort_trans