subroutine, public mo_rfmip_io::determine_gas_names | ( | character(len=*), intent(in) | concentrationfile, |
character(len=*), intent(in) | kdistfile, | ||
integer, intent(in) | forcing_index, | ||
character(len=32), dimension(:), intent(inout), allocatable | names_in_kdist, | ||
character(len=32), dimension(:), intent(inout), allocatable | names_in_file ) |