Parent Directory
|
Revision Log
|
Patch
| revision 1.9 by mocchiut, Fri Jan 17 09:54:31 2014 UTC | revision 1.10 by mocchiut, Fri Aug 29 07:06:41 2014 UTC | |
|---|---|---|
| # | Line 947 C ERA, EREQU and ERPOL as recommended by | Line 947 C ERA, EREQU and ERPOL as recommended by |
| 947 | C ASTRONOMICAL UNION . | C ASTRONOMICAL UNION . |
| 948 | C----------------------------------------------------------------- | C----------------------------------------------------------------- |
| 949 | INTEGER TL1,TL2,TL3 | INTEGER TL1,TL2,TL3 |
| 950 | CHARACTER (len=258) TP1,TP2,TP3 | CHARACTER (len=*) :: TP1,TP2,TP3 |
| 951 | INTEGER L1,L2,L3 | INTEGER L1,L2,L3 |
| 952 | CHARACTER *258 P1,P2,P3 | CHARACTER *258 P1,P2,P3 |
| 953 | COMMON/PPATH/ L1,L2,L3,P1, P2, P3 | COMMON/PPATH/ L1,L2,L3,P1, P2, P3 |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.23 |