Changeset 1226 for trunk/LMDZ.MARS/libf/phymars/orbite.F
- Timestamp:
- Apr 15, 2014, 11:46:48 PM (11 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/libf/phymars/orbite.F
r38 r1226 1 1 SUBROUTINE orbite(pls,pdist_sol,pdecli) 2 use planete_h 3 USE comcstfi_h 2 4 IMPLICIT NONE 3 5 … … 32 34 c ------------- 33 35 34 #include "planete.h"35 #include "comcstfi.h"36 37 36 c arguments: 38 37 c ----------
Note: See TracChangeset
for help on using the changeset viewer.