From 1d0242daa1a349e3508fee1ac5f1bcb80228d09d Mon Sep 17 00:00:00 2001
From: Kelvin Sherlock <ksherlock@gmail.com>
Date: Thu, 15 Mar 2018 23:04:25 -0400
Subject: [PATCH] bug in division routines.

see byteworksinc/ORCA-C@f4ad0fa#diff-321d85ea2e19d2a7f2555cfa70cbef7e
---
 dag.asm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/dag.asm b/dag.asm
index 9b045d8..fb203f7 100644
--- a/dag.asm
+++ b/dag.asm
@@ -40,7 +40,7 @@ dv3      asl   ans                      roll up the next number
          rol   ans+6
          sec                            subtract for this digit
          lda   ans+4
-         sbc   num1
+         sbc   num2
          tax
          lda   ans+6
          sbc   num2+2
@@ -117,7 +117,7 @@ dv3      asl   ans                      roll up the next number
          rol   ans+6
          sec                            subtract for this digit
          lda   ans+4
-         sbc   num1
+         sbc   num2
          tax
          lda   ans+6
          sbc   num2+2