Changeset 5101 for LMDZ6/branches/Amaury_dev/libf/phylmd/Dust/condsurfs.f90
- Timestamp:
- Jul 23, 2024, 8:22:55 AM (2 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Amaury_dev/libf/phylmd/Dust/condsurfs.f90
r5099 r5101 4 4 lmt_dmsbio, lmt_h2sbio, lmt_dms, lmt_dmsconc) 5 5 USE dimphy 6 USE netcdf, ONLY 6 USE netcdf, ONLY: nf90_close, nf90_noerr, nf90_inq_varid, nf90_open, & 7 7 nf90_nowrite, nf90_get_var 8 8 IMPLICIT none … … 39 39 write(6, *)' Pb d''ouverture du fichier limitsoufre.nc' 40 40 write(6, *)' ierr = ', ierr 41 callexit(1)41 CALL exit(1) 42 42 endif 43 43
Note: See TracChangeset
for help on using the changeset viewer.