- 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_cloud_optics_data.F90
r4773 r4853 13 13 ! Email: r.j.hogan@ecmwf.int 14 14 ! 15 16 #include "ecrad_config.h" 15 17 16 18 module radiation_cloud_optics_data … … 48 50 subroutine setup_cloud_optics(this, liq_file_name, ice_file_name, iverbose) 49 51 50 use yomhook, only : lhook, dr_hook, jphook 51 use easy_netcdf, only : netcdf_file 52 use yomhook, only : lhook, dr_hook, jphook 53 #ifdef EASY_NETCDF_READ_MPI 54 use easy_netcdf_read_mpi, only : netcdf_file 55 #else 56 use easy_netcdf, only : netcdf_file 57 #endif 52 58 53 59 class(cloud_optics_type), intent(inout) :: this
Note: See TracChangeset
for help on using the changeset viewer.