diff --git a/src/_teco_/teco.1212 b/src/_teco_/teco.1213
similarity index 99%
rename from src/_teco_/teco.1212
rename to src/_teco_/teco.1213
index bf92a7af..b01c1aa7 100755
--- a/src/_teco_/teco.1212
+++ b/src/_teco_/teco.1213
@@ -22343,7 +22343,7 @@ PTLAB:	PUSHJ P,CRR1
 PTLAB9:	MOVEI A,"0
 	HRRM A,DPT5
 	TLZ FF,FLNEG
-IRPS Q,R,[270400/220500/330700]
+IRPS Q,R,[270400/220500/330800]
 	LDB C,[Q,,PTLFCD]
 	MOVEI TT,1
 	PUSHJ P,DPT1