Changeset 1504 for trunk


Ignore:
Timestamp:
Dec 10, 2015, 2:34:05 PM (9 years ago)
Author:
emillour
Message:

Mars GCM:
-Minor bug fix: "nf90_def_var" was given twice in the list of variables to include from module netcdf. Because of this compilation with gfortran failed.
EM

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/phymars/iostart.F90

    r1380 r1504  
    886886  SUBROUTINE put_var_rgen(var_name,title,var,var_size)
    887887  USE netcdf, only: NF90_REDEF, NF90_DEF_VAR, NF90_ENDDEF, NF90_PUT_VAR, &
    888                     NF90_FLOAT, NF90_DOUBLE, NF90_DEF_VAR, &
     888                    NF90_FLOAT, NF90_DOUBLE, &
    889889                    NF90_PUT_ATT, NF90_NOERR, nf90_strerror, &
    890890                    nf90_inq_dimid, nf90_inquire_dimension, NF90_INQ_VARID
Note: See TracChangeset for help on using the changeset viewer.