- Timestamp:
- Mar 19, 2024, 3:34:21 PM (2 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk/libf/phylmd/ecrad/radiation/radiation_ecckd_gas.F90
r4773 r4853 14 14 ! License: see the COPYING file for details 15 15 ! 16 17 #include "ecrad_config.h" 16 18 17 19 module radiation_ecckd_gas … … 82 84 subroutine read_ckd_gas(this, file, gas_name, i_gas_code) 83 85 84 use easy_netcdf, only : netcdf_file 86 #ifdef EASY_NETCDF_READ_MPI 87 use easy_netcdf_read_mpi, only : netcdf_file 88 #else 89 use easy_netcdf, only : netcdf_file 90 #endif 85 91 86 92 class(ckd_gas_type), intent(inout) :: this
Note: See TracChangeset
for help on using the changeset viewer.