FileIO_Shared
Author: GMAO SI-Team
FileIO_Shared
– A Module that contains shared subroutines/functions needed by NetCDF and Binary IO
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=ESMF_MAXSTR), | public, | save | :: | mname(LAST_UNIT) | |||
integer, | public, | parameter | :: | LAST_UNIT | = | 999 | |
integer, | public, | parameter | :: | STD_OUT_UNIT_NUMBER | = | 6 | |
integer, | public, | parameter | :: | i4_1 | = | 6 | |
integer, | public, | parameter | :: | i4_2 | = | 5 | |
integer, | public, | parameter | :: | not_allocated | = | 0 | |
integer, | public, | parameter | :: | r4_1 | = | 2 | |
integer, | public, | parameter | :: | r4_2 | = | 1 | |
integer, | public, | parameter | :: | r8_1 | = | 4 | |
integer, | public, | parameter | :: | r8_2 | = | 3 | |
logical, | public, | save | :: | MTAKEN(LAST_UNIT) | = | .FALSE. | |
logical, | public, | save | :: | TAKEN(LAST_UNIT) | = | .FALSE. | |
type(PTR), | public, | pointer | :: | REC(:) | |||
type(memunit), | public, | target, save | :: | MEM_UNITS(LAST_UNIT) | |||
type(memunit), | public, | pointer | :: | munit |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real, | intent(out) | :: | local_array(:) | |||
real, | target | :: | global_array(:) | |||
type(ESMF_Grid) | :: | grid | ||||
integer, | intent(in), | optional | :: | mask(:) | ||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer(kind=ESMF_KIND_I4), | intent(in) | :: | data | |||
integer, | intent(in), | optional | :: | UNIT | ||
type(ArrDescr), | intent(inout), | optional | :: | ARRDES | ||
character(len=*), | intent(in), | optional | :: | format | ||
integer, | intent(out), | optional | :: | RC |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
integer(kind=ESMF_KIND_I4), | intent(in) | :: | data(:) | |||
integer, | intent(in), | optional | :: | UNIT | ||
type(ArrDescr), | intent(inout), | optional | :: | ARRDES | ||
character(len=*), | intent(in), | optional | :: | format | ||
integer, | intent(out), | optional | :: | RC |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=ESMF_KIND_R4), | intent(in) | :: | data | |||
integer, | intent(in), | optional | :: | UNIT | ||
type(ArrDescr), | intent(inout), | optional | :: | ARRDES | ||
character(len=*), | intent(in), | optional | :: | format | ||
integer, | intent(out), | optional | :: | RC |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=ESMF_KIND_R4), | intent(in) | :: | data(:) | |||
integer, | intent(in), | optional | :: | UNIT | ||
type(ArrDescr), | intent(inout), | optional | :: | ARRDES | ||
character(len=*), | intent(in), | optional | :: | format | ||
integer, | intent(out), | optional | :: | RC |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=ESMF_KIND_R8), | intent(in) | :: | data | |||
integer, | intent(in), | optional | :: | UNIT | ||
type(ArrDescr), | intent(inout), | optional | :: | ARRDES | ||
character(len=*), | intent(in), | optional | :: | format | ||
integer, | intent(out), | optional | :: | RC |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=ESMF_KIND_R8), | intent(in) | :: | data(:) | |||
integer, | intent(in), | optional | :: | UNIT | ||
type(ArrDescr), | intent(inout), | optional | :: | ARRDES | ||
character(len=*), | intent(in), | optional | :: | format | ||
integer, | intent(out), | optional | :: | RC |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
character(len=*), | intent(in) | :: | data | |||
integer, | intent(in), | optional | :: | UNIT | ||
type(ArrDescr), | intent(inout), | optional | :: | ARRDES | ||
character(len=*), | intent(in), | optional | :: | format | ||
integer, | intent(out), | optional | :: | RC |
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
character(len=ESMF_MAXSTR), | public | :: | filename | ||||
character(len=MPI_MAX_INFO_VAL), | public | :: | cb_buffer_size | ||||
character(len=MPI_MAX_INFO_VAL), | public | :: | romio_cb_read | ||||
character(len=MPI_MAX_INFO_VAL), | public | :: | romio_cb_write | ||||
integer, | public | :: | IOgathercomm | ||||
integer, | public | :: | IOscattercomm | ||||
integer(kind=MPI_OFFSET_KIND), | public | :: | offset | ||||
integer, | public | :: | NX0 | ||||
integer, | public | :: | NY0 | ||||
integer, | public | :: | Xcomm | ||||
integer, | public | :: | Ycomm | ||||
integer, | public, | allocatable | :: | collection_id(:) | |||
integer, | public, | pointer | :: | i1(:) | |||
integer, | public | :: | im_world | ||||
integer, | public, | pointer | :: | in(:) | |||
integer, | public, | pointer | :: | j1(:) | |||
integer, | public | :: | jm_world | ||||
integer, | public, | pointer | :: | jn(:) | |||
integer, | public | :: | lm_world | ||||
integer, | public | :: | myrow | ||||
integer, | public | :: | num_readers | = | 1 | ||
integer, | public | :: | num_writers | = | 1 | ||
integer, | public | :: | readers_comm | ||||
integer, | public | :: | writer_id | ||||
integer, | public | :: | writers_comm | ||||
logical, | public | :: | split_checkpoint | = | .false. | ||
logical, | public | :: | split_restart | = | .false. | ||
logical, | public | :: | tile | ||||
logical, | public | :: | write_restart_by_oserver | = | .false. | ||
type(ESMF_Grid), | public | :: | grid |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(ArrDescr), | intent(inout) | :: | arrdes | |||
integer, | intent(in) | :: | full_comm | |||
integer, | intent(in) | :: | num_readers | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(ArrDescr), | intent(inout) | :: | arrdes | |||
integer, | intent(in) | :: | full_comm | |||
integer, | intent(in) | :: | num_writers | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(ArrDescr), | intent(inout) | :: | ArrDes | |||
integer, | intent(in) | :: | comm | |||
integer, | intent(in) | :: | IM_World | |||
integer, | intent(in) | :: | JM_World | |||
integer, | intent(in) | :: | lm_world | |||
integer, | intent(in) | :: | nx | |||
integer, | intent(in) | :: | ny | |||
integer, | intent(in) | :: | num_readers | |||
integer, | intent(in) | :: | num_writers | |||
integer, | intent(in) | :: | is | |||
integer, | intent(in) | :: | ie | |||
integer, | intent(in) | :: | js | |||
integer, | intent(in) | :: | je | |||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(ArrDescr), | intent(inout) | :: | ArrDes | |||
integer(kind=MPI_OFFSET_KIND), | intent(in), | optional | :: | offset | ||
integer, | intent(in), | optional | :: | readers_comm | ||
integer, | intent(in), | optional | :: | ioscattercomm | ||
integer, | intent(in), | optional | :: | writers_comm | ||
integer, | intent(in), | optional | :: | iogathercomm | ||
integer, | optional, | target | :: | i1(:) | ||
integer, | optional, | target | :: | in(:) | ||
integer, | optional, | target | :: | j1(:) | ||
integer, | optional, | target | :: | jn(:) | ||
integer, | intent(in), | optional | :: | im_world | ||
integer, | intent(in), | optional | :: | jm_world | ||
integer, | intent(in), | optional | :: | lm_world |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(ESMF_Grid), | intent(inout) | :: | GRID | |||
integer, | pointer | :: | mask(:) | |||
integer, | intent(out), | optional | :: | RC |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(PTR), | intent(inout) | :: | A | |||
integer, | intent(in) | :: | TYPE | |||
integer, | intent(in) | :: | IM | |||
integer, | intent(in), | optional | :: | JM | ||
integer, | intent(out), | optional | :: | rc |
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
type(PTR), | intent(inout) | :: | A | |||
integer, | intent(out), | optional | :: | rc |