Changeset 1992 for LMDZ5/trunk/libf/phylmd/planete.h
- Timestamp:
- Mar 5, 2014, 2:19:12 PM (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ5/trunk/libf/phylmd/planete.h
r1907 r1992 1 c-----------------------------------------------------------------------2 cINCLUDE planet.h1 !----------------------------------------------------------------------- 2 ! INCLUDE planet.h 3 3 4 COMMON/planet/aphelie,periheli,year_day,peri_day, & 5 & obliquit, & 6 & timeperi,e_elips,p_elips,unitastr 4 COMMON/planet/aphelie,periheli,year_day,peri_day, obliquit, timeperi,& 5 e_elips,p_elips,unitastr 7 6 8 REAL aphelie,periheli,year_day,peri_day, & 9 & obliquit, & 10 & timeperi,e_elips,p_elips,unitastr 7 REAL aphelie,periheli,year_day,peri_day, obliquit, timeperi,e_elips, & 8 p_elips,unitastr 11 9 12 c-----------------------------------------------------------------------10 !----------------------------------------------------------------------- 13 11 !$OMP THREADPRIVATE(/planet/)
Note: See TracChangeset
for help on using the changeset viewer.