Changeset 2275 for LMDZ5/branches


Ignore:
Timestamp:
May 13, 2015, 6:07:41 PM (9 years ago)
Author:
Laurent Fairhead
Message:

Backport of trunk r2229 in LMDZ6_rc0 branch

  • calendar modifications
Location:
LMDZ5/branches/LMDZ6_rc0/libf
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/branches/LMDZ6_rc0/libf/dyn3d/gcm.F

    r2160 r2275  
    215215        call ioconf_calendar('noleap')
    216216        write(lunout,*)'CALENDRIER CHOISI: Terrestre a 365 jours/an'
    217       else if (calend == 'earth_366d') then
     217      else if (calend == 'gregorian') then
    218218        call ioconf_calendar('gregorian')
    219219        write(lunout,*)'CALENDRIER CHOISI: Terrestre bissextile'
     
    316316
    317317C
    318 C on remet le calendrier à zero si demande
     318C on remet le calendrier \`a zero si demande
    319319c
    320320      IF (start_time /= starttime) then
    321321        WRITE(lunout,*)' GCM: Attention l''heure de depart lue dans le'
    322      &,' fichier restart ne correspond pas à celle lue dans le run.def'
     322     &,' fichier restart ne correspond pas a celle lue dans le run.def'
    323323        IF (raz_date == 1) then
    324324          WRITE(lunout,*)'Je prends l''heure lue dans run.def'
  • LMDZ5/branches/LMDZ6_rc0/libf/dyn3dmem/gcm.F

    r2160 r2275  
    225225        call ioconf_calendar('noleap')
    226226        write(lunout,*)'CALENDRIER CHOISI: Terrestre a 365 jours/an'
    227       else if (calend == 'earth_366d') then
     227      else if (calend == 'gregorian') then
    228228        call ioconf_calendar('gregorian')
    229229        write(lunout,*)'CALENDRIER CHOISI: Terrestre bissextile'
     
    321321
    322322C
    323 C on remet le calendrier à zero si demande
     323C on remet le calendrier \`a zero si demande
    324324c
    325325      IF (start_time /= starttime) then
    326326        WRITE(lunout,*)' GCM: Attention l''heure de depart lue dans le'
    327      &,' fichier restart ne correspond pas à celle lue dans le run.def'
     327     &,' fichier restart ne correspond pas a celle lue dans le run.def'
    328328        IF (raz_date == 1) then
    329329          WRITE(lunout,*)'Je prends l''heure lue dans run.def'
Note: See TracChangeset for help on using the changeset viewer.