From df31ca48165dd641d69c9f1f02100b50394b6ca2 Mon Sep 17 00:00:00 2001
From: Sebastian Rasmussen <sebras@gmail.com>
Date: Sun, 3 Nov 2019 03:06:57 +0100
Subject: [PATCH] Add handwritten notes to st4.s.

---
 scans/st4.s   | 38 +++++++++++++++++++-------------------
 src/cmd/st4.s | 38 +++++++++++++++++++-------------------
 2 files changed, 38 insertions(+), 38 deletions(-)

diff --git a/scans/st4.s b/scans/st4.s
index 7f1834a..1720189 100644
--- a/scans/st4.s
+++ b/scans/st4.s
@@ -6,27 +6,27 @@ displa: 0
 	sad cplan
 	skp
 	jmp 2f
-	lac locflg
+	lac locflg	"[arrow points here from the text "how to set?" - scan markup]
 	sma
 	jmp 1f
-	fld; cphi
-	fmp; absy
-	fst; ftmp1
-	fld; sphi
-	fmp; absx
-	fad; ftmp1
-	fdv; dpar
-	fst; stheta
-	fld; sphi
-	fmp; absy
-	fng
-	fst; ftmp1
-	fld; cphi
-	fmp; absx
-	fad; ftmp1
-	fdv; dpar
-	fst; ctheta
-	jmp 2f
+	fld; cphi	"[-\                     - scan markup]
+	fmp; absy	"[  |			 - scan markup]
+	fst; ftmp1	"[  |			 - scan markup]
+	fld; sphi	"[  |			 - scan markup]
+	fmp; absx	"[  |			 - scan markup]
+	fad; ftmp1	"[  |			 - scan markup]
+	fdv; dpar	"[  |			 - scan markup]
+	fst; stheta	"[  \  lock calculation	 - scan markup]
+	fld; sphi	"[  /			 - scan markup]
+	fmp; absy	"[  |			 - scan markup]
+	fng		"[  |			 - scan markup]
+	fst; ftmp1	"[  |			 - scan markup]
+	fld; cphi	"[  |			 - scan markup]
+	fmp; absx	"[  |			 - scan markup]
+	fad; ftmp1	"[  |			 - scan markup]
+	fdv; dpar	"[  |			 - scan markup]
+	fst; ctheta	"[  |			 - scan markup]
+	jmp 2f		"[-/			 - scan markup]
 1:
 	fld; sphi
 	fst; stheta
diff --git a/src/cmd/st4.s b/src/cmd/st4.s
index 7f1834a..1720189 100644
--- a/src/cmd/st4.s
+++ b/src/cmd/st4.s
@@ -6,27 +6,27 @@ displa: 0
 	sad cplan
 	skp
 	jmp 2f
-	lac locflg
+	lac locflg	"[arrow points here from the text "how to set?" - scan markup]
 	sma
 	jmp 1f
-	fld; cphi
-	fmp; absy
-	fst; ftmp1
-	fld; sphi
-	fmp; absx
-	fad; ftmp1
-	fdv; dpar
-	fst; stheta
-	fld; sphi
-	fmp; absy
-	fng
-	fst; ftmp1
-	fld; cphi
-	fmp; absx
-	fad; ftmp1
-	fdv; dpar
-	fst; ctheta
-	jmp 2f
+	fld; cphi	"[-\                     - scan markup]
+	fmp; absy	"[  |			 - scan markup]
+	fst; ftmp1	"[  |			 - scan markup]
+	fld; sphi	"[  |			 - scan markup]
+	fmp; absx	"[  |			 - scan markup]
+	fad; ftmp1	"[  |			 - scan markup]
+	fdv; dpar	"[  |			 - scan markup]
+	fst; stheta	"[  \  lock calculation	 - scan markup]
+	fld; sphi	"[  /			 - scan markup]
+	fmp; absy	"[  |			 - scan markup]
+	fng		"[  |			 - scan markup]
+	fst; ftmp1	"[  |			 - scan markup]
+	fld; cphi	"[  |			 - scan markup]
+	fmp; absx	"[  |			 - scan markup]
+	fad; ftmp1	"[  |			 - scan markup]
+	fdv; dpar	"[  |			 - scan markup]
+	fst; ctheta	"[  |			 - scan markup]
+	jmp 2f		"[-/			 - scan markup]
 1:
 	fld; sphi
 	fst; stheta