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