author : | 小松 研吾 (KOMATSU Kengo)
|
version : | 1.0
|
date : | 2006/03/05
|
copyright : | Copyright (c) K.K, 2006. All rights reserved.
|
説明
時間に関する subroutines, functions 。
このプログラム中のサブルーチン MJD の中では julday というサブルーチン
を使用しています。これは Numerical Recipes
in Fortran 90 の B1 Preliminaries に書かれているものです。また、この
julday は同じく 21 Introduction to Fortran 90 Language Features
内に書かれている nrutil と nrtype に依存しています。
readDate : | 年、月、日、時、分、秒を標準入力から読み込む。
|
DayOfYear : | 入力日時から変数 year の通日 (Day of Year) を返す。 1月1日0時(UT) は Day of
Year 1.0 日としています。
|
MJD : | 入力日時から修正ユリウス通日を返す。
|