source: LMDZ6/branches/Amaury_dev/libf/phylmd/lmdz_planete.f90 @ 5151

Last change on this file since 5151 was 5142, checked in by abarral, 3 months ago

Put cvparam.h, fcg_gcssold.h, planete.h, tsoilnudge.h, YOECUMF.h into modules

  • 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: 380 bytes
RevLine 
[5142]1MODULE lmdz_planete
2  IMPLICIT NONE; PRIVATE
3  PUBLIC aphelie, periheli, year_day, peri_day, obliquit, timeperi, e_elips, p_elips, unitastr
[1205]4
[5142]5  REAL aphelie, periheli, year_day, peri_day, obliquit, timeperi, e_elips, &
6          p_elips, unitastr
[1205]7
[5142]8  !$OMP THREADPRIVATE(aphelie, periheli, year_day, peri_day, obliquit, timeperi, e_elips, p_elips, unitastr)
9END MODULE lmdz_planete
Note: See TracBrowser for help on using the repository browser.