Horizontal sundial calculations: Difference between revisions
m
→{{header|Wren}}: Minor tidy
m (→{{header|ANSI BASIC}}: lang="basic") |
m (→{{header|Wren}}: Minor tidy) |
||
(One intermediate revision by one other user not shown) | |||
Line 1,386:
=={{header|EasyLang}}==
<syntaxhighlight lang="text">
write s$
v = number input
print v
return v
.
slat = sin lat
diff = lng - merid
Line 1,402 ⟶ 1,403:
print "Hour\tSun hour angle\tDial hour line angle"
for h = -6 to 6
hra = 15 * h - diff
hla = atan2 (slat * sin hra) cos hra
print h + 12 & "\t" & hra & "\t\t" & hla
.
</syntaxhighlight>
Line 3,692 ⟶ 3,693:
{{trans|Go}}
{{libheader|Wren-fmt}}
<syntaxhighlight lang="
import "./fmt" for Fmt
var getNum = Fn.new { |prompt|
|