Changeset 340 for trunk


Ignore:
Timestamp:
Nov 3, 2011, 1:09:53 PM (14 years ago)
Author:
acolaitis
Message:

Minor commit: realigned a few commons

Location:
trunk/LMDZ.MARS/libf
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/LMDZ.MARS/libf/dyn3d/temps.h

    r38 r340  
    22c INCLUDE 'temps.h'
    33
    4       COMMON/temps/itaufin,dt,
     4      COMMON/temps_i/itaufin,
    55     s  day_ini,day_end,anne_ini
     6      COMMON/temps_r/dt
    67
    78      INTEGER  itaufin

  • trunk/LMDZ.MARS/libf/phymars/comdiurn.h

    r38 r340  
    1       COMMON/comdiurn/ldiurn,
    2      s     sinlon(ngridmx),coslon(ngridmx),
    3      s     sinlat(ngridmx),coslat(ngridmx)
     1      COMMON/comdiurn_r/sinlon(ngridmx),coslon(ngridmx),
     2     s        sinlat(ngridmx),coslat(ngridmx)
     3      COMMON/comdiurn_l/ldiurn
     4
    45      REAL sinlon,coslon,sinlat,coslat
    56      LOGICAL ldiurn
Note: See TracChangeset for help on using the changeset viewer.