French Republican calendar: Difference between revisions
m
→{{header|BBC BASIC}}
(added FreeBASIC) |
|||
Line 21:
=={{header|BBC BASIC}}==
Version is not broken, bugfix only , see talk page.
Computes leap years using the "continuous" method: a year in the Republican calendar is a leap year if and only if the number of the <i>following</i> year is divisible by 4 but not by 100 unless also by 400. No attempt is made to deal with ill-formed or invalid input dates.
<lang bbcbasic>REM >frrepcal
Line 148:
m% = 1
y% += 1
IF FN_rep_leap(y%) THEN sansculottides% = 6 ELSE sansculottides% = 5
ENDIF
ENDIF
Line 196 ⟶ 197:
> 19 September 2016
Fete du travail 224</pre>
=={{header|FreeBASIC}}==
<lang freebasic>' version 18 Pluviose 227
| |||