(15C) Julian Day to Day of Week [ISO; 12C Formula]

08262016, 01:39 PM
(This post was last modified: 08272016 08:24 PM by Nick.)
Post: #1




(15C) Julian Day to Day of Week [ISO; 12C Formula]
Formula: ISO Day of Week = JD MOD 7 + 1
 Same formula as 12C [1 = Monday .. 7 = Sunday] Input: X = JD (Julian Day) Output: X = DOW (ISO Day of Week) Size: 15 Bytes Requires: (15C) MM.DDYYYY or DD.MMYYYY to Julian Day [StackOnly] (or equivalent) Note: The stack is not preserved. Enjoy, Nick Code: 01 LBL 0 Comments: 14 INT(x + .5) ' Rounding per precision loss during MOD 

09182016, 05:39 PM
(This post was last modified: 09182016 05:57 PM by Dieter.)
Post: #2




RE: (15C) Julian Day to Day of Week [ISO; 12C Formula]
(08262016 01:39 PM)Nick Wrote: Formula: ISO Day of Week = JD MOD 7 + 1 Yes, using FRAC for the mod function will produce roundoff errors. But why don't you simply do it this way? Code: 01 GSB 0 That's shorter and does not require any rounding. BTW, I assume the first step is not LBL 0 but GSB 0 (to call the JDN routine). ;) While we're at it: may I link to my HP35s calendar programs? They convert from and to JDN, calculate the day of week and implement a ΔDAYS and DATE+ function and more. Dieter 

« Next Oldest  Next Newest »

User(s) browsing this thread: 1 Guest(s)