From 96348c69b72e789f05a98403218463ed5c8cf736 Mon Sep 17 00:00:00 2001 From: d_m Date: Sun, 28 Jul 2024 16:22:13 -0400 Subject: [PATCH] use EOR2 instead of MUL2 to avoid problems with zero --- cards.tal | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/cards.tal b/cards.tal index a0e34bd..2ad5bd3 100644 --- a/cards.tal +++ b/cards.tal @@ -139,7 +139,7 @@ #00 .DateTime/hr DEI #0e10 MUL2 ADD2 #00 .DateTime/min DEI #003c MUL2 ADD2 #00 .DateTime/sec DEI ADD2 ( s* ) - DUP2 .DateTime/doy DEI2 MUL2 ( s* sdoy* ) + DUP2 .DateTime/doy DEI2 EOR2 ( s* sdoy* ) #0001 ROT2 OVR2 ( y* 1* x* 1* ) ORA2 ;rng-x STA2 ( y* 1* ) ORA2 ;rng-x STA2 JMP2r ( )