From f6eb78090ecd90d0bf1c628e4391eda6664c6268 Mon Sep 17 00:00:00 2001
From: Lars Brinkhoff <lars@nocrew.org>
Date: Tue, 2 Oct 2018 03:45:21 +0200
Subject: [PATCH] Fix "PI RAM" to print pi rather than Z(3).

---
 src/rwg/{ran.36 => ran.37} | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
 rename src/rwg/{ran.36 => ran.37} (99%)

diff --git a/src/rwg/ran.36 b/src/rwg/ran.37
similarity index 99%
rename from src/rwg/ran.36
rename to src/rwg/ran.37
index fc7e652b..687155f0 100755
--- a/src/rwg/ran.36
+++ b/src/rwg/ran.37
@@ -17,7 +17,7 @@ GO:	IFDEF DECSW,[RESET ? MOVE A,[SIXBIT /DAAAAA/] ? MOVEM A,E2
 	SETCAM A,TCT'
 	AOS B,Q
 	MOVEM B,T
-func:	MOVEI J,ZET3	;OR ATAN OR LOGX1
+func:	MOVEI J,ATAN	;OR ZET3 OR LOGX1
 DOPEN:	PUSHJ P,AOPEN
 AG1:	PUSHJ P,4FLT
 	JFCL 8,AGAIN	;OV