Ignore:
Timestamp:
Mar 5, 2009, 10:48:48 AM (16 years ago)
Author:
jghattas
Message:

bug : ENDIF mal placee.
Ce bug se voyait uniquement dans le cas lonlyone=TRUE.
/Anne Cozic

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/LMDZ4-dev/libf/phylmd/readsulfate.F

    r940 r1116  
    154154      CALL getso4fromfile(cyear, so4_2)
    155155
    156       ENDIF
    157  
    158156      ! Interpolate linarily to the actual year:
    159157      DO it=1,12
    … …  
    170168     
    171169      ENDIF !lonlyone
     170      ENDIF !(iyr .lt. 1850)
     171 
    172172     
    173173      ! Transform the horizontal 2D-field into the physics-field
Note: See TracChangeset for help on using the changeset viewer.