subroutine, public mo_rfmip_io::read_and_block_gases_ty | ( | character(len=*), intent(in) | filename, |
integer, intent(in) | blocksize, | ||
character(len=*), dimension(:), intent(in) | gas_names, | ||
character(len=*), dimension(:), intent(in) | names_in_file, | ||
type(ty_gas_concs), dimension(:), intent(out), allocatable | gas_conc_array ) |