Ignore:
Timestamp:
Aug 17, 2006, 5:41:51 PM (18 years ago)
Author:
Laurent Fairhead
Message:

Inclusion des modifs de Y. Meurdesoif pour la version V3
LF

File:
1 edited

Legend:

Unmodified
Added
Removed

  • LMDZ4/branches/V3_test/libf/phylmd/suphec.F

    r652 r704  
    99       LOGICAL firstcall
    1010       SAVE firstcall
     11c$OMP THREADPRIVATE(firstcall)
    1112       DATA firstcall /.TRUE./
     13       
    1214       IF (firstcall) THEN
    1315         PRINT*, 'suphec initialise les constantes du GCM'
Note: See TracChangeset for help on using the changeset viewer.