Ignore:
Timestamp:
Dec 3, 2014, 10:51:56 AM (10 years ago)
Author:
Laurent Fairhead
Message:

Pour pallier une idiosyncracie de gfortran (je ne suis pas pour)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/branches/testing/libf/phylmd/limit_netcdf.F90

    r2160 r2163  
    126126  ELSE
    127127     WRITE(lunout,*) 'ERROR! No sea-ice input file was found.'
    128      WRITE(lunout,*) 'One of following files must be availible : ',trim(famipsic),', ',trim(fcpldsic),', ',trim(fhistsic), trim(feraici)
     128     WRITE(lunout,*) 'One of following files must be available : ',trim(famipsic),', ',&
     129     &                trim(fcpldsic),', ',trim(fhistsic), trim(feraici)
    129130     CALL abort_gcm('limit_netcdf','No sea-ice file was found',1)
    130131  END IF
Note: See TracChangeset for help on using the changeset viewer.