MODULE planete_mod_h
  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 planete_mod_h
