MODULE lmdz_planete
  IMPLICIT NONE; PRIVATE
  PUBLIC aphelie, periheli, year_day, peri_day, obliquit, timeperi, e_elips, p_elips, unitastr

  REAL aphelie, periheli, year_day, peri_day, obliquit, timeperi, e_elips, &
          p_elips, unitastr

  !$OMP THREADPRIVATE(aphelie, periheli, year_day, peri_day, obliquit, timeperi, e_elips, p_elips, unitastr)
END MODULE lmdz_planete