Changeset 3363


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

O.M. : add SVN keywords in files

Location:
TOOLS/MOZAIC/src/MOZAIC
Files:
5 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) 
  • TOOLS/MOZAIC/src/MOZAIC/declare.f90

    • Property svn:keywords set to Date Revision HeadURL Author Id Log
    r3326 r3363  
    2424   INTEGER (kind=il), PUBLIC :: nout = 6 !< File number for messages 
    2525   LOGICAL, PUBLIC :: l_d_alloc !< If TRUE, print message about array allocation 
     26   ! 
     27   CHARACTER (LEN=128) :: SVN_Author   = "$Author$" 
     28   CHARACTER (LEN=128) :: SVN_Date     = "$Date$" 
     29   CHARACTER (LEN=128) :: SVN_Revision = "$Revision$" 
    2630   ! 
    2731   PUBLIC chk_allo 
  • TOOLS/MOZAIC/src/MOZAIC/lmdz.f90

    r3326 r3363  
    9191      CASE ('-b') 
    9292         l_build = .TRUE. 
    93     
     93         WRITE ( nout, *) 'Construction LMDZ ' 
     94          
    9495      CASE ('-l') 
    9596         l_restart = .TRUE.  
  • TOOLS/MOZAIC/src/MOZAIC/mosaic.f90

    • Property svn:keywords changed from Date Revision HeadURL Author to Date Revision HeadURL Author Id Log
    r3329 r3363  
    1515   !> $Id$ 
    1616   !> 
    17    !> $Log$ 
     17   !> $Log: $ 
    1818   !> 
    1919   !>  
  • TOOLS/MOZAIC/src/MOZAIC/wri_wei.f90

    r3326 r3363  
    393393            WRITE (nout,*) 'Environment variable not found : $LOGNAME' 
    394394         END IF 
     395         CALL flioputa (il_ncid, "?",  "SVN_Author"   , TRIM (SVN_Author)    ) 
     396         CALL flioputa (il_ncid, "?",  "SVN_Date"     , TRIM (SVN_Date)      ) 
     397         CALL flioputa (il_ncid, "?",  "SVN_Revision" , TRIM (SVN_Revision)  ) 
    395398         ! 
    396399         CALL fliodefv (il_ncid, 'src_grid_dims'      , (/5/)  , v_t=flio_i ) 
     
    789792            WRITE (nout,*) 'Environment variable not found : $LOGNAME' 
    790793         END IF 
     794         CALL flioputa (il_ncid, "?",  "SVN_Author"   , TRIM (SVN_Author)    ) 
     795         CALL flioputa (il_ncid, "?",  "SVN_Date"     , TRIM (SVN_Date)      ) 
     796         CALL flioputa (il_ncid, "?",  "SVN_Revision" , TRIM (SVN_Revision)  ) 
    791797         ! 
    792798         CALL fliodefv (il_ncid, 'src_grid_dims'      , (/5/)  , v_t=flio_i ) 
Note: See TracChangeset for help on using the changeset viewer.