Days between dates: Difference between revisions
→{{header|RPL}}
(→{{header|Vlang}}: Rename "Vlang" in "V (Vlang)") |
|||
Line 1,863:
</pre>
=={{header|RPL}}==
{{works with|Halcyon Calc|4.2.7}}
≪ → d m y
≪ m 9 + 12 MOD
y OVER #10d / -
DUP 365 * OVER #4d / + OVER #100d / - SWAP #400d / +
SWAP 306 * 5 + #10d / + d + 1 - B→R
≫ ≫
'GREGN' STO
≪ SWAP 1 2 '''START'''
→ date
≪ date 9 10 SUB STR→ date 6 7 SUB STR→ date 1 4 SUB STR→
GREGN SWAP
≫
'''NEXT''' -
≫
'NBDAYS' STO
"1902-01-01" "1968-12-25" NBDAYS
"2019-01-02" "2019-01-01" NBDAYS
"2019-01-01" "2019-03-01" NBDAYS
"2020-01-01" "2020-03-01" NBDAYS
{{out}}
<pre>
4: 24465
3: -1
2: 59
1: 60
</pre>
=={{header|Ruby}}==
<syntaxhighlight lang="ruby">require "date"
| |||