Ignore:
Timestamp:
Mar 9, 2005, 1:30:16 PM (19 years ago)
Author:
Laurent Fairhead
Message:

Sortie de prw du if sur iflag_con FH
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/trunk/libf/phylmd/write_histmth.h

    r524 r602  
    438438c34EK
    439439c
     440      ENDIF !iflag_con.GE.3
     441c
    440442      CALL gr_fi_ecrit(1, klon,iim,jjmp1, prw,zx_tmp_2d)
    441443      CALL histwrite(nid_mth,"prw",itau_w,zx_tmp_2d,
    442444     .               iim*jjmp1,ndex2d)
    443445c
    444       ENDIF !iflag_con.GE.3
    445446c
    446447c
Note: See TracChangeset for help on using the changeset viewer.