Horizontal sundial calculations: Difference between revisions
J: avoid principal value issue
(Added BBC BASIC) |
(J: avoid principal value issue) |
||
Line 492:
'Diff longitude ' out -diff=. ref - lng
lbl=.'hour ';'sun hour angle ';'dial hour line angle'
r=.((,. (,. ({:@*.@j. *&slat
smoutput lbl ,: ('3.0';'7.3';'7.3') 8!:1 r
)</lang>
Line 519:
│ 4 │ 60.500 │ -8.671 │
│ 5 │ 75.500 │-18.451 │
│ 6 │ 90.500 │
└──────┴────────────────┴────────────────────┘</lang>
| |||