Ignore:
Timestamp:
Jan 12, 2011, 4:07:43 PM (13 years ago)
Author:
Laurent Fairhead
Message:

Sortie supplémentaire FH


Additionnal output FH

File:
1 edited

Legend:

Unmodified
Added
Removed
  • LMDZ5/branches/LMDZ5V2.0-dev/libf/phylmd/phys_output_write.h

    r1403 r1473  
    104104     s                   o_psol%name,itau_w,zx_tmp_fi2d)
    105105       ENDIF
     106
     107       IF (o_mass%flag(iff)<=lev_files(iff)) THEN
     108      CALL histwrite_phy(nid_files(iff),o_mass%name,itau_w,zmasse)
     109        ENDIF
     110
    106111
    107112       IF (o_qsurf%flag(iff)<=lev_files(iff)) THEN
Note: See TracChangeset for help on using the changeset viewer.