表作成のコンピュータプログラム例を，以下に示す。
これは，html で実行する PHP プログラムである。
<![CDATA[ ";
(モジュールA を挿入)
/* 表ヘッダ *************************************/
print "
<table><tr><td>
南中の太陽の方角を向いたときの
<br> 日出/日入の方角 (東/西に何度)
<br> 南中太陽の仰角余角
<br>(北緯 ".$a_degree." 度の場合)
</td></tr></table>
<table cellpadding=2><tr><td></td></tr></table>
<table border=1 cellspacing=0>
<tr>
<td>公転角度</td>
<td align=center> 日出/日入 </td>
<td align=center> 南中 </td>
</tr>
";
/* 表生成ループ *************************************/
for( $i = $t_from_degree; $i < $t_to_degree; $i = $i + $t_u_degree ){
/* 南中と日出の経度差 ****/
$midsun = $midsun_deg[$i];
$sunrise = $sunrise_deg[$i];
if( $sunrise > $midsun ){
$midsun = $midsun + 360;
}
$d = round( $midsun - $sunrise, 0 );
/* レコード (表の１行分) 書き出し ****/
print "
<tr>
<td align=center>".$i."</td>
<td align=center>".$d."</td>
<td align=center>".$alpha_deg[$i]."</td>
</tr>
";
}
print "
</table>
]]>
|