Revision as of 17:19, 17 December 2020 (view source) rosettacode>Jaypee (→‎{{header\|APL}}) ← Older edit		Revision as of 17:20, 17 December 2020 (view source) rosettacode>Jaypee m (→‎{{header\|APL}}) Newer edit →
Line 355: ⍝ 0 = Saturday, 1 = Sunday, 2 = Monday, 3 = Tuesday, 4 = Wednesday, 5 = Thursday, 6 = Friday zeller ← { 7 \| +/ (((1↑⍴⍵),6)⍴1 1 1 1 ¯1 1) × ⌊(((⍴⍵)⍴1 13 1)×⍵+(⍴⍵)⍴0 1 0)[;0 1 2 2 2 2]÷((1↑⍴⍵),6)⍴1 5 1 4 100 400 } result ← (1 = ~~Zeller~~zeller 25,[1]12,[0.5]y) / y </lang> {{out}}

Day of the week: Difference between revisions

Day of the week (view source)