Go to the source code of this file.
|
subroutine | juldate (ian, imoi, ijou, oh, om, os, tjd, tjdsec) |
|
subroutine juldate |
( |
integer, intent(in) |
ian, |
|
|
integer, intent(in) |
imoi, |
|
|
integer, intent(in) |
ijou, |
|
|
integer, intent(in) |
oh, |
|
|
integer, intent(in) |
om, |
|
|
integer, intent(in) |
os, |
|
|
real, intent(out) |
tjd, |
|
|
real, intent(out) |
tjdsec |
|
) |
| |