source: LMDZ5/branches/AI-cosp/libf/dyn3dmem/temps.h @ 3485

Last change on this file since 3485 was 1907, checked in by lguez, 11 years ago

Added a copyright property to every file of the distribution, except
for the fcm files (which have their own copyright). Use svn propget on
a file to see the copyright. For instance:

$ svn propget copyright libf/phylmd/physiq.F90
Name of program: LMDZ
Creation date: 1984
Version: LMDZ5
License: CeCILL version 2
Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
See the license file in the root directory

Also added the files defining the CeCILL version 2 license, in French
and English, at the top of the LMDZ tree.

  • Property copyright set to
    Name of program: LMDZ
    Creation date: 1984
    Version: LMDZ5
    License: CeCILL version 2
    Holder: Laboratoire de m\'et\'eorologie dynamique, CNRS, UMR 8539
    See the license file in the root directory
File size: 1015 bytes
Line 
1!
2! $Id$
3!
4!  ATTENTION!!!!: ce fichier include est compatible format fixe/format libre
5!                 veillez  n'utiliser que des ! pour les commentaires
6!                 et  bien positionner les & des lignes de continuation
7!                 (les placer en colonne 6 et en colonne 73)
8!
9!
10! jD_ref = jour julien de la date de reference (lancement de l'experience)
11! hD_ref = "heure" julienne de la date de reference
12!-----------------------------------------------------------------------
13! INCLUDE 'temps.h'
14
15      COMMON/temps/ dt, jD_ref, jH_ref, start_time,                     &
16     &             day_ini, day_end, annee_ref, day_ref,                &
17     &             itau_dyn, itau_phy, itaufin, calend
18
19
20      INTEGER   itaufin
21      INTEGER itau_dyn, itau_phy
22      INTEGER day_ini, day_end, annee_ref, day_ref
23      REAL      dt, jD_ref, jH_ref, start_time
24      CHARACTER (len=10) :: calend
25
26!$OMP THREADPRIVATE(/temps/)
27!-----------------------------------------------------------------------
Note: See TracBrowser for help on using the repository browser.