Ignore:
Timestamp:
08/23/17 15:08:50 (7 years ago)
Author:
omamce
Message:

O.M. : add SVN keywords in files

File:
1 edited

Legend:

Unmodified
Added
Removed

  • TOOLS/MOZAIC/src/MOZAIC/cotes_etal.f90

    r3326 r3363  
    225225      WRITE (nout,*) 'Environment variable not found : $LOGNAME' 
    226226   END IF 
    227  
     227   CALL flioputa (il_ncid, "?",  "SVN_Author"   , TRIM (SVN_Author)    ) 
     228   CALL flioputa (il_ncid, "?",  "SVN_Date"     , TRIM (SVN_Date)      ) 
     229   CALL flioputa (il_ncid, "?",  "SVN_Revision" , TRIM (SVN_Revision)  ) 
     230          
    228231   CALL fliodefv (nid_it, 'laland'      , (/1,2/), v_t=flio_i4) 
    229232   CALL fliodefv (nid_it, 'lacot'       , (/1,2/), v_t=flio_i4) 
    … …  
    269272      WRITE (nout,*) 'Environment variable not found : $LOGNAME' 
    270273   END IF 
    271  
     274   CALL flioputa (il_ncid, "?",  "SVN_Author"   , TRIM (SVN_Author)    ) 
     275   CALL flioputa (il_ncid, "?",  "SVN_Date"     , TRIM (SVN_Date)      ) 
     276   CALL flioputa (il_ncid, "?",  "SVN_Revision" , TRIM (SVN_Revision)  ) 
     277    
    272278   CALL fliodefv (nid_id, 'locot'       , (/1,2/), v_t=flio_i4) 
    273279   CALL fliodefv (nid_id, 'looce'       , (/1,2/), v_t=flio_i4) 
Note: See TracChangeset for help on using the changeset viewer.