From: Eric S. Raymond <esr@thyrsus.com>
Date: Thu, 26 Aug 2010 08:40:48 +0000 (-0400)
Subject: Rename base 3-7 system libraries to be unique without extension.
X-Git-Tag: 0.29~114
X-Git-Url: http://thyrsus.com/gitweb/?a=commitdiff_plain;h=f37e2767b83d426a8097e5bd4b55cf146a5cd347;p=intercal.git

Rename base 3-7 system libraries to be unique without extension.

This eliminates the need for some ugly special-casing in the test system.
---

diff --git a/.gitignore b/.gitignore
index e5a3006..0552c62 100644
--- a/.gitignore
+++ b/.gitignore
@@ -18,12 +18,12 @@ oil
 # C source files and includes in the top directory were copied there, ignore
 *.[chyl]
 # So were any copies of the INTERCAL libraries we might find here
-syslib.3i
-syslib.4i
-syslib.5i
-syslib.6i
-syslib.7i
 syslib.i
+syslib3.3i
+syslib4.4i
+syslib5.5i
+syslib6.6i
+syslib7.7i
 # Other generated stuff
 doc/*info*
 doc/*.htm
diff --git a/README b/README
index 4dcade9..7ad34b1 100644
--- a/README
+++ b/README
@@ -97,7 +97,7 @@ aclocal.m4              -- helper file needed to build the build system itself
 
 pit/*                   -- sample INTERCAL code; see pit/CATALOG
 pit/explib/*            -- source code for expansion libraries
-pit/lib/syslib.*i       -- source code for the system libraries
+pit/lib/syslib*.*i      -- source code for the system libraries
 
                               HOW TO GET STARTED
 
diff --git a/buildaux/Makefile.am b/buildaux/Makefile.am
index dbeae49..2a5ca7e 100644
--- a/buildaux/Makefile.am
+++ b/buildaux/Makefile.am
@@ -22,16 +22,16 @@ pickwrap.c : src/pickwrap.c
 	$(LN_S) `test -f 'src/pickwrap.c' || echo '$(srcdir)/'`src/pickwrap.c pickwrap.c
 syslib.i : pit/lib/syslib.i
 	$(LN_S) `test -f 'pit/lib/syslib.i' || echo '$(srcdir)/'`pit/lib/syslib.i syslib.i
-syslib.3i : pit/lib/syslib.3i
-	$(LN_S) `test -f 'pit/lib/syslib.3i' || echo '$(srcdir)/'`pit/lib/syslib.3i syslib.3i
-syslib.4i : pit/lib/syslib.4i
-	$(LN_S) `test -f 'pit/lib/syslib.4i' || echo '$(srcdir)/'`pit/lib/syslib.4i syslib.4i
-syslib.5i : pit/lib/syslib.5i
-	$(LN_S) `test -f 'pit/lib/syslib.5i' || echo '$(srcdir)/'`pit/lib/syslib.5i syslib.5i
-syslib.6i : pit/lib/syslib.6i
-	$(LN_S) `test -f 'pit/lib/syslib.6i' || echo '$(srcdir)/'`pit/lib/syslib.6i syslib.6i
-syslib.7i : pit/lib/syslib.7i
-	$(LN_S) `test -f 'pit/lib/syslib.7i' || echo '$(srcdir)/'`pit/lib/syslib.7i syslib.7i
+syslib3.3i : pit/lib/syslib3.3i
+	$(LN_S) `test -f 'pit/lib/syslib.3i' || echo '$(srcdir)/'`pit/lib/syslib3.3i syslib3.3i
+syslib4.4i : pit/lib/syslib4.4i
+	$(LN_S) `test -f 'pit/lib/syslib.4i' || echo '$(srcdir)/'`pit/lib/syslib4.4i syslib4.4i
+syslib5.5i : pit/lib/syslib5.5i
+	$(LN_S) `test -f 'pit/lib/syslib.5i' || echo '$(srcdir)/'`pit/lib/syslib5.5i syslib5.5i
+syslib6.6i : pit/lib/syslib6.6i
+	$(LN_S) `test -f 'pit/lib/syslib.6i' || echo '$(srcdir)/'`pit/lib/syslib6.6i syslib6.6i
+syslib7.7i : pit/lib/syslib7.7i
+	$(LN_S) `test -f 'pit/lib/syslib.7i' || echo '$(srcdir)/'`pit/lib/syslib7.7i syslib7.7i
 ick_ec.h : src/ick_ec.h
 	$(LN_S) `test -f 'src/ick_ec.h' || echo '$(srcdir)/'`src/ick_ec.h ick_ec.h
 ick_lose.h : src/ick_lose.h
@@ -47,8 +47,8 @@ AM_YFLAGS = -d
 # BUILT_SOURCES is used both to make sure parser.h is built early, and to
 # create symlinks used by ick to find files if it's run without first being
 # installed.
-BUILT_SOURCES = parser.h ick-wrap.c pickwrap.c syslib.i syslib.3i syslib.4i \
-                syslib.5i syslib.6i syslib.7i ick_ec.h fiddle.h abcess.h \
+BUILT_SOURCES = parser.h ick-wrap.c pickwrap.c syslib.i syslib3.3i syslib4.4i \
+                syslib5.5i syslib6.6i syslib7.7i ick_ec.h fiddle.h abcess.h \
                 ick_lose.h yuk.h
 noinst_LIBRARIES = libidiot.a
 libidiot_a_SOURCES = src/idiotism.oil
@@ -107,8 +107,8 @@ dist_ickdata_DATA = src/atari.bin src/baudot.bin src/ebcdic.bin src/latin1.bin \
                     src/ick-wrap.c src/pickwrap.c COPYING
 # These necessary pit files are in nodist_ here because they're in EXTRA_DIST
 # later along with the rest of the pit.
-nodist_ickdata_DATA = pit/lib/syslib.i pit/lib/syslib.3i pit/lib/syslib.4i \
-                      pit/lib/syslib.5i pit/lib/syslib.6i pit/lib/syslib.7i \
+nodist_ickdata_DATA = pit/lib/syslib.i pit/lib/syslib3.3i pit/lib/syslib4.4i \
+                      pit/lib/syslib5.5i pit/lib/syslib6.6i pit/lib/syslib7.7i \
                       coopt.sh pit/explib/syslibc.c pit/explib/compunex.c \
                       pit/explib/ecto_b98.c
 dist_man1_MANS = doc/ick.1 doc/convickt.1
@@ -154,8 +154,8 @@ $(srcdir)/MANIFEST: distdir
 # links made to simplify the build, not the originals
 CLEANFILES = oilout*.c parser.y lexer.l ick-wrap.c pickwrap.c \
              atari.c baudot.c ebcdic.c latin1.c ick.dvi \
-             syslib.i syslib.3i syslib.4i syslib.5i \
-             syslib.6i syslib.7i ick_ec.h fiddle.h abcess.h \
+             syslib.i syslib3.3i syslib4.4i syslib5.5i \
+             syslib6.6i syslib7.7i ick_ec.h fiddle.h abcess.h \
              ick_lose.h yuk.h
 # Distclean deletes the Makefile and thus requires reconfiguring,
 # and therefore this is a safe moment to delete the build tree
diff --git a/buildaux/Makefile.in b/buildaux/Makefile.in
index 109d75a..f12ef9d 100644
--- a/buildaux/Makefile.in
+++ b/buildaux/Makefile.in
@@ -1,4 +1,4 @@
-# Makefile.in generated by automake 1.11 from Makefile.am.
+# Makefile.in generated by automake 1.11.1 from Makefile.am.
 # @configure_input@
 
 # Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
@@ -295,8 +295,8 @@ AM_YFLAGS = -d
 # BUILT_SOURCES is used both to make sure parser.h is built early, and to
 # create symlinks used by ick to find files if it's run without first being
 # installed.
-BUILT_SOURCES = parser.h ick-wrap.c pickwrap.c syslib.i syslib.3i syslib.4i \
-                syslib.5i syslib.6i syslib.7i ick_ec.h fiddle.h abcess.h \
+BUILT_SOURCES = parser.h ick-wrap.c pickwrap.c syslib.i syslib3.3i syslib4.4i \
+                syslib5.5i syslib6.6i syslib7.7i ick_ec.h fiddle.h abcess.h \
                 ick_lose.h yuk.h
 
 noinst_LIBRARIES = libidiot.a
@@ -331,8 +331,8 @@ dist_ickdata_DATA = src/atari.bin src/baudot.bin src/ebcdic.bin src/latin1.bin \
 
 # These necessary pit files are in nodist_ here because they're in EXTRA_DIST
 # later along with the rest of the pit.
-nodist_ickdata_DATA = pit/lib/syslib.i pit/lib/syslib.3i pit/lib/syslib.4i \
-                      pit/lib/syslib.5i pit/lib/syslib.6i pit/lib/syslib.7i \
+nodist_ickdata_DATA = pit/lib/syslib.i pit/lib/syslib3.3i pit/lib/syslib4.4i \
+                      pit/lib/syslib5.5i pit/lib/syslib6.6i pit/lib/syslib7.7i \
                       coopt.sh pit/explib/syslibc.c pit/explib/compunex.c \
                       pit/explib/ecto_b98.c
 
@@ -354,8 +354,8 @@ EXTRA_DIST = pit etc BUGS src/abcess.h src/feh.h src/fiddle.h src/ick_ec.h \
 # links made to simplify the build, not the originals
 CLEANFILES = oilout*.c parser.y lexer.l ick-wrap.c pickwrap.c \
              atari.c baudot.c ebcdic.c latin1.c ick.dvi \
-             syslib.i syslib.3i syslib.4i syslib.5i \
-             syslib.6i syslib.7i ick_ec.h fiddle.h abcess.h \
+             syslib.i syslib3.3i syslib4.4i syslib5.5i \
+             syslib6.6i syslib7.7i ick_ec.h fiddle.h abcess.h \
              ick_lose.h yuk.h
 
 # Distclean deletes the Makefile and thus requires reconfiguring,
@@ -1159,7 +1159,8 @@ distdir: $(DISTFILES)
 	  top_distdir="$(top_distdir)" distdir="$(distdir)" \
 	  dist-info dist-hook
 	-test -n "$(am__skip_mode_fix)" \
-	|| find "$(distdir)" -type d ! -perm -777 -exec chmod a+rwx {} \; -o \
+	|| find "$(distdir)" -type d ! -perm -755 \
+		-exec chmod u+rwx,go+rx {} \; -o \
 	  ! -type d ! -perm -444 -links 1 -exec chmod a+r {} \; -o \
 	  ! -type d ! -perm -400 -exec chmod a+r {} \; -o \
 	  ! -type d ! -perm -444 -exec $(install_sh) -c -m a+r {} {} \; \
@@ -1203,17 +1204,17 @@ dist dist-all: distdir
 distcheck: dist
 	case '$(DIST_ARCHIVES)' in \
 	*.tar.gz*) \
-	  GZIP=$(GZIP_ENV) gunzip -c $(distdir).tar.gz | $(am__untar) ;;\
+	  GZIP=$(GZIP_ENV) gzip -dc $(distdir).tar.gz | $(am__untar) ;;\
 	*.tar.bz2*) \
-	  bunzip2 -c $(distdir).tar.bz2 | $(am__untar) ;;\
+	  bzip2 -dc $(distdir).tar.bz2 | $(am__untar) ;;\
 	*.tar.lzma*) \
-	  unlzma -c $(distdir).tar.lzma | $(am__untar) ;;\
+	  lzma -dc $(distdir).tar.lzma | $(am__untar) ;;\
 	*.tar.xz*) \
 	  xz -dc $(distdir).tar.xz | $(am__untar) ;;\
 	*.tar.Z*) \
 	  uncompress -c $(distdir).tar.Z | $(am__untar) ;;\
 	*.shar.gz*) \
-	  GZIP=$(GZIP_ENV) gunzip -c $(distdir).shar.gz | unshar ;;\
+	  GZIP=$(GZIP_ENV) gzip -dc $(distdir).shar.gz | unshar ;;\
 	*.zip*) \
 	  unzip $(distdir).zip ;;\
 	esac
@@ -1515,16 +1516,16 @@ pickwrap.c : src/pickwrap.c
 	$(LN_S) `test -f 'src/pickwrap.c' || echo '$(srcdir)/'`src/pickwrap.c pickwrap.c
 syslib.i : pit/lib/syslib.i
 	$(LN_S) `test -f 'pit/lib/syslib.i' || echo '$(srcdir)/'`pit/lib/syslib.i syslib.i
-syslib.3i : pit/lib/syslib.3i
-	$(LN_S) `test -f 'pit/lib/syslib.3i' || echo '$(srcdir)/'`pit/lib/syslib.3i syslib.3i
-syslib.4i : pit/lib/syslib.4i
-	$(LN_S) `test -f 'pit/lib/syslib.4i' || echo '$(srcdir)/'`pit/lib/syslib.4i syslib.4i
-syslib.5i : pit/lib/syslib.5i
-	$(LN_S) `test -f 'pit/lib/syslib.5i' || echo '$(srcdir)/'`pit/lib/syslib.5i syslib.5i
-syslib.6i : pit/lib/syslib.6i
-	$(LN_S) `test -f 'pit/lib/syslib.6i' || echo '$(srcdir)/'`pit/lib/syslib.6i syslib.6i
-syslib.7i : pit/lib/syslib.7i
-	$(LN_S) `test -f 'pit/lib/syslib.7i' || echo '$(srcdir)/'`pit/lib/syslib.7i syslib.7i
+syslib3.3i : pit/lib/syslib3.3i
+	$(LN_S) `test -f 'pit/lib/syslib.3i' || echo '$(srcdir)/'`pit/lib/syslib3.3i syslib3.3i
+syslib4.4i : pit/lib/syslib4.4i
+	$(LN_S) `test -f 'pit/lib/syslib.4i' || echo '$(srcdir)/'`pit/lib/syslib4.4i syslib4.4i
+syslib5.5i : pit/lib/syslib5.5i
+	$(LN_S) `test -f 'pit/lib/syslib.5i' || echo '$(srcdir)/'`pit/lib/syslib5.5i syslib5.5i
+syslib6.6i : pit/lib/syslib6.6i
+	$(LN_S) `test -f 'pit/lib/syslib.6i' || echo '$(srcdir)/'`pit/lib/syslib6.6i syslib6.6i
+syslib7.7i : pit/lib/syslib7.7i
+	$(LN_S) `test -f 'pit/lib/syslib.7i' || echo '$(srcdir)/'`pit/lib/syslib7.7i syslib7.7i
 ick_ec.h : src/ick_ec.h
 	$(LN_S) `test -f 'src/ick_ec.h' || echo '$(srcdir)/'`src/ick_ec.h ick_ec.h
 ick_lose.h : src/ick_lose.h
diff --git a/doc/ick.txi b/doc/ick.txi
index 528291f..a412094 100644
--- a/doc/ick.txi
+++ b/doc/ick.txi
@@ -3784,7 +3784,8 @@ expression.)
 
 @portability{yes, all versions, no, all versions}
 
-@ical{} has a system library, called @samp{syslib}.  It is included
+@ical{} has a system library, called @samp{syslib} (versions for bases
+other than 2 will have a numeric suffix on the name).  It is included
 automatically at the end of your program by the compiler whenever your
 program refers to a line from (1000) to (1999) without defining any
 line in that range in the program.  (Although it is not added
@@ -3814,7 +3815,7 @@ aiming at them.
 The system library is currently available in all bases from 2 to 7
 (@pxref{TriINTERCAL}), but not every command is available in every
 base, and @cic{} is the only one of the three compilers listed above
-that use the system library to ship with a version in bases other than
+that has the system library to ship with a version in bases other than
 2.  (This table was originally based on the @icst{} manual, but has
 had extra information added for bases other than 2.) Here, ``overflow
 checked'' means that #1 is assigned to .4 if there is not an overflow,
diff --git a/pit/CATALOG b/pit/CATALOG
index 2e8a95e..68e719e 100644
--- a/pit/CATALOG
+++ b/pit/CATALOG
@@ -74,11 +74,11 @@ by Clemens Meier <clmeier@lili.uni-bielefeld.de>
 By Brian Raiter <breadbox@muppetlabs.com>
   lib/numio.i	    I/O routines
   lib/numio.doc	    Description of the I/O routines
-  lib/syslib.3i
-  lib/syslib.4i
-  lib/syslib.5i
-  lib/syslib.6i     Translations of the standard library to
-  lib/syslib.7i     C-INTERCAL's other bases.
+  lib/syslib3.3i
+  lib/syslib4.4i
+  lib/syslib5.5i
+  lib/syslib6.6i    Translations of the standard library to
+  lib/syslib7.7i    C-INTERCAL's other bases.
   lib/syslib3-7.doc Documentation for same
   tests/hello.i     + The traditional hello world program
   ins.i             Intersections & Splats, a Mastermind-style game
diff --git a/pit/Makefile b/pit/Makefile
index 3223040..4313581 100644
--- a/pit/Makefile
+++ b/pit/Makefile
@@ -101,26 +101,6 @@ test: $(TARGETS)
 tests/permute: tests/permute.i
 	$(ICK) -m tests/permute.i
 
-./lib/syslib3: ./lib/syslib.3i
-	cp ./lib/syslib.3i ./lib/syslib3.3i
-	$(ICK) ./lib/syslib3.3i
-
-./lib/syslib4: ./lib/syslib.4i
-	cp ./lib/syslib.4i ./lib/syslib4.4i
-	$(ICK) ./lib/syslib4.4i
-
-./lib/syslib5: ./lib/syslib.5i
-	cp ./lib/syslib.5i ./lib/syslib5.5i
-	$(ICK) ./lib/syslib5.5i
-
-./lib/syslib6: ./lib/syslib.6i
-	cp ./lib/syslib.6i ./lib/syslib6.6i
-	$(ICK) ./lib/syslib6.6i
-
-./lib/syslib7: ./lib/syslib.7i
-	cp ./lib/syslib.7i ./lib/syslib7.7i
-	$(ICK) ./lib/syslib7.7i
-
 ./tests/limits3: ./tests/limits.3i
 	cp ./tests/limits.3i ./tests/limits3.3i
 	$(ICK) ./tests/limits3.3i
@@ -137,5 +117,5 @@ lines:
 	wc -l $(SOURCES)
 
 clean:
-	rm -f $(TARGETS) *.c *.o *~ lib/syslib?.?i 
+	rm -f $(TARGETS) *.c *.o *~
 	rm tests/limits3.3i tests/testops3.3i tests/testops5.5i
diff --git a/pit/lib/syslib.3i b/pit/lib/syslib.3i
deleted file mode 100644
index fd1ea3c..0000000
--- a/pit/lib/syslib.3i
+++ /dev/null
@@ -1,323 +0,0 @@
-		PLEASE KNOCK THREE TIMES BEFORE ENTERING
-
-	(1000)	PLEASE IGNORE .4
-		PLEASE ABSTAIN FROM (1005)
-	(1009)	DO STASH .1 + .2 + .5 + .6
-		DO .4 <- #1
-		DO (1004) NEXT
-	(1004)	PLEASE FORGET #1
-		DO .3 <- '^.1$.2'~'#0$#29524'
-		DO .6 <- '?"'V"'&.1$.2'~'#0$#29524'"$#29524'
-		     ~'#0$#29524'"$#29524'~'#0$#29524'
-		PLEASE DO .5 <- 'V".6~#39366"$#1'~#1
-		DO (1002) NEXT
-		DO .4 <- #2
-	(1005)	DO (1006) NEXT
-	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
-	(1002)	DO (1001) NEXT
-	(1006)	PLEASE FORGET #1
-		DO .5 <- 'V"!6~.6'~#2"$#1'~#1
-		DO (1003) NEXT
-		DO .1 <- .3
-		DO .2 <- !6$#0'~'#9841$#1'
-		DO (1004) NEXT
-	(1003)	DO (1001) NEXT
-		DO REINSTATE (1005)
-	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
-		DO REMEMBER .4
-		PLEASE RESUME #2
-	(1001)	DO RESUME .5
-	(1010)	DO STASH .1 + .2 + .4
-		DO .4 <- .1
-		DO .1 <- '?#59048$.2'~'#0$#29524'
-		DO (1020) NEXT
-		PLEASE DO .2 <- .4
-		PLEASE DO (1009) NEXT
-		DO RETRIEVE .1 + .2 + .4
-		PLEASE RESUME #1
-	(1020)	DO STASH .2 + .3
-		DO .2 <- #1
-		PLEASE DO (1021) NEXT
-	(1021)	DO FORGET #1
-		DO .3 <- 'V"!1~.2'$#1"'~#1
-		PLEASE DO .1 <- '^.1$.2'~'#0$#29524'
-		DO (1022) NEXT
-		DO .2 <- !2$#0'~'#9841$#1'
-		DO (1021) NEXT
-	(1023)	PLEASE RESUME .3
-	(1022)	DO (1023) NEXT
-		PLEASE RETRIEVE .2 + .3
-		PLEASE RESUME #2
-	(1030)	DO ABSTAIN FROM (1033)
-		PLEASE ABSTAIN FROM (1032)
-	(1039)	DO STASH :1 + .5
-		DO (1530) NEXT
-		DO .3 <- :1~#29524
-		PLEASE DO .5 <- :1~'#29403$#29403'
-		DO .5 <- 'V"!5~.5'~#2"$#1'~#1
-		DO (1031) NEXT
-	(1032)	DO (1033) NEXT
-		DO (1999) NEXT
-	(1031)	DO (1001) NEXT
-	(1033)	DO .4 <- .5
-		DO REINSTATE (1032)
-		PLEASE REINSTATE (1033)
-		DO RETRIEVE :1 + .5
-		PLEASE RESUME #2
-	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
-		DO .2 <- #0
-		DO (1520) NEXT
-		DO STASH :1
-		PLEASE RETRIEVE .2
-		DO .1 <- .2
-		DO .2 <- #0
-		PLEASE DO (1520) NEXT
-		DO :2 <- :1
-		DO RETRIEVE .1 + .2 + :1
-		DO (1550) NEXT
-		PLEASE DO .3 <- :3
-		DO RETRIEVE :1 + :2 + :3
-		DO RESUME #1
-	(1050)	PLEASE STASH :2 + :3 + .5
-		DO :2 <- .1
-		PLEASE DO (1550) NEXT
-		DO .5 <- :3~'#29403$#29403'
-		DO .5 <- 'V"!5~.5'~#2"$#1'~#1
-		DO (1051) NEXT
-		DO (1999) NEXT
-	(1051)	DO (1001) NEXT
-		DO .2 <- :3
-		PLEASE RETRIEVE :2 + :3 + .5
-		DO RESUME #2
-	(1500)	PLEASE ABSTAIN FROM (1502)
-		PLEASE ABSTAIN FROM (1506)
-	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO .1 <- :1~#29524
-		PLEASE DO .2 <- :2~#29524
-		DO (1009) NEXT
-		DO .5 <- .3
-		PLEASE DO .6 <- .4
-		DO .1 <- :1~'#29403$#29403'
-		DO .2 <- :2~'#29403$#29403'
-		DO (1009) NEXT
-		DO .1 <- .3
-		PLEASE DO (1503) NEXT
-		DO .6 <- .4
-		DO .2 <- #1
-		DO (1009) NEXT
-		DO .1 <- .3
-		DO (1501) NEXT
-	(1504)	PLEASE RESUME .6
-	(1503)	DO (1504) NEXT
-	(1501)	DO .2 <- .5
-		DO .5 <- '&.6$.4'
-		DO (1505) NEXT
-	(1506)	DO (1502) NEXT
-		PLEASE DO (1999) NEXT
-	(1505)	DO (1001) NEXT
-	(1502)	DO :4 <- .5
-		DO (1520) NEXT
-		DO :3 <- :1
-		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO REINSTATE (1502)
-		DO REINSTATE (1506)
-		PLEASE RESUME #3
-	(1510)	DO STASH :1 + :2 + :4
-		DO :1 <- "'?#59048$":2~'#29524$#0'"'~'#0$#29524'"
-		     $"'?#59048$":2~'#0$#29524'"'~'#0$#29524'"
-		DO :2 <- #1
-		DO (1509) NEXT
-		PLEASE RETRIEVE :1
-		DO :2 <- :3
-		PLEASE DO (1509) NEXT
-		DO RETRIEVE :2 + :4
-		PLEASE RESUME #1
-	(1520)	PLEASE STASH .3 + .4
-		DO .3 <- .1~#22143
-		DO (1525) NEXT
-		PLEASE DO .4 <- 'V.3$".2~#22143"'~'#0$#29524'
-		DO .3 <- .1~#7381
-		PLEASE DO (1525) NEXT
-		DO :1 <- .4$"'V.3$".2~#7381"'~'#0$#29524'"
-		PLEASE RETRIEVE .3 + .4
-		DO RESUME #1
-	(1525)	DO .3 <- '"'"!3$#0'~'#9841$#1'"$#0'~'#3280$#4'"
-		     $#0'~'#3280$#4'
-		PLEASE RESUME #1
-	(1530)	DO STASH :2 + :3 + .3 + .5
-		DO :1 <- #0
-		DO :2 <- .2
-		DO .3 <- #1
-		DO (1535) NEXT
-	(1535)	PLEASE FORGET #1
-		DO .5 <- '@"'^".1~.3"$#7'~#4"$#2'~#10
-		DO (1534) NEXT
-		DO (1500) NEXT
-		DO :1 <- :3
-		DO (1536) NEXT
-	(1534)	DO (1531) NEXT
-	(1536)	DO (1500) NEXT
-		DO :1 <- :3
-		PLEASE DO (1533) NEXT
-	(1531)	PLEASE DO (1001) NEXT
-	(1533)	DO FORGET #2
-		DO .3 <- !3$#0'~'#9841$#1'
-		DO :2 <- ":2~'#0$#29524'"$"'":2~'#9841$#0'"$#0'
-		     ~'#9841$#1'"
-		PLEASE DO .5 <- 'V"!3~.3'~#2"$#1'~#1
-		DO (1532) NEXT
-		DO (1535) NEXT
-	(1532)	DO (1001) NEXT
-		PLEASE RETRIEVE :2 + :3 + .3 + .5
-		DO RESUME #2
-	(1540)	PLEASE ABSTAIN FROM (1541)
-		DO ABSTAIN FROM (1542)
-	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
-		DO .1 <- :1~#29524
-		PLEASE DO .2 <- :2~'#29403$#29403'
-		DO .5 <- :1~'#29403$#29403'
-		DO (1530) NEXT
-		DO :3 <- :1
-		DO .2 <- :2~#29524
-		PLEASE DO (1530) NEXT
-		DO :5 <- :1
-		DO .1 <- .5
-		DO (1530) NEXT
-		DO :4 <- :1
-		PLEASE DO :1 <- ":3~'#29403$#29403'"$":4~'#29403
-		     $#29403'"
-		DO .5 <- ':1~:1'~#2
-		DO .2 <- :2~'#29403$#29403'
-		DO (1530) NEXT
-		PLEASE DO .5 <- '"':1~:1'~#2"$.5'~#4
-		DO .1 <- :3~#29524
-		DO .2 <- #0
-		DO (1520) NEXT
-		PLEASE DO :2 <- :1
-		PLEASE DO .1 <- :4~#29524
-		DO (1520) NEXT
-		DO (1509) NEXT
-		DO .5 <- !5$":4~#1"'~#31
-		DO :1 <- :3
-		DO :2 <- :5
-		DO (1509) NEXT
-		PLEASE DO .5 <- !5$":4~#1"'~#274
-		DO .5 <- !5~.5'~#1
-		PLEASE RETRIEVE :4
-	(1541)	DO :4 <- .5
-		DO (1543) NEXT
-	(1542)	DO (1544) NEXT
-		PLEASE DO (1999) NEXT
-	(1543)	DO (1001) NEXT
-	(1544)	DO REINSTATE (1541)
-		PLEASE REINSTATE (1542)
-		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
-		DO RESUME #2
-	(1550)	DO STASH :1 + :4 + :5 + :6 + .5
-		DO :3 <- #0
-		DO .5 <- 'V"':2~:2'~#2"$#1'~#1
-		PLEASE DO (1551) NEXT
-		DO :4 <- #1
-		PLEASE DO (1553) NEXT
-	(1553)	DO FORGET #1
-		DO .5 <- '?"':2~"#39366$#0"'"$#1'~#1
-		DO (1552) NEXT
-		DO :2 <- ":2~'#0$#29524'"$"'":2~'#9841$#0'"$#0'
-		     ~'#9841$#1'"
-		PLEASE DO :4 <- ":4~'#0$#29524'"$"'":4~'#9841
-		     $#0'"$#0'~'#9841$#1'"
-		DO (1553) NEXT
-	(1552)	DO (1001) NEXT
-	(1556)	PLEASE FORGET #1
-		DO :6 <- "'&":2~'#29524$#0'"$"'?#59048$":1
-		     ~'#29524$#0'"'~'#0$#29524'"'~'#0$#29524'"$
-		     "'&":2~'#0$#29524'"$"'?#59048$":1~'#0$
-		     #29524'"'~'#0$#29524'"'~'#0$#29524'"
-		DO :5 <- "'?":1~'#29524$#0'"$":2~'#29524$#0'"'
-		     ~'#0$#59048'"$"'?":1~'#0$#29524'"$":2~'#0$
-		     #29524'"'~'#0$#59048'"
-		DO .5 <- "?'"':6~:5'~'"'"'&"':5~:5'~'#29524$#0'"$
-		     #19683'~'#0$#29524'"$"'?:5~:5'~'#9841$#0'"'
-		     ~'#19683$#9841'"$"'?:5~:5'~'#0$#29524'"'"
-		     ~#1'$#1"~#1
-		DO (1554) NEXT
-		DO :5 <- :3
-		DO (1510) NEXT
-		PLEASE DO :1 <- :3
-		DO :6 <- "'&":2~'#29524$#0'"$"'?#59048$":1
-		     ~'#29524$#0'"'~'#0$#29524'"'~'#0$#29524'"$
-		     "'&":2~'#0$#29524'"$"'?#59048$":1~'#0$
-		     #29524'"'~'#0$#29524'"'~'#0$#29524'"
-		DO :3 <- "'?":1~'#29524$#0'"$":2~'#29524$#0'"'
-		     ~'#0$#59048'"$"'?":1~'#0$#29524'"$":2~'#0$
-		     #29524'"'~'#0$#59048'"
-		DO .5 <- "?'"':6~:3'~'"'"'&"':3~:3'~'#29524$#0'"$
-		     #19683'~'#0$#29524'"$"'?:3~:3'~'#9841$#0'"'
-		     ~'#19683$#9841'"$"'?:3~:3'~'#0$#29524'"'"
-		     ~#1'$#1"~#1
-		DO (1557) NEXT
-		DO (1510) NEXT
-		PLEASE DO :1 <- :3
-		DO :3 <- "'V":4~'#59048$#0'"$":5~'#29524$#0'"'
-		     ~'#0$#29524'"$"'V":4~'#0$#59048'"$":5~'#0$
-		     #29524'"'~'#0$#29524'"
-		PLEASE DO (1555) NEXT
-	(1557)	PLEASE DO (1001) NEXT
-		PLEASE FORGET #1
-		DO :3 <- "'V":4~'#29524$#0'"$":5~'#29524$#0'"'
-		     ~'#0$#29524'"$"'V":4~'#0$#29524'"$":5~'#0$
-		     #29524'"'~'#0$#29524'"
-		PLEASE DO (1555) NEXT
-	(1554)	PLEASE DO (1001) NEXT
-	(1555)	PLEASE FORGET #1
-		DO .5 <- "?':4~#2'$#1"~#1
-		DO (1551) NEXT
-		DO :2 <- :2~'#29524$#29523'
-		DO :4 <- :4~'#29524$#29523'
-		PLEASE DO (1556) NEXT
-	(1551)	DO (1001) NEXT
-		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .5
-		PLEASE RESUME #2
-	(1900)	DO STASH .2 + .5
-		DO .1 <- #0
-		DO .2 <- #1
-		PLEASE DO (1901) NEXT
-	(1901)	DO FORGET #1
-		DO %50 (1904) NEXT
-		DO %50 (1901) NEXT
-		PLEASE DO (1903) NEXT
-	(1904)	DO .1 <- '^.1$.2'~'#0$#29524'
-		DO %50 .1 <- '^.1$.2'~'#0$#29524'
-	(1903)	PLEASE FORGET #1
-		DO .2 <- !2$#0'~'#9841$#1'
-		PLEASE DO .5 <- 'V"!2~.2'~#2"$#1'~#1
-		DO (1902) NEXT
-		DO (1901) NEXT
-	(1902)	DO (1001) NEXT
-		DO RETRIEVE .2 + .5
-		PLEASE RESUME #2
-	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
-		DO .3 <- #59037
-		DO :1 <- #6
-		DO (1911) NEXT
-		PLEASE NOTE THAT YOU CAN'T GET THREE FROM HERE
-	(1912)	DO (1001) NEXT
-	(1911)	DO FORGET #1
-		PLEASE DO (1900) NEXT
-		DO :2 <- .1
-		DO (1500) NEXT
-		PLEASE DO :1 <- :3
-		DO .1 <- .3
-		DO (1020) NEXT
-		PLEASE DO .3 <- .1
-		DO .5 <- '?"!3~.3'~#2"$#1'~#1
-		DO (1912) NEXT
-		DO .1 <- #12
-		PLEASE DO (1050) NEXT
-		DO RETRIEVE .1
-		DO (1530) NEXT
-		DO :2 <- #29524
-		DO (1500) NEXT
-		PLEASE DO .2 <- :3~'#29403$#29403'
-		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
-		DO RESUME #1
diff --git a/pit/lib/syslib.4i b/pit/lib/syslib.4i
deleted file mode 100644
index d1c1084..0000000
--- a/pit/lib/syslib.4i
+++ /dev/null
@@ -1,354 +0,0 @@
-		PLEASE KNOCK TWICE TWO TIMES BEFORE ENTERING
-
-	(1000)	PLEASE IGNORE .4
-		PLEASE ABSTAIN FROM (1005)
-	(1009)	DO STASH .1 + .2 + .5 + .6
-		DO .4 <- #1
-		DO (1004) NEXT
-	(1004)	PLEASE FORGET #1
-		DO .3 <- '^.1$.2'~'#0$#21845'
-		DO .6 <- '?"'V"'&.1$.2'~'#0$#21845'"$"'^"'@.1$
-		      .2'~'#0$#21845'"$#21845'~'#0$#43690'"'
-		      ~'#0$#21845'"$#43690'~'#0$#21845'
-		PLEASE DO .5 <- '?".6~#49152"$#4'~#4
-		DO (1002) NEXT
-		DO .4 <- #2
-	(1005)	DO (1006) NEXT
-	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
-	(1002)	DO (1001) NEXT
-	(1006)	PLEASE FORGET #1
-		DO .5 <- '?"!6~.6'~#3"$#4'~#4
-		DO (1003) NEXT
-		DO .1 <- .3
-		DO .2 <- !6$#0'~'#5461$#1'
-		DO (1004) NEXT
-	(1003)	DO (1001) NEXT
-		DO REINSTATE (1005)
-	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
-		DO REMEMBER .4
-		PLEASE RESUME #2
-	(1001)	DO RESUME .5
-	(1010)	DO STASH .1 + .2 + .4
-		DO .4 <- .1
-		DO .1 <- '?#65535$.2'~'#0$#21845'
-		DO (1020) NEXT
-		PLEASE DO .2 <- .4
-		PLEASE DO (1009) NEXT
-		DO RETRIEVE .1 + .2 + .4
-		PLEASE RESUME #1
-	(1020)	DO STASH .2 + .3
-		DO .2 <- #1
-		PLEASE DO (1021) NEXT
-	(1021)	DO FORGET #1
-		DO .3 <- '?"'V".1~.2"$#2'~#1"$#1'~#1
-		PLEASE DO .1 <- '^.1$.2'~'#0$#21845'
-		DO (1022) NEXT
-		DO .2 <- !2$#0'~'#5461$#1'
-		DO (1021) NEXT
-	(1023)	PLEASE RESUME .3
-	(1022)	DO (1023) NEXT
-		PLEASE RETRIEVE .2 + .3
-		PLEASE RESUME #2
-	(1030)	DO ABSTAIN FROM (1033)
-		PLEASE ABSTAIN FROM (1032)
-	(1039)	DO STASH :1 + .5
-		DO (1530) NEXT
-		DO .3 <- :1~#21845
-		PLEASE DO .5 <- :1~'#21760$#21760'
-		DO .5 <- '?"!5~.5'~#3"$#4'~#4
-		DO (1031) NEXT
-	(1032)	DO (1033) NEXT
-		DO (1999) NEXT
-	(1031)	DO (1001) NEXT
-	(1033)	DO .4 <- .5
-		DO REINSTATE (1032)
-		PLEASE REINSTATE (1033)
-		DO RETRIEVE :1 + .5
-		PLEASE RESUME #2
-	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
-		DO .2 <- #0
-		DO (1520) NEXT
-		DO STASH :1
-		PLEASE RETRIEVE .2
-		DO .1 <- .2
-		DO .2 <- #0
-		PLEASE DO (1520) NEXT
-		DO :2 <- :1
-		DO RETRIEVE .1 + .2 + :1
-		DO (1550) NEXT
-		PLEASE DO .3 <- :3
-		DO RETRIEVE :1 + :2 + :3
-		DO RESUME #1
-	(1050)	PLEASE STASH :2 + :3 + .5
-		DO :2 <- .1
-		PLEASE DO (1550) NEXT
-		DO .5 <- :3~'#21760$#21760'
-		DO .5 <- '?"!5~.5'~#3"$#4'~#4
-		DO (1051) NEXT
-		DO (1999) NEXT
-	(1051)	DO (1001) NEXT
-		DO .2 <- :3
-		PLEASE RETRIEVE :2 + :3 + .5
-		DO RESUME #2
-	(1200)	DO .2 <- '^.1$.1'~'#0$#21845'
-		DO .3 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
-		     ~'#0$#21845'"'~'#0$#21845'
-		DO .2 <- '^.2$"!3$#0'~'#5461$#1'"'~'#0$#21845'
-		DO .3 <- .3~#16384
-		PLEASE RESUME #1
-	(1210)	DO .2 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
-		     ~'#0$#21845'"'~'#0$#21845'
-		DO .3 <- '^.1$.1'~'#0$#21845'
-		DO .2 <- '^.2$".3~#21844"'~'#0$#21845'
-		DO .3 <- .3~#1
-		PLEASE RESUME #1
-	(1500)	PLEASE ABSTAIN FROM (1502)
-		PLEASE ABSTAIN FROM (1506)
-	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO .1 <- :1~#21845
-		PLEASE DO .2 <- :2~#21845
-		DO (1009) NEXT
-		DO .5 <- .3
-		PLEASE DO .6 <- .4
-		DO .1 <- :1~'#21760$#21760'
-		DO .2 <- :2~'#21760$#21760'
-		DO (1009) NEXT
-		DO .1 <- .3
-		PLEASE DO (1503) NEXT
-		DO .6 <- .4
-		DO .2 <- #1
-		DO (1009) NEXT
-		DO .1 <- .3
-		DO (1501) NEXT
-	(1504)	PLEASE RESUME .6
-	(1503)	DO (1504) NEXT
-	(1501)	DO .2 <- .5
-		DO .5 <- '&.6$.4'
-		DO (1505) NEXT
-	(1506)	DO (1502) NEXT
-		PLEASE DO (1999) NEXT
-	(1505)	DO (1001) NEXT
-	(1502)	DO :4 <- .5
-		DO (1520) NEXT
-		DO :3 <- :1
-		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO REINSTATE (1502)
-		DO REINSTATE (1506)
-		PLEASE RESUME #3
-	(1510)	DO STASH :1 + :2 + :4
-		DO :1 <- "'?#65535$":2~'#21845$#0'"'~'#0$#21845'"$
-		     "'?#65535$":2~'#0$#21845'"'~'#0$#21845'"
-		DO :2 <- #1
-		DO (1509) NEXT
-		PLEASE RETRIEVE :1
-		DO :2 <- :3
-		PLEASE DO (1509) NEXT
-		DO RETRIEVE :2 + :4
-		PLEASE RESUME #1
-	(1520)	PLEASE STASH .3 + .4
-		DO .3 <- .1~#17476
-		DO (1525) NEXT
-		PLEASE DO .4 <- 'V.3$".2~#17476"'~'#0$#21845'
-		DO .3 <- .1~#4369
-		PLEASE DO (1525) NEXT
-		DO :1 <- .4$"'V.3$".2~#4369"'~'#0$#21845'"
-		PLEASE RETRIEVE .3 + .4
-		DO RESUME #1
-	(1525)	DO .3 <- '"'"!3$#0'~'#5461$#1'"$#0'~'#5461$#1'"$
-		     #0'~'#1365$#5'
-		PLEASE RESUME #1
-	(1530)	DO STASH :2 + :3 + .1 + .2 + .3
-		DO :3 <- #0
-		DO :2 <- .1
-		DO (1535) NEXT
-	(1535)	PLEASE FORGET #1
-		DO .3 <- '?"!2~.2'~#3"$#4'~#4
-		DO (1532) NEXT
-		DO .1 <- .2
-		DO (1210) NEXT
-		DO .3 <- 'V.3$#1'~#1
-		DO (1531) NEXT
-		DO :1 <- :3
-		DO (1500) NEXT
-		PLEASE DO (1533) NEXT
-	(1531)	PLEASE DO (1534) NEXT
-	(1533)	DO FORGET #1
-		DO :1 <- :2
-		DO (1700) NEXT
-		DO (1535) NEXT
-	(1534)	PLEASE RESUME .3
-	(1532)	DO (1534) NEXT
-		DO :1 <- :3
-		PLEASE RETRIEVE :2 + :3 + .1 + .2 + .3
-		DO RESUME #2
-	(1540)	PLEASE ABSTAIN FROM (1541)
-		DO ABSTAIN FROM (1542)
-	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
-		DO .1 <- :1~#21845
-		PLEASE DO .2 <- :2~'#21760$#21760'
-		DO .5 <- :1~'#21760$#21760'
-		DO (1530) NEXT
-		DO :3 <- :1
-		DO .2 <- :2~#21845
-		PLEASE DO (1530) NEXT
-		DO :5 <- :1
-		DO .1 <- .5
-		DO (1530) NEXT
-		DO :4 <- :1
-		PLEASE DO :1 <- ":3~'#21760$#21760'"$":4
-		     ~'#21760$#21760'"
-		DO .5 <- ':1~:1'~#3
-		DO .2 <- :2~'#21760$#21760'
-		DO (1530) NEXT
-		PLEASE DO .5 <- '"':1~:1'~#3"$.5'~#5
-		DO .1 <- :3~#21845
-		DO .2 <- #0
-		DO (1520) NEXT
-		PLEASE DO :2 <- :1
-		PLEASE DO .1 <- :4~#21845
-		DO (1520) NEXT
-		DO (1509) NEXT
-		DO .5 <- !5$"'^":4~#1"$#1'~#1"'~#69
-		DO :1 <- :3
-		DO :2 <- :5
-		DO (1509) NEXT
-		PLEASE DO .5 <- !5$"'^":4~#1"$#1'~#1"'~#1093
-		DO .5 <- '?"!5~.5'~#1"$#1'~#1
-		PLEASE RETRIEVE :4
-	(1541)	DO :4 <- .5
-		DO (1543) NEXT
-	(1542)	DO (1544) NEXT
-		PLEASE DO (1999) NEXT
-	(1543)	DO (1001) NEXT
-	(1544)	DO REINSTATE (1541)
-		PLEASE REINSTATE (1542)
-		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
-		DO RESUME #2
-	(1550)	DO STASH :1 + :1 + :4 + :5 + :6 + .1 + .5
-		DO :3 <- #0
-		DO .5 <- '?"':2~:2'~#3"$#4'~#4
-		PLEASE DO (1551) NEXT
-		DO :4 <- #1
-		PLEASE DO (1553) NEXT
-	(1553)	DO FORGET #1
-		DO .5 <- '?#0$"'V"'@":2~'#16384$#0'"$#3'~#1"$#2'
-		     ~#1"'~#1
-		DO (1552) NEXT
-		DO :5 <- :2
-		DO :1 <- :4
-		PLEASE DO (1700) NEXT
-		DO :4 <- :2
-		DO :1 <- :5
-		PLEASE DO (1700) NEXT
-		DO (1553) NEXT
-	(1552)	DO (1001) NEXT
-		DO RETRIEVE :1
-	(1556)	PLEASE FORGET #1
-		DO :6 <- "'&":2~'#21845$#0'"$"'?#65535$":1
-		     ~'#21845$#0'"'~'#0$#21845'"'~'#0$#21845'"$
-		     "'&":2~'#0$#21845'"$"'?#65535$":1~'#0$
-		     #21845'"'~'#0$#21845'"'~'#0$#21845'"
-		DO :6 <- "'?"'V":6~'#21845$#0'"$#21845'~'#0$
-		     #21845'"$#21845'~'#0$#65535'"$"'?"'V":6
-		     ~'#0$#21845'"$#21845'~'#0$#21845'"$#21845'
-		     ~'#0$#65535'"
-		DO :5 <- "'?":1~'#21845$#0'"$":2~'#21845$#0'"'
-		     ~'#0$#65535'"$"'?":1~'#0$#21845'"$":2~'#0$
-		     #21845'"'~'#0$#65535'"
-		DO .5 <- "?'"':6~:5'~'"'"'&"':5~:5'~'#21845$#0'"$
-		     #16384'~'#0$#21845'"$"'?:5~:5'~'#5461$#0'"'
-		     ~'#16384$#5461'"$"'?:5~:5'~'#0$#21845'"'"
-		     ~#1'$#2"~#1
-		DO (1554) NEXT
-		DO :5 <- :3
-		DO (1510) NEXT
-		PLEASE DO :1 <- :3
-		DO :3 <- "'^":4~'#21845$#0'"$":5~'#21845$#0'"'
-		     ~'#0$#21845'"$"'^":4~'#0$#21845'"$":5~'#0$
-		     #21845'"'~'#0$#21845'"
-		DO (1555) NEXT
-	(1554)	PLEASE DO (1001) NEXT
-	(1555)	DO FORGET #1
-		DO .5 <- 'V":4~#1"$"'?#2$":4~#1"'~#1"'~#1
-		DO (1551) NEXT
-		DO :5 <- :1
-		DO :1 <- :4
-		DO :4 <- :2
-		DO (1710) NEXT
-		DO :1 <- :4
-		DO :4 <- :2
-		DO (1710) NEXT
-		DO :1 <- :5
-		PLEASE DO (1556) NEXT
-	(1551)	DO (1001) NEXT
-		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
-		PLEASE RESUME #2
-	(1700)	PLEASE STASH .2
-		DO .1 <- :1~'#0$#21845'
-		DO .2 <- :1~'#21845$#0'
-		DO :2 <- "'^.2$.2'~'#0$#21845'"$"'^.1$.1'~'#0$
-		     #21845'"
-		DO .1 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
-		     ~'#0$#21845'"'~'#0$#21845'
-		DO .2 <- '?"'@.2$#0'~'#0$#21845'"$"'@.2$#65535'
-		     ~'#0$#21845'"'~'#0$#21845'
-		DO :2 <- "'^":2~'#21845$#0'"$.1'~'#0$#21845'"$
-		     "'^":2~'#0$#21845'"$"'.2$#0'~'#5461$#1'"'
-		     ~'#0$#21845'"
-		DO .1 <- .2~#16384
-		PLEASE RETRIEVE .2
-		PLEASE RESUME #1
-	(1710)	PLEASE STASH :1 + .2
-		DO .1 <- :1~'#0$#21845'
-		DO .2 <- :1~'#21845$#0'
-		DO :2 <- "'^.2$.2'~'#0$#21845'"$"'^.1$.1'~'#0$
-		     #21845'"
-		DO :1 <- "'?"'@.2$#0'~'#0$#21845'"$"'@.2$#65535'
-		     ~'#0$#21845'"'~'#0$#21845'"$"'?"'@.1$#0'
-		     ~'#0$#21845'"$"'@.1$#65535'~'#0$#21845'"'
-		     ~'#0$#21845'"
-		DO .1 <- :2~#1
-		DO :2 <- "'^":1~'#21845$#0'"$":2~'#0$#21844'"'
-		     ~'#0$#21845'"$"'^":1~'#0$#21845'"$":2
-		     ~'#21845$#0'"'~'#0$#21845'"
-		PLEASE RETRIEVE :1 + .2
-		PLEASE RESUME #1
-	(1900)	DO STASH .2 + .5
-		DO .1 <- #0
-		DO .2 <- #1
-		PLEASE DO (1901) NEXT
-	(1901)	PLEASE FORGET #1
-		DO %50 .1 <- 'V.1$.2'~'#0$#21845'
-		DO %50 .1 <- '^.1$".2~#43690"'~'#0$#21845'
-		DO .2 <- !2$#0'~'#5461$#1'
-		PLEASE DO .5 <- '^".2~.2"$#1'~#1
-		DO (1902) NEXT
-		DO (1901) NEXT
-	(1902)	DO (1001) NEXT
-		DO RETRIEVE .2 + .5
-		PLEASE RESUME #2
-	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
-		DO .3 <- #65524
-		DO :1 <- #6
-		DO (1911) NEXT
-		PLEASE NOTE THAT YOU CAN'T GET ANYWHERE FROM HERE
-	(1912)	DO (1001) NEXT
-	(1911)	DO FORGET #1
-		PLEASE DO (1900) NEXT
-		DO :2 <- .1
-		DO (1500) NEXT
-		PLEASE DO :1 <- :3
-		DO .1 <- .3
-		DO (1020) NEXT
-		PLEASE DO .3 <- .1
-		DO .5 <- '?"!3~.3'~#3"$#2'~#1
-		DO (1912) NEXT
-		DO .1 <- #12
-		PLEASE DO (1050) NEXT
-		DO RETRIEVE .1
-		DO (1530) NEXT
-		DO :2 <- #32768
-		DO (1500) NEXT
-		PLEASE DO .2 <- :3~'#21760$#21760'
-		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
-		DO RESUME #1
diff --git a/pit/lib/syslib.5i b/pit/lib/syslib.5i
deleted file mode 100644
index 518b7cd..0000000
--- a/pit/lib/syslib.5i
+++ /dev/null
@@ -1,355 +0,0 @@
-		PLEASE KNOCK "SHAVE-AND-A-HAIRCUT" BEFORE ENTERING
-
-	(1000)	PLEASE IGNORE .4
-		PLEASE ABSTAIN FROM (1005)
-	(1009)	DO STASH .1 + .2 + .5 + .6
-		DO .4 <- #1
-		DO (1004) NEXT
-	(1004)	PLEASE FORGET #1
-		DO .3 <- '^.1$.2'~'#0$#3906'
-		DO .6 <- '?"'V"'&.1$.2'~'#0$#3906'"$"'^"'@.1$
-		      .2'~'#0$#3906'"$#3906'~'#0$#11718'"'
-		      ~'#0$#3906'"$#11718'~'#0$#3906'
-		PLEASE DO .5 <- "?!6~#12500'$#5"~#5
-		DO (1002) NEXT
-		DO .4 <- #2
-	(1005)	DO (1006) NEXT
-	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
-	(1002)	DO (1001) NEXT
-	(1006)	PLEASE FORGET #1
-		DO .5 <- '?"!6~.6'~#4"$#5'~#5
-		DO (1003) NEXT
-		DO .1 <- .3
-		DO .2 <- !6$#0'~'#781$#1'
-		DO (1004) NEXT
-	(1003)	DO (1001) NEXT
-		DO REINSTATE (1005)
-	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
-		DO REMEMBER .4
-		PLEASE RESUME #2
-	(1001)	DO RESUME .5
-	(1010)	DO STASH .1 + .2 + .4
-		DO .4 <- .1
-		DO .1 <- '?#15624$.2'~'#0$#3906'
-		DO (1020) NEXT
-		PLEASE DO .2 <- .4
-		PLEASE DO (1009) NEXT
-		DO RETRIEVE .1 + .2 + .4
-		PLEASE RESUME #1
-	(1020)	DO STASH .2 + .3
-		DO .2 <- #1
-		PLEASE DO (1021) NEXT
-	(1021)	DO FORGET #1
-		DO .3 <- '?"'V".1~.2"$#3'~#1"$#2'~#1
-		PLEASE DO .1 <- '^.1$.2'~'#0$#3906'
-		DO (1022) NEXT
-		DO .2 <- !2$#0'~'#781$#1'
-		DO (1021) NEXT
-	(1023)	PLEASE RESUME .3
-	(1022)	DO (1023) NEXT
-		PLEASE RETRIEVE .2 + .3
-		PLEASE RESUME #2
-	(1030)	DO ABSTAIN FROM (1033)
-		PLEASE ABSTAIN FROM (1032)
-	(1039)	DO STASH :1 + .5
-		DO (1530) NEXT
-		DO .3 <- :1~#3906
-		PLEASE DO .5 <- :1~'#3875$#3875'
-		DO .5 <- '?"!5~.5'~#4"$#5'~#5
-		DO (1031) NEXT
-	(1032)	DO (1033) NEXT
-		DO (1999) NEXT
-	(1031)	DO (1001) NEXT
-	(1033)	DO .4 <- .5
-		DO REINSTATE (1032)
-		PLEASE REINSTATE (1033)
-		DO RETRIEVE :1 + .5
-		PLEASE RESUME #2
-	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
-		DO .2 <- #0
-		DO (1520) NEXT
-		DO STASH :1
-		PLEASE RETRIEVE .2
-		DO .1 <- .2
-		DO .2 <- #0
-		PLEASE DO (1520) NEXT
-		DO :2 <- :1
-		DO RETRIEVE .1 + .2 + :1
-		DO (1550) NEXT
-		PLEASE DO .3 <- :3
-		DO RETRIEVE :1 + :2 + :3
-		DO RESUME #1
-	(1050)	PLEASE STASH :2 + :3 + .5
-		DO :2 <- .1
-		PLEASE DO (1550) NEXT
-		DO .5 <- :3~'#3875$#3875'
-		DO .5 <- '?"!5~.5'~#4"$#5'~#5
-		DO (1051) NEXT
-		DO (1999) NEXT
-	(1051)	DO (1001) NEXT
-		DO .2 <- :3
-		PLEASE RETRIEVE :2 + :3 + .5
-		DO RESUME #2
-	(1500)	PLEASE ABSTAIN FROM (1502)
-		PLEASE ABSTAIN FROM (1506)
-	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO .1 <- :1~#3906
-		PLEASE DO .2 <- :2~#3906
-		DO (1009) NEXT
-		DO .5 <- .3
-		PLEASE DO .6 <- .4
-		DO .1 <- :1~'#3875$#3875'
-		DO .2 <- :2~'#3875$#3875'
-		DO (1009) NEXT
-		DO .1 <- .3
-		PLEASE DO (1503) NEXT
-		DO .6 <- .4
-		DO .2 <- #1
-		DO (1009) NEXT
-		DO .1 <- .3
-		DO (1501) NEXT
-	(1504)	PLEASE RESUME .6
-	(1503)	DO (1504) NEXT
-	(1501)	DO .2 <- .5
-		DO .5 <- '&.6$.4'
-		DO (1505) NEXT
-	(1506)	DO (1502) NEXT
-		PLEASE DO (1999) NEXT
-	(1505)	DO (1001) NEXT
-	(1502)	DO :4 <- .5
-		DO (1520) NEXT
-		DO :3 <- :1
-		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO REINSTATE (1502)
-		DO REINSTATE (1506)
-		PLEASE RESUME #3
-	(1510)	DO STASH :1 + :2 + :4
-		DO :1 <- "'?#15624$":2~'#3906$#0'"'~'#0$#3906'"$
-		     "'?#15624$":2~'#0$#3906'"'~'#0$#3906'"
-		DO :2 <- #1
-		DO (1509) NEXT
-		PLEASE RETRIEVE :1
-		DO :2 <- :3
-		PLEASE DO (1509) NEXT
-		DO RETRIEVE :2 + :4
-		PLEASE RESUME #1
-	(1520)	PLEASE STASH .3 + .4
-		DO .3 <- .1~#3255
-		DO (1525) NEXT
-		PLEASE DO .4 <- 'V.3$".2~#3255"'~'#0$#3906'
-		DO .3 <- .1~#651
-		PLEASE DO (1525) NEXT
-		DO :1 <- .4$"'V.3$".2~#651"'~'#0$#3906'"
-		PLEASE RETRIEVE .3 + .4
-		DO RESUME #1
-	(1525)	DO .3 <- '"!3$#0'~'#781$#1'"$#0'~'#156$#6'
-		PLEASE RESUME #1
-	(1530)	DO STASH :2 + :3 + :4 + .1 + .2 + .5
-		DO :3 <- #0
-		DO :4 <- .2
-		DO (1535) NEXT
-	(1535)	PLEASE FORGET #1
-		DO .5 <- '?".1~#4"$#5'~#5
-		DO (1531) NEXT
-		DO :1 <- :4
-		DO (1720) NEXT
-		DO :1 <- :3
-		DO (1500) NEXT
-		PLEASE DO (1533) NEXT
-	(1531)	PLEASE DO (1001) NEXT
-	(1533)	DO FORGET #1
-		DO .1 <- .1~#3905
-		DO :4 <- ":4~'#0$#3906'"$"'":4~'#781$#0'"$#0'
-		    ~'#781$#1'"
-		PLEASE DO .5 <- '?"!1~.1'~#4"$#5'~#5
-		DO (1532) NEXT
-		DO (1535) NEXT
-	(1532)	DO (1001) NEXT
-		DO :1 <- :3
-		PLEASE RETRIEVE :2 + :3 + :4 + .1 + .2 + .5
-		DO RESUME #2
-	(1540)	PLEASE ABSTAIN FROM (1541)
-		DO ABSTAIN FROM (1542)
-	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
-		DO .1 <- :1~#3906
-		PLEASE DO .2 <- :2~'#3875$#3875'
-		DO .5 <- :1~'#3875$#3875'
-		DO (1530) NEXT
-		DO :3 <- :1
-		DO .2 <- :2~#3906
-		PLEASE DO (1530) NEXT
-		DO :5 <- :1
-		DO .1 <- .5
-		DO (1530) NEXT
-		DO :4 <- :1
-		PLEASE DO :1 <- ":3~'#3875$#3875'"$":4
-		     ~'#3875$#3875'"
-		DO .5 <- ':1~:1'~#4
-		DO .2 <- :2~'#3875$#3875'
-		DO (1530) NEXT
-		PLEASE DO .5 <- '"':1~:1'~#4"$.5'~#6
-		DO .1 <- :3~#3906
-		DO .2 <- #0
-		DO (1520) NEXT
-		PLEASE DO :2 <- :1
-		PLEASE DO .1 <- :4~#3906
-		DO (1520) NEXT
-		DO (1509) NEXT
-		DO .5 <- !5$"'^":4~#1"$#2'~#1"'~#131
-		DO :1 <- :3
-		DO :2 <- :5
-		DO (1509) NEXT
-		PLEASE DO .5 <- !5$"'^":4~#1"$#2'~#1"'~#3256
-		DO .5 <- '?"!5~.5'~#1"$#2'~#1
-		PLEASE RETRIEVE :4
-	(1541)	DO :4 <- .5
-		DO (1543) NEXT
-	(1542)	DO (1544) NEXT
-		PLEASE DO (1999) NEXT
-	(1543)	DO (1001) NEXT
-	(1544)	DO REINSTATE (1541)
-		PLEASE REINSTATE (1542)
-		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
-		DO RESUME #2
-	(1550)	DO STASH :1 + :4 + :5 + :6 + .1 + .5
-		DO :5 <- #0
-		DO .5 <- '?"':2~:2'~#4"$#5'~#5
-		PLEASE DO (1551) NEXT
-		DO :4 <- #1
-		PLEASE DO (1553) NEXT
-	(1553)	DO FORGET #1
-		DO .5 <- '?"':2~"#12500$#0"'"$#3'~#1
-		DO (1552) NEXT
-		DO :2 <- ":2~'#0$#3906'"$"'":2~'#781$#0'"$#0'
-		     ~'#781$#1'"
-		PLEASE DO :4 <- ":4~'#0$#3906'"$"'":4~'#781
-		     $#0'"$#0'~'#781$#1'"
-		DO (1553) NEXT
-	(1552)	DO (1001) NEXT
-		DO .1 <- #0
-	(1556)	PLEASE FORGET #1
-		DO :6 <- "'&":2~'#3906$#0'"$"'?#15624$":1
-		     ~'#3906$#0'"'~'#0$#3906'"'~'#0$#3906'"$
-		     "'&":2~'#0$#3906'"$"'?#15624$":1~'#0$
-		     #3906'"'~'#0$#3906'"'~'#0$#3906'"
-		DO :6 <- "'?"'V":6~'#3906$#0'"$#7812'~'#0$
-		     #3906'"$#7812'~'#0$#15624'"$"'?"'V":6
-		     ~'#0$#3906'"$#7812'~'#0$#3906'"$#7812'
-		     ~'#0$#15624'"
-		DO :3 <- "'?":1~'#3906$#0'"$":2~'#3906$#0'"'
-		     ~'#0$#15624'"$"'?":1~'#0$#3906'"$":2~'#0$
-		     #3906'"'~'#0$#15624'"
-		DO .5 <- "?'"':6~:3'~'"'"'&"':3~:3'~'#3906$#0'"$
-		     #3125'~'#0$#3906'"$"'?:3~:3'~'#781$#0'"'
-		     ~'#3125$#781'"$"'?:3~:3'~'#0$#3906'"'"~#1'$
-		     #3"~#1
-		PLEASE DO (1557) NEXT
-		DO (1510) NEXT
-		PLEASE DO :1 <- :3
-		DO .5 <- '?#0$"'V.1$#3'~#1"'~#1
-		DO (1557) NEXT
-		DO .1 <- '^.1$#3906'~'#0$#3906'
-		DO (1556) NEXT
-	(1557)	PLEASE DO (1001) NEXT
-		PLEASE FORGET #1
-		DO :5 <- "'V":4~'.1$#0'"$":5~'#3906$#0'"'
-		     ~'#0$#3906'"$"'V":4~'#0$.1'"$":5~'#0$
-		     #3906'"'~'#0$#3906'"
-		DO .5 <- "?#2$':4~#1'"~#1
-		DO (1551) NEXT
-		DO :2 <- :2~'#3906$#3905'
-		DO :4 <- :4~'#3906$#3905'
-		DO .1 <- #0
-		PLEASE DO (1556) NEXT
-	(1551)	DO (1001) NEXT
-		DO :3 <- :5
-		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
-		PLEASE RESUME #2
-	(1720)	PLEASE STASH :1 + :3 + :4 + .1 + .5
-		DO :2 <- #0
-		DO .2 <- #0
-		DO .5 <- '?".1~#4"$#5'~#5
-		DO (1729) NEXT
-		DO .5 <- .1~#1
-		DO .2 <- :1~'#3906$#0'
-		DO .1 <- :1~'#0$#3906'
-		PLEASE DO (1724) NEXT
-		DO :1 <- '"?#0$.2"~"#0$#3906"'$'"?#0$.1"~"#0$
-		     #3906"'
-		DO :2 <- '"?'"V.2$#3906"~"#0$#3906"'$
-		     #3906"~"#0$#3906"'$'"?'"V.1$#3906"
-		     ~"#0$#3906"'$#3906"~"#0$#3906"'
-		DO (1728) NEXT
-	(1724)	PLEASE DO (1723) NEXT
-		DO :1 <- '"?#0$'"^.2$.2"~"#0$#3906"'"~"#0$#3906"'$
-		     '"?#0$'"^.1$.1"~"#0$#3906"'"~"#0$#3906"'
-		DO :2 <- '"?'"V'"@.2$#11718"~"#0$#3906"'$#7812"
-		     ~"#0$#3906"'$#7812"~"#0$#3906"'$'"?'"V'"@.1$
-		     #11718"~"#0$#3906"'$#7812"~"#0$#3906"'$#7812"
-		     ~"#0$#3906"'
-	(1728)	DO .2 <- :2~'#3125$#0'
-		DO :2 <- ':2~"#0$#3906"'$'"':2~"#781$#0"'$#0"
-		     ~"#781$#1"'
-		DO (1509) NEXT
-		DO :2 <- :3
-		DO .2 <- '^.2$"'?":4~#1"$#1'~#1"'~#1
-		DO (1721) NEXT
-	(1723)	PLEASE DO (1722) NEXT
-		DO :1 <- '"^.2$.2"~"#0$#3906"'$'"^.1$.1"~"#0$
-		     #3906"'
-		DO :2 <- '"?'"V'"2@.2$#15624"~"#0$#3906"'$
-		     #11718"~"#0$#3906"'$#11718"~"#0$#3906"'$
-		     '"?'"V'"2@.1$#15624"~"#0$#3906"'$#11718"
-		     ~"#0$#3906"'$#11718"~"#0$#3906"'
-		PLEASE FORGET #2
-		DO (1728) NEXT
-	(1729)	DO (1001) NEXT
-		DO (1721) NEXT
-	(1722)	PLEASE DO (1001) NEXT
-		DO :2 <- :1
-		DO .2 <- #0
-		DO FORGET #1
-	(1721)	PLEASE RETRIEVE :1 + :3 + :4 + .1 + .5
-		PLEASE RESUME #3
-	(1900)	DO STASH .2 + .5
-		DO .1 <- #0
-		DO .2 <- #1
-		PLEASE DO (1901) NEXT
-	(1901)	DO %20 (1903) NEXT
-		DO .1 <- 'V.1$.2'~'#0$#3906'
-		DO %50 .1 <- '^.1$".2~#7812"'~'#0$#3906'
-		DO %50 .1 <- '^.1$.2'~'#0$#3906'
-		PLEASE DO (1903) NEXT
-	(1903)	PLEASE FORGET #2
-		DO .2 <- !2$#0'~'#781$#1'
-		PLEASE DO .5 <- '^".2~.2"$#1'~#1
-		DO (1902) NEXT
-		DO (1901) NEXT
-	(1902)	DO (1001) NEXT
-		DO RETRIEVE .2 + .5
-		PLEASE RESUME #2
-	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
-		DO .3 <- #15613
-		DO :1 <- #6
-		DO (1911) NEXT
-		PLEASE NOTE THAT YOU CAN'T GET SOMETHING FROM NOTHING
-	(1912)	DO (1001) NEXT
-	(1911)	DO FORGET #1
-		PLEASE DO (1900) NEXT
-		DO :2 <- .1
-		DO (1500) NEXT
-		PLEASE DO :1 <- :3
-		DO .1 <- .3
-		DO (1020) NEXT
-		PLEASE DO .3 <- .1
-		DO .5 <- '?"!3~.3'~#4"$#3'~#1
-		DO (1912) NEXT
-		DO .1 <- #12
-		PLEASE DO (1050) NEXT
-		DO RETRIEVE .1
-		DO (1530) NEXT
-		DO :2 <- #7812
-		DO (1500) NEXT
-		PLEASE DO .2 <- :3~'#3875$#3875'
-		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
-		DO RESUME #1
diff --git a/pit/lib/syslib.6i b/pit/lib/syslib.6i
deleted file mode 100644
index 156a59f..0000000
--- a/pit/lib/syslib.6i
+++ /dev/null
@@ -1,373 +0,0 @@
-		PLEASE KNOCK THRICE TWO TIMES BEFORE ENTERING
-
-	(1000)	PLEASE IGNORE .4
-		PLEASE ABSTAIN FROM (1005)
-	(1009)	DO STASH .1 + .2 + .5 + .6
-		DO .4 <- #1
-		DO (1004) NEXT
-	(1004)	PLEASE FORGET #1
-		DO .3 <- '^.1$.2'~'#0$#9331'
-		DO .6 <- '?"'V"'V"'&.1$.2'~'#0$#9331'"$"'^"'@.1$
-		     .2'~'#0$#9331'"$#9331'~'#0$#9331'"'~'#0$
-		     #9331'"$"'^"'2@.1$.2'~'#0$#9331'"$#18662'
-		     ~'#0$#9331'"'~'#0$#37324'"$#37324'~'#0$#9331'
-		PLEASE DO .5 <- "?!6~#38880'$#6"~#6
-		DO (1002) NEXT
-		DO .4 <- #2
-	(1005)	DO (1006) NEXT
-	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
-	(1002)	DO (1001) NEXT
-	(1006)	PLEASE FORGET #1
-		DO .5 <- '?"!6~.6'~#5"$#6'~#6
-		DO (1003) NEXT
-		DO .1 <- .3
-		DO .2 <- !6$#0'~'#1555$#1'
-		DO (1004) NEXT
-	(1003)	DO (1001) NEXT
-		DO REINSTATE (1005)
-	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
-		DO REMEMBER .4
-		PLEASE RESUME #2
-	(1001)	DO RESUME .5
-	(1010)	DO STASH .1 + .2 + .4
-		DO .4 <- .1
-		DO .1 <- '?#46655$.2'~'#0$#9331'
-		DO (1020) NEXT
-		PLEASE DO .2 <- .4
-		PLEASE DO (1009) NEXT
-		DO RETRIEVE .1 + .2 + .4
-		PLEASE RESUME #1
-	(1020)	DO STASH .2 + .3
-		DO .2 <- #1
-		PLEASE DO (1021) NEXT
-	(1021)	DO FORGET #1
-		DO .3 <- '?"'V".1~.2"$#4'~#1"$#3'~#1
-		PLEASE DO .1 <- '^.1$.2'~'#0$#9331'
-		DO (1022) NEXT
-		DO .2 <- !2$#0'~'#1555$#1'
-		DO (1021) NEXT
-	(1023)	PLEASE RESUME .3
-	(1022)	DO (1023) NEXT
-		PLEASE RETRIEVE .2 + .3
-		PLEASE RESUME #2
-	(1030)	DO ABSTAIN FROM (1033)
-		PLEASE ABSTAIN FROM (1032)
-	(1039)	DO STASH :1 + .5
-		DO (1530) NEXT
-		DO .3 <- :1~#9331
-		PLEASE DO .5 <- :1~'#9288$#9288'
-		DO .5 <- '?"!5~.5'~#5"$#6'~#6
-		DO (1031) NEXT
-	(1032)	DO (1033) NEXT
-		DO (1999) NEXT
-	(1031)	DO (1001) NEXT
-	(1033)	DO .4 <- .5
-		DO REINSTATE (1032)
-		PLEASE REINSTATE (1033)
-		DO RETRIEVE :1 + .5
-		PLEASE RESUME #2
-	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
-		DO .2 <- #0
-		DO (1520) NEXT
-		DO STASH :1
-		PLEASE RETRIEVE .2
-		DO .1 <- .2
-		DO .2 <- #0
-		PLEASE DO (1520) NEXT
-		DO :2 <- :1
-		DO RETRIEVE .1 + .2 + :1
-		DO (1550) NEXT
-		PLEASE DO .3 <- :3
-		DO RETRIEVE :1 + :2 + :3
-		DO RESUME #1
-	(1050)	PLEASE STASH :2 + :3 + .5
-		DO :2 <- .1
-		PLEASE DO (1550) NEXT
-		DO .5 <- :3~'#9288$#9288'
-		DO .5 <- '?"!5~.5'~#5"$#6'~#6
-		DO (1051) NEXT
-		DO (1999) NEXT
-	(1051)	DO (1001) NEXT
-		DO .2 <- :3
-		PLEASE RETRIEVE :2 + :3 + .5
-		DO RESUME #2
-	(1200)	DO .2 <- '^.1$.1'~'#0$#9331'
-		DO .3 <- '?"'2@.1$#0'~'#0$#9331'"$"'2@.1$#46655'
-		     ~'#0$#9331'"'~'#0$#9331'
-		DO .2 <- '^.2$"!3$#0'~'#1555$#1'"'~'#0$#9331'
-		DO .3 <- .3~#7776
-		PLEASE RESUME #1
-	(1210)	DO .2 <- '^"'?"'@.1$#0'~'#0$#9331'"$"'@.1$#46655'
-		     ~'#0$#9331'"'~'#0$#9331'"$"'?"'3@.1$#0'~'#0$
-		     #9331'"$"'3@.1$#46655'~'#0$#9331'"'~'#0$
-		     #9331'"'~'#0$#9331'
-		DO .3 <- '^"'^.1$.1'~'#0$#9331'"$.1'~'#0$#9331'
-		DO .2 <- '^.2$".3~#9330"'~'#0$#9331'
-		DO .3 <- .3~#1
-		PLEASE RESUME #1
-	(1500)	PLEASE ABSTAIN FROM (1502)
-		PLEASE ABSTAIN FROM (1506)
-	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO .1 <- :1~#9331
-		PLEASE DO .2 <- :2~#9331
-		DO (1009) NEXT
-		DO .5 <- .3
-		PLEASE DO .6 <- .4
-		DO .1 <- :1~'#9288$#9288'
-		DO .2 <- :2~'#9288$#9288'
-		DO (1009) NEXT
-		DO .1 <- .3
-		PLEASE DO (1503) NEXT
-		DO .6 <- .4
-		DO .2 <- #1
-		DO (1009) NEXT
-		DO .1 <- .3
-		DO (1501) NEXT
-	(1504)	PLEASE RESUME .6
-	(1503)	DO (1504) NEXT
-	(1501)	DO .2 <- .5
-		DO .5 <- '&.6$.4'
-		DO (1505) NEXT
-	(1506)	DO (1502) NEXT
-		PLEASE DO (1999) NEXT
-	(1505)	DO (1001) NEXT
-	(1502)	DO :4 <- .5
-		DO (1520) NEXT
-		DO :3 <- :1
-		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO REINSTATE (1502)
-		DO REINSTATE (1506)
-		PLEASE RESUME #3
-	(1510)	DO STASH :1 + :2 + :4
-		DO :1 <- "'?#46655$":2~'#9331$#0'"'~'#0$#9331'"$
-		     "'?#46655$":2~'#0$#9331'"'~'#0$#9331'"
-		DO :2 <- #1
-		DO (1509) NEXT
-		PLEASE RETRIEVE :1
-		DO :2 <- :3
-		PLEASE DO (1509) NEXT
-		DO RETRIEVE :2 + :4
-		PLEASE RESUME #1
-	(1520)	PLEASE STASH .3 + .4
-		DO .3 <- .1~#7998
-		DO (1525) NEXT
-		PLEASE DO .4 <- 'V.3$".2~#7998"'~'#0$#9331'
-		DO .3 <- .1~#1333
-		PLEASE DO (1525) NEXT
-		DO :1 <- .4$"'V.3$".2~#1333"'~'#0$#9331'"
-		PLEASE RETRIEVE .3 + .4
-		DO RESUME #1
-	(1525)	DO .3 <- '"!3$#0'~'#1555$#1'"$#0'~'#259$#7'
-		PLEASE RESUME #1
-	(1530)	DO STASH :2 + :3 + .1 + .2 + .3
-		DO :3 <- #0
-		DO :2 <- .1
-		DO (1535) NEXT
-	(1535)	PLEASE FORGET #1
-		DO .3 <- '?"!2~.2'~#5"$#6'~#6
-		DO (1532) NEXT
-		DO .1 <- .2
-		DO (1210) NEXT
-		DO .3 <- '?#1$".3~#5"'~#1
-		DO (1531) NEXT
-		DO :1 <- :3
-		DO (1500) NEXT
-		PLEASE DO (1533) NEXT
-	(1531)	PLEASE DO (1534) NEXT
-	(1533)	DO FORGET #1
-		DO :1 <- :2
-		DO (1700) NEXT
-		DO (1535) NEXT
-	(1534)	PLEASE RESUME .3
-	(1532)	DO (1534) NEXT
-		DO :1 <- :3
-		PLEASE RETRIEVE :2 + :3 + .1 + .2 + .3
-		DO RESUME #2
-	(1540)	PLEASE ABSTAIN FROM (1541)
-		DO ABSTAIN FROM (1542)
-	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
-		DO .1 <- :1~#9331
-		PLEASE DO .2 <- :2~'#9288$#9288'
-		DO .5 <- :1~'#9288$#9288'
-		DO (1530) NEXT
-		DO :3 <- :1
-		DO .2 <- :2~#9331
-		PLEASE DO (1530) NEXT
-		DO :5 <- :1
-		DO .1 <- .5
-		DO (1530) NEXT
-		DO :4 <- :1
-		PLEASE DO :1 <- ":3~'#9288$#9288'"$":4
-		     ~'#9288$#9288'"
-		DO .5 <- ':1~:1'~#5
-		DO .2 <- :2~'#9288$#9288'
-		DO (1530) NEXT
-		PLEASE DO .5 <- '"':1~:1'~#5"$.5'~#7
-		DO .1 <- :3~#9331
-		DO .2 <- #0
-		DO (1520) NEXT
-		PLEASE DO :2 <- :1
-		PLEASE DO .1 <- :4~#9331
-		DO (1520) NEXT
-		DO (1509) NEXT
-		DO .5 <- !5$"'^":4~#1"$#3'~#1"'~#223
-		DO :1 <- :3
-		DO :2 <- :5
-		DO (1509) NEXT
-		PLEASE DO .5 <- !5$"'^":4~#1"$#3'~#1"'~#7999
-		DO .5 <- '?"!5~.5'~#1"$#3'~#1
-		PLEASE RETRIEVE :4
-	(1541)	DO :4 <- .5
-		DO (1543) NEXT
-	(1542)	DO (1544) NEXT
-		PLEASE DO (1999) NEXT
-	(1543)	DO (1001) NEXT
-	(1544)	DO REINSTATE (1541)
-		PLEASE REINSTATE (1542)
-		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
-		DO RESUME #2
-	(1550)	DO STASH :1 + :1 + :4 + :5 + :6 + .1 + .5
-		DO :3 <- #0
-		DO .5 <- '?"':2~:2'~#5"$#6'~#6
-		PLEASE DO (1551) NEXT
-		DO :4 <- #1
-		PLEASE DO (1553) NEXT
-	(1553)	DO FORGET #1
-		DO .5 <- '?#0$"'V"'2@":2~'#7776$#0'"$#5'~#1"$#4'
-		     ~#1"'~#1
-		DO (1552) NEXT
-		DO :5 <- :2
-		DO :1 <- :4
-		PLEASE DO (1700) NEXT
-		DO :4 <- :2
-		DO :1 <- :5
-		PLEASE DO (1700) NEXT
-		DO (1553) NEXT
-	(1552)	DO (1001) NEXT
-		DO RETRIEVE :1
-	(1556)	PLEASE FORGET #1
-		DO :6 <- "'&":2~'#9331$#0'"$"'?#46655$":1
-		     ~'#9331$#0'"'~'#0$#9331'"'~'#0$#9331'"$
-		     "'&":2~'#0$#9331'"$"'?#46655$":1~'#0$
-		     #9331'"'~'#0$#9331'"'~'#0$#9331'"
-		DO :5 <- "'?":1~'#9331$#0'"$":2~'#9331$#0'"'
-		     ~'#0$#9331'"$"'?":1~'#0$#9331'"$":2~'#0$
-		     #9331'"'~'#0$#9331'"
-		DO :6 <- "'&":6~'#9331$#0'"$":5~'#9331$#0'"'
-		     ~'#0$#9331'"$"'&":6~'#0$#9331'"$":5~'#0$
-		     #9331'"'~'#0$#9331'"
-		DO :5 <- :5~'#46655$#46655'
-		DO :6 <- "'?"'V":6~'#9331$#0'"$#27993'~'#0$
-		     #9331'"$#27993'~'#0$#46655'"$"'?"'V":6
-		     ~'#0$#9331'"$#27993'~'#0$#9331'"$#27993'
-		     ~'#0$#46655'"
-		DO .5 <- "?'"':6~:5'~'"'"'&"':5~:5'~'#9331$#0'"$
-		     #7776'~'#0$#9331'"$"'?:5~:5'~'#1555$#0'"'
-		     ~'#7776$#1555'"$"'?:5~:5'~'#0$#9331'"'"~#1'$
-		     #4"~#1
-		DO (1554) NEXT
-		DO :5 <- :3
-		DO (1510) NEXT
-		DO :1 <- :4
-		DO :4 <- :2
-		DO :2 <- :5
-		DO :5 <- :3
-		DO (1500) NEXT
-		DO :2 <- :4
-		DO :4 <- :1
-		DO :1 <- :5
-		DO (1555) NEXT
-	(1554)	PLEASE DO (1001) NEXT
-	(1555)	DO FORGET #1
-		DO .5 <- '?#2$"'@#0$":4~#1"'~#1"'~#1
-		DO (1551) NEXT
-		DO :5 <- :1
-		DO :1 <- :4
-		DO :4 <- :2
-		DO (1710) NEXT
-		DO :1 <- :4
-		DO :4 <- :2
-		DO (1710) NEXT
-		DO :1 <- :5
-		PLEASE DO (1556) NEXT
-	(1551)	DO (1001) NEXT
-		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
-		PLEASE RESUME #2
-	(1700)	PLEASE STASH .2
-		DO .1 <- :1~'#0$#9331'
-		DO .2 <- :1~'#9331$#0'
-		DO :2 <- "'^.2$.2'~'#0$#9331'"$"'^.1$.1'~'#0$
-		     #9331'"
-		DO .1 <- '?"'2@.1$#0'~'#0$#9331'"$"'2@.1$#46655'
-		     ~'#0$#9331'"'~'#0$#9331'
-		DO .2 <- '?"'2@.2$#0'~'#0$#9331'"$"'2@.2$#46655'
-		     ~'#0$#9331'"'~'#0$#9331'
-		DO :2 <- "'^":2~'#9331$#0'"$.1'~'#0$#9331'"$"'^":2
-		     ~'#0$#9331'"$"'.2$#0'~'#1555$#1'"'~'#0$#9331'"
-		DO .1 <- .2~#7776
-		PLEASE RETRIEVE .2
-		PLEASE RESUME #1
-	(1710)	PLEASE STASH :1 + .2
-		DO .2 <- :1~'#9331$#0'
-		DO .1 <- :1~'#0$#9331'
-		DO :2 <- "'^"'^.2$.2'~'#0$#9331'"$.2'~'#0$
-		     #9331'"$"'^"'^.1$.1'~'#0$#9331'"$.1'~'#0$
-		     #9331'"
-		DO .1 <- '^"'?"'@.1$#0'~'#0$#9331'"$"'@.1$#46655'
-		     ~'#0$#9331'"'~'#0$#9331'"$"'?"'3@.1$#0'~'#0$
-		     #9331'"$"'3@.1$#46655'~'#0$#9331'"'~'#0$
-		     #9331'"'~'#0$#9331'
-		DO :1 <- "'^"'?"'@.2$#0'~'#0$#9331'"$"'@.2$#46655'
-		     ~'#0$#9331'"'~'#0$#9331'"$"'?"'3@.2$#0'~'#0$
-		     #9331'"$"'3@.2$#46655'~'#0$#9331'"'~'#0$
-		     #9331'"'~'#0$#9331'"$.1
-		DO .1 <- :2~#1
-		DO :2 <- "'^":1~'#9331$#0'"$":2~'#0$#9330'"'
-		     ~'#0$#9331'"$"'^":1~'#0$#9331'"$":2~'#9331$
-		     #0'"'~'#0$#9331'"
-		PLEASE RETRIEVE :1 + .2
-		PLEASE RESUME #1
-	(1900)	DO STASH .2 + .5
-		DO .1 <- #0
-		DO .2 <- #1
-		PLEASE DO (1901) NEXT
-	(1901)	DO FORGET #1
-		DO %50 (1904) NEXT
-		DO %50 (1901) NEXT
-		PLEASE DO (1903) NEXT
-	(1904)	DO .1 <- '^.1$.2'~'#0$#9331'
-		DO %50 .1 <- '^.1$.2'~'#0$#9331'
-	(1903)	PLEASE FORGET #1
-		DO %50 .1 <- '^.1$".2~#27993"'~'#0$#9331'
-		DO .2 <- !2$#0'~'#1555$#1'
-		PLEASE DO .5 <- '^".2~.2"$#1'~#1
-		DO (1902) NEXT
-		DO (1901) NEXT
-	(1902)	DO (1001) NEXT
-		DO RETRIEVE .2 + .5
-		PLEASE RESUME #2
-	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
-		DO .3 <- #46644
-		DO :1 <- #6
-		DO (1911) NEXT
-		PLEASE NOTE THAT YOU CAN'T GET BLOOD FROM A TURNIP
-	(1912)	DO (1001) NEXT
-	(1911)	DO FORGET #1
-		PLEASE DO (1900) NEXT
-		DO :2 <- .1
-		DO (1500) NEXT
-		PLEASE DO :1 <- :3
-		DO .1 <- .3
-		DO (1020) NEXT
-		PLEASE DO .3 <- .1
-		DO .5 <- '?"!3~.3'~#5"$#4'~#1
-		DO (1912) NEXT
-		DO .1 <- #12
-		PLEASE DO (1050) NEXT
-		DO RETRIEVE .1
-		DO (1530) NEXT
-		DO :2 <- #23328
-		DO (1500) NEXT
-		PLEASE DO .2 <- :3~'#9288$#9288'
-		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
-		DO RESUME #1
diff --git a/pit/lib/syslib.7i b/pit/lib/syslib.7i
deleted file mode 100644
index 1d51a1a..0000000
--- a/pit/lib/syslib.7i
+++ /dev/null
@@ -1,402 +0,0 @@
-		PLEASE KNOCK "SHAVE-AND-A-HAIRCUT-TWO-PLEASE" BEFORE ENTERING
-
-	(1000)	PLEASE IGNORE .4
-		PLEASE ABSTAIN FROM (1005)
-	(1009)	DO STASH .1 + .2 + .5 + .6
-		DO .4 <- #1
-		DO (1004) NEXT
-	(1004)	PLEASE FORGET #1
-		DO .3 <- '^.1$.2'~'#0$#2801'
-		DO .6 <- '?"'V"'V"'&.1$.2'~'#0$#2801'"$"'^"'@.1$
-		     .2'~'#0$#2801'"$#2801'~'#0$#2801'"'~'#0$
-		     #2801'"$"'^"'2@.1$.2'~'#0$#2801'"$#5602'
-		     ~'#0$#2801'"'~'#0$#14005'"$#14005'~'#0$#2801'
-		PLEASE DO .5 <- "?!6~#14406'$#7"~#7
-		DO (1002) NEXT
-		DO .4 <- #2
-	(1005)	DO (1006) NEXT
-	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
-	(1002)	DO (1001) NEXT
-	(1006)	PLEASE FORGET #1
-		DO .5 <- '?"!6~.6'~#6"$#7'~#7
-		DO (1003) NEXT
-		DO .1 <- .3
-		DO .2 <- !6$#0'~'#400$#1'
-		DO (1004) NEXT
-	(1003)	DO (1001) NEXT
-		DO REINSTATE (1005)
-	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
-		DO REMEMBER .4
-		PLEASE RESUME #2
-	(1001)	DO RESUME .5
-	(1010)	DO STASH .1 + .2 + .4
-		DO .4 <- .1
-		DO .1 <- '?#16806$.2'~'#0$#2801'
-		DO (1020) NEXT
-		PLEASE DO .2 <- .4
-		PLEASE DO (1009) NEXT
-		DO RETRIEVE .1 + .2 + .4
-		PLEASE RESUME #1
-	(1020)	DO STASH .2 + .3
-		DO .2 <- #1
-		PLEASE DO (1021) NEXT
-	(1021)	DO FORGET #1
-		DO .3 <- '?"'V".1~.2"$#5'~#1"$#4'~#1
-		PLEASE DO .1 <- '^.1$.2'~'#0$#2801'
-		DO (1022) NEXT
-		DO .2 <- !2$#0'~'#400$#1'
-		DO (1021) NEXT
-	(1023)	PLEASE RESUME .3
-	(1022)	DO (1023) NEXT
-		PLEASE RETRIEVE .2 + .3
-		PLEASE RESUME #2
-	(1030)	DO ABSTAIN FROM (1033)
-		PLEASE ABSTAIN FROM (1032)
-	(1039)	DO STASH :1 + .5
-		DO (1530) NEXT
-		DO .3 <- :1~#2801
-		PLEASE DO .5 <- :1~'#2793$#2744'
-		DO .5 <- '?"!5~.5'~#6"$#7'~#7
-		DO (1031) NEXT
-	(1032)	DO (1033) NEXT
-		DO (1999) NEXT
-	(1031)	DO (1001) NEXT
-	(1033)	DO .4 <- .5
-		DO REINSTATE (1032)
-		PLEASE REINSTATE (1033)
-		DO RETRIEVE :1 + .5
-		PLEASE RESUME #2
-	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
-		DO .2 <- #0
-		DO (1520) NEXT
-		DO STASH :1
-		PLEASE RETRIEVE .2
-		DO .1 <- .2
-		DO .2 <- #0
-		PLEASE DO (1520) NEXT
-		DO :2 <- :1
-		DO RETRIEVE .1 + .2 + :1
-		DO (1550) NEXT
-		PLEASE DO .3 <- :3
-		DO RETRIEVE :1 + :2 + :3
-		DO RESUME #1
-	(1050)	PLEASE STASH :2 + :3 + .5
-		DO :2 <- .1
-		PLEASE DO (1550) NEXT
-		DO .5 <- :3~'#2793$#2744'
-		DO .5 <- '?"!5~.5'~#6"$#7'~#7
-		DO (1051) NEXT
-		DO (1999) NEXT
-	(1051)	DO (1001) NEXT
-		DO .2 <- :3
-		PLEASE RETRIEVE :2 + :3 + .5
-		DO RESUME #2
-	(1500)	PLEASE ABSTAIN FROM (1502)
-		PLEASE ABSTAIN FROM (1506)
-	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO .1 <- :1~#2801
-		PLEASE DO .2 <- :2~#2801
-		DO (1009) NEXT
-		DO .5 <- .3
-		PLEASE DO .6 <- .4
-		DO .1 <- :1~'#2793$#2744'
-		DO .2 <- :2~'#2793$#2744'
-		DO (1009) NEXT
-		DO .1 <- .3
-		PLEASE DO (1503) NEXT
-		DO .6 <- .4
-		DO .2 <- #1
-		DO (1009) NEXT
-		DO .1 <- .3
-		DO (1501) NEXT
-	(1504)	PLEASE RESUME .6
-	(1503)	DO (1504) NEXT
-	(1501)	DO .2 <- .5
-		DO .5 <- '&.6$.4'
-		DO (1505) NEXT
-	(1506)	DO (1502) NEXT
-		PLEASE DO (1999) NEXT
-	(1505)	DO (1001) NEXT
-	(1502)	DO :4 <- .5
-		DO (1520) NEXT
-		DO :3 <- :1
-		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
-		DO REINSTATE (1502)
-		DO REINSTATE (1506)
-		PLEASE RESUME #3
-	(1510)	DO STASH :1 + :2 + :4
-		DO :1 <- "'?#16806$":2~'#2801$#0'"'~'#0$#2801'"$
-		     "'?#16806$":2~'#0$#2801'"'~'#0$#2801'"
-		DO :2 <- #1
-		DO (1509) NEXT
-		PLEASE RETRIEVE :1
-		DO :2 <- :3
-		PLEASE DO (1509) NEXT
-		DO RETRIEVE :2 + :4
-		PLEASE RESUME #1
-	(1520)	PLEASE STASH .3 + .4
-		DO .3 <- .1~#2451
-		DO (1525) NEXT
-		PLEASE DO .4 <- 'V.3$".2~#350"'~'#0$#2801'
-		DO .3 <- .1~#350
-		PLEASE DO (1526) NEXT
-		DO :1 <- .4$"'V.3$".2~#2451"'~'#0$#2801'"
-		PLEASE RETRIEVE .3 + .4
-		DO RESUME #1
-	(1525)	DO .3 <- '"!3$#0'~'#400$#1'"$#0'~'#400$#1'
-		PLEASE RESUME #1
-	(1526)	DO .3 <- '"!3$#0'~'#400$#1'"$#0'~'#57$#8'
-		PLEASE RESUME #1
-	(1530)	DO STASH :2 + :3 + :4 + .1 + .2 + .5
-		DO :3 <- #0
-		DO :4 <- .2
-		DO (1535) NEXT
-	(1535)	PLEASE FORGET #1
-		DO .5 <- '?".1~#6"$#7'~#7
-		DO (1531) NEXT
-		DO :1 <- :4
-		DO (1720) NEXT
-		DO :1 <- :3
-		DO (1500) NEXT
-		PLEASE DO (1533) NEXT
-	(1531)	PLEASE DO (1001) NEXT
-	(1533)	DO FORGET #1
-		DO .1 <- .1~#2800
-		DO :4 <- ":4~'#0$#2801'"$"'":4~'#400$#0'"$#0'
-		    ~'#400$#1'"
-		PLEASE DO .5 <- '?"!1~.1'~#6"$#7'~#7
-		DO (1532) NEXT
-		DO (1535) NEXT
-	(1532)	DO (1001) NEXT
-		DO :1 <- :3
-		PLEASE RETRIEVE :2 + :3 + :4 + .1 + .2 + .5
-		DO RESUME #2
-	(1540)	PLEASE ABSTAIN FROM (1541)
-		DO ABSTAIN FROM (1542)
-	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
-		DO .1 <- :1~#2801
-		PLEASE DO .2 <- :2~'#2793$#2744'
-		DO .5 <- :1~'#2793$#2744'
-		DO (1530) NEXT
-		DO :3 <- :1
-		DO .2 <- :2~#2801
-		PLEASE DO (1530) NEXT
-		DO :5 <- :1
-		DO .1 <- .5
-		DO (1530) NEXT
-		DO :4 <- :1
-		PLEASE DO :1 <- ":3~'#2793$#2744'"$":4
-		     ~'#2793$#2744'"
-		DO .5 <- ':1~:1'~#6
-		DO .2 <- :2~'#2793$#2744'
-		DO (1530) NEXT
-		PLEASE DO .5 <- '"':1~:1'~#6"$.5'~#8
-		DO .1 <- :3~#2801
-		DO .2 <- #0
-		DO (1520) NEXT
-		PLEASE DO :2 <- :1
-		PLEASE DO .1 <- :4~#2801
-		DO (1520) NEXT
-		DO (1509) NEXT
-		DO .5 <- !5$"'^":4~#1"$#4'~#1"'~#351
-		DO :1 <- :3
-		DO :2 <- :5
-		DO (1509) NEXT
-		PLEASE DO .5 <- !5$"'^":4~#1"$#4'~#1"'~'#57$#1'
-		DO .5 <- '?"!5~.5'~#1"$#4'~#1
-		PLEASE RETRIEVE :4
-	(1541)	DO :4 <- .5
-		DO (1543) NEXT
-	(1542)	DO (1544) NEXT
-		PLEASE DO (1999) NEXT
-	(1543)	DO (1001) NEXT
-	(1544)	DO REINSTATE (1541)
-		PLEASE REINSTATE (1542)
-		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
-		DO RESUME #2
-	(1550)	DO STASH :1 + :4 + :5 + :6 + .1 + .5
-		DO :5 <- #0
-		DO .5 <- '?"':2~:2'~#6"$#7'~#7
-		PLEASE DO (1551) NEXT
-		DO :4 <- #1
-		PLEASE DO (1553) NEXT
-	(1553)	DO FORGET #1
-		DO .5 <- '?"':2~"#14406$#0"'"$#5'~#1
-		DO (1552) NEXT
-		DO :2 <- ":2~'#0$#2801'"$"'":2~'#400$#0'"$#0'
-		     ~'#400$#1'"
-		PLEASE DO :4 <- ":4~'#0$#2801'"$"'":4~'#400
-		     $#0'"$#0'~'#400$#1'"
-		DO (1553) NEXT
-	(1552)	DO (1001) NEXT
-		DO .1 <- #0
-	(1556)	PLEASE FORGET #1
-		DO :6 <- "'&":2~'#2801$#0'"$"'?#16806$":1
-		     ~'#2801$#0'"'~'#0$#2801'"'~'#0$#2801'"$
-		     "'&":2~'#0$#2801'"$"'?#16806$":1~'#0$
-		     #2801'"'~'#0$#2801'"'~'#0$#2801'"
-		DO :3 <- "'?":1~'#2801$#0'"$":2~'#2801$#0'"'
-		     ~'#0$#2801'"$"'?":1~'#0$#2801'"$":2~'#0$
-		     #2801'"'~'#0$#2801'"
-		DO :6 <- "'&":6~'#2801$#0'"$":3~'#2801$#0'"'
-		     ~'#0$#2801'"$"'&":6~'#0$#2801'"$":3~'#0$
-		     #2801'"'~'#0$#2801'"
-		DO :3 <- :3~'#16806$#16806'
-		DO :6 <- "'?"'V":6~'#2801$#0'"$#11204'~'#0$
-		     #2801'"$#11204'~'#0$#16806'"$"'?"'V":6
-		     ~'#0$#2801'"$#11204'~'#0$#2801'"$#11204'
-		     ~'#0$#16806'"
-		DO .5 <- "?'"':6~:3'~'"'"'&"':3~:3'~'#2801$#0'"$
-		     #2401'~'#0$#2801'"$"'?:3~:3'~'#400$#0'"'
-		     ~'#2401$#400'"$"'?:3~:3'~'#0$#2801'"'"~#1'$
-		     #5"~#1
-		PLEASE DO (1557) NEXT
-		DO (1510) NEXT
-		DO :1 <- :3
-		DO .5 <- '?#0$"'V.1$#5'~#1"'~#1
-		DO (1557) NEXT
-		DO .1 <- '^.1$#2801'~'#0$#2801'
-		DO (1556) NEXT
-	(1557)	PLEASE DO (1001) NEXT
-		PLEASE FORGET #1
-		DO :5 <- "'V":4~'.1$#0'"$":5~'#2801$#0'"'
-		     ~'#0$#2801'"$"'V":4~'#0$.1'"$":5~'#0$
-		     #2801'"'~'#0$#2801'"
-		DO .5 <- "?#2$':4~#1'"~#1
-		DO (1551) NEXT
-		DO :2 <- :2~'#2801$#2800'
-		DO :4 <- :4~'#2801$#2800'
-		DO .1 <- #0
-		PLEASE DO (1556) NEXT
-	(1551)	DO (1001) NEXT
-		DO :3 <- :5
-		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
-		PLEASE RESUME #2
-	(1720)	PLEASE STASH :1 + :3 + :4 + .1 + .5
-		DO :2 <- #0
-		DO .2 <- #0
-		DO .5 <- '?".1~#6"$#7'~#7
-		DO (1729) NEXT
-		DO .5 <- .1~#1
-		DO .2 <- :1~'#2801$#0'
-		DO .1 <- :1~'#0$#2801'
-		PLEASE DO (1726) NEXT
-		DO :1 <- '"?#0$.2"~"#0$#2801"'$'"?#0$.1"~"#0$
-		     #2801"'
-		DO :2 <- '"?'"V.2$#2801"~"#0$#2801"'$#2801"
-		     ~"#0$#2801"'$'"?'"V.1$#2801"~"#0$#2801"'$
-		     #2801"~"#0$#2801"'
-		DO (1728) NEXT
-	(1726)	PLEASE DO (1725) NEXT
-		DO :1 <- '"?#0$'"^.2$.2"~"#0$#2801"'"~"#0$
-		     #2801"'$'"?#0$'"^.1$.1"~"#0$#2801"'"~"#0$
-		     #2801"'
-		DO .2 <- "^'"V'"2@.2$#11204"~"#0$#2801"'$
-		     #5602"~"#0$#2801"'$'"2@.2$#2801"~"#0$
-		     #2801"'"~"#0$#2801"
-		DO .1 <- "^'"V'"2@.1$#11204"~"#0$#2801"'$
-		     #5602"~"#0$#2801"'$'"2@.1$#2801"~"#0$
-		     #2801"'"~"#0$#2801"
-		DO :2 <- '"?.2$#8403"~"#0$#2801"'$'"?.1$#8403"
-		     ~"#0$#2801"'
-	(1728)	DO .2 <- :2~'#2401$#0'
-		DO :2 <- ':2~"#0$#2801"'$'"':2~"#400$#0"'$#0"
-		     ~"#400$#1"'
-		DO (1509) NEXT
-		DO :2 <- :3
-		DO .2 <- '^.2$"'?":4~#1"$#1'~#1"'~#1
-		DO (1721) NEXT
-	(1725)	PLEASE DO (1724) NEXT
-		DO :2 <- '"?'"V'"?'"3@.2$#14005"~"#0$#2801"'$
-		     '"@.2$#0"~"#0$#2801"'"~"#0$#11204"'$#8403"
-		     ~"#0$#2801"'$#8403"~"#0$#2801"'$
-		     '"?'"V'"?'"3@.1$#14005"~"#0$#2801"'$'"@.1$
-		     #0"~"#0$#2801"'"~"#0$#11204"'$#8403"~"#0$
-		     #2801"'$#8403"~"#0$#2801"'
-		DO .2 <- '^.2$.2'~'#0$#2801'
-		DO .1 <- '^.1$.1'~'#0$#2801'
-		DO :1 <- '"^.2$.2"~"#0$#2801"'$'"^.1$.1"~"#0$
-		     #2801"'
-		PLEASE FORGET #2
-		DO (1728) NEXT
-	(1724)	PLEASE DO (1723) NEXT
-		DO :1 <- '"^'"^.2$.2"~"#0$#2801"'$.2"~"#0$
-		     #2801"'$'"^'"^.1$.1"~"#0$#2801"'$.1"
-		     ~"#0$#2801"'
-		DO .2 <- "^'"V'"2@.2$#16806"~"#0$#2801"'$
-		     #14005"~"#0$#2801"'$'"V'"4@.2$#16806"
-		     ~"#0$#2801"'$#14005"~"#0$#2801"'"~"#0$
-		     #2801"
-		DO .1 <- "^'"V'"2@.1$#16806"~"#0$#2801"'$
-		     #14005"~"#0$#2801"'$'"V'"4@.1$#16806"
-		     ~"#0$#2801"'$#14005"~"#0$#2801"'"~"#0$
-		     #2801"
-		DO :2 <- '"?.2$#8403"~"#0$#2801"'$'"?.1$#8403"
-		     ~"#0$#2801"'
-		PLEASE FORGET #3
-		DO (1728) NEXT
-	(1723)	PLEASE DO (1722) NEXT
-		DO :1 <- '"^.2$.2"~"#0$#2801"'$'"^.1$.1"~"#0$
-		     #2801"'
-		DO :2 <- '"?'"V'"3@.2$#16806"~"#0$#2801"'$
-		     #14005"~"#0$#2801"'$#14005"~"#0$#2801"'$
-		     '"?'"V'"3@.1$#16806"~"#0$#2801"'$#14005"
-		     ~"#0$#2801"'$#14005"~"#0$#2801"'
-		PLEASE FORGET #4
-		DO (1728) NEXT
-	(1729)	DO (1001) NEXT
-		DO (1721) NEXT
-	(1722)	PLEASE DO (1001) NEXT
-		DO :2 <- :1
-		DO .2 <- #0
-		DO FORGET #3
-	(1721)	PLEASE RETRIEVE :1 + :3 + :4 + .1 + .5
-		PLEASE RESUME #3
-	(1900)	DO STASH .2 + .5
-		DO .1 <- #0
-		DO .2 <- #1
-		PLEASE DO (1901) NEXT
-	(1901)	DO FORGET #1
-		DO %50 (1905) NEXT
-		DO %50 (1904) NEXT
-		DO %50 (1901) NEXT
-		PLEASE DO (1903) NEXT
-	(1905)	DO FORGET #1
-		DO .1 <- '^.1$".2~#8403"'~'#0$#2801'
-		PLEASE DO %50 .1 <- '^.1$".2~#5602"'~'#0$#2801'
-		DO (1906) NEXT
-	(1904)	DO .1 <- '^.1$.2'~'#0$#2801'
-	(1906)	DO %50 .1 <- '^.1$.2'~'#0$#2801'
-	(1903)	PLEASE FORGET #1
-		DO .2 <- !2$#0'~'#400$#1'
-		PLEASE DO .5 <- '^".2~.2"$#1'~#1
-		DO (1902) NEXT
-		DO (1901) NEXT
-	(1902)	DO (1001) NEXT
-		DO RETRIEVE .2 + .5
-		PLEASE RESUME #2
-	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
-		DO .3 <- #16795
-		DO :1 <- #6
-		DO (1911) NEXT
-		PLEASE NOTE THAT YOU CAN'T GET SENSE FROM INTERCAL
-	(1912)	DO (1001) NEXT
-	(1911)	DO FORGET #1
-		PLEASE DO (1900) NEXT
-		DO :2 <- .1
-		DO (1500) NEXT
-		PLEASE DO :1 <- :3
-		DO .1 <- .3
-		DO (1020) NEXT
-		PLEASE DO .3 <- .1
-		DO .5 <- '?"!3~.3'~#6"$#5'~#1
-		DO (1912) NEXT
-		DO .1 <- #12
-		PLEASE DO (1050) NEXT
-		DO RETRIEVE .1
-		DO (1530) NEXT
-		DO :2 <- #8403
-		DO (1500) NEXT
-		PLEASE DO .2 <- :3~'#2793$#2744'
-		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
-		DO RESUME #1
diff --git a/pit/lib/syslib3.3i b/pit/lib/syslib3.3i
new file mode 100644
index 0000000..fd1ea3c
--- /dev/null
+++ b/pit/lib/syslib3.3i
@@ -0,0 +1,323 @@
+		PLEASE KNOCK THREE TIMES BEFORE ENTERING
+
+	(1000)	PLEASE IGNORE .4
+		PLEASE ABSTAIN FROM (1005)
+	(1009)	DO STASH .1 + .2 + .5 + .6
+		DO .4 <- #1
+		DO (1004) NEXT
+	(1004)	PLEASE FORGET #1
+		DO .3 <- '^.1$.2'~'#0$#29524'
+		DO .6 <- '?"'V"'&.1$.2'~'#0$#29524'"$#29524'
+		     ~'#0$#29524'"$#29524'~'#0$#29524'
+		PLEASE DO .5 <- 'V".6~#39366"$#1'~#1
+		DO (1002) NEXT
+		DO .4 <- #2
+	(1005)	DO (1006) NEXT
+	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
+	(1002)	DO (1001) NEXT
+	(1006)	PLEASE FORGET #1
+		DO .5 <- 'V"!6~.6'~#2"$#1'~#1
+		DO (1003) NEXT
+		DO .1 <- .3
+		DO .2 <- !6$#0'~'#9841$#1'
+		DO (1004) NEXT
+	(1003)	DO (1001) NEXT
+		DO REINSTATE (1005)
+	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
+		DO REMEMBER .4
+		PLEASE RESUME #2
+	(1001)	DO RESUME .5
+	(1010)	DO STASH .1 + .2 + .4
+		DO .4 <- .1
+		DO .1 <- '?#59048$.2'~'#0$#29524'
+		DO (1020) NEXT
+		PLEASE DO .2 <- .4
+		PLEASE DO (1009) NEXT
+		DO RETRIEVE .1 + .2 + .4
+		PLEASE RESUME #1
+	(1020)	DO STASH .2 + .3
+		DO .2 <- #1
+		PLEASE DO (1021) NEXT
+	(1021)	DO FORGET #1
+		DO .3 <- 'V"!1~.2'$#1"'~#1
+		PLEASE DO .1 <- '^.1$.2'~'#0$#29524'
+		DO (1022) NEXT
+		DO .2 <- !2$#0'~'#9841$#1'
+		DO (1021) NEXT
+	(1023)	PLEASE RESUME .3
+	(1022)	DO (1023) NEXT
+		PLEASE RETRIEVE .2 + .3
+		PLEASE RESUME #2
+	(1030)	DO ABSTAIN FROM (1033)
+		PLEASE ABSTAIN FROM (1032)
+	(1039)	DO STASH :1 + .5
+		DO (1530) NEXT
+		DO .3 <- :1~#29524
+		PLEASE DO .5 <- :1~'#29403$#29403'
+		DO .5 <- 'V"!5~.5'~#2"$#1'~#1
+		DO (1031) NEXT
+	(1032)	DO (1033) NEXT
+		DO (1999) NEXT
+	(1031)	DO (1001) NEXT
+	(1033)	DO .4 <- .5
+		DO REINSTATE (1032)
+		PLEASE REINSTATE (1033)
+		DO RETRIEVE :1 + .5
+		PLEASE RESUME #2
+	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
+		DO .2 <- #0
+		DO (1520) NEXT
+		DO STASH :1
+		PLEASE RETRIEVE .2
+		DO .1 <- .2
+		DO .2 <- #0
+		PLEASE DO (1520) NEXT
+		DO :2 <- :1
+		DO RETRIEVE .1 + .2 + :1
+		DO (1550) NEXT
+		PLEASE DO .3 <- :3
+		DO RETRIEVE :1 + :2 + :3
+		DO RESUME #1
+	(1050)	PLEASE STASH :2 + :3 + .5
+		DO :2 <- .1
+		PLEASE DO (1550) NEXT
+		DO .5 <- :3~'#29403$#29403'
+		DO .5 <- 'V"!5~.5'~#2"$#1'~#1
+		DO (1051) NEXT
+		DO (1999) NEXT
+	(1051)	DO (1001) NEXT
+		DO .2 <- :3
+		PLEASE RETRIEVE :2 + :3 + .5
+		DO RESUME #2
+	(1500)	PLEASE ABSTAIN FROM (1502)
+		PLEASE ABSTAIN FROM (1506)
+	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO .1 <- :1~#29524
+		PLEASE DO .2 <- :2~#29524
+		DO (1009) NEXT
+		DO .5 <- .3
+		PLEASE DO .6 <- .4
+		DO .1 <- :1~'#29403$#29403'
+		DO .2 <- :2~'#29403$#29403'
+		DO (1009) NEXT
+		DO .1 <- .3
+		PLEASE DO (1503) NEXT
+		DO .6 <- .4
+		DO .2 <- #1
+		DO (1009) NEXT
+		DO .1 <- .3
+		DO (1501) NEXT
+	(1504)	PLEASE RESUME .6
+	(1503)	DO (1504) NEXT
+	(1501)	DO .2 <- .5
+		DO .5 <- '&.6$.4'
+		DO (1505) NEXT
+	(1506)	DO (1502) NEXT
+		PLEASE DO (1999) NEXT
+	(1505)	DO (1001) NEXT
+	(1502)	DO :4 <- .5
+		DO (1520) NEXT
+		DO :3 <- :1
+		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO REINSTATE (1502)
+		DO REINSTATE (1506)
+		PLEASE RESUME #3
+	(1510)	DO STASH :1 + :2 + :4
+		DO :1 <- "'?#59048$":2~'#29524$#0'"'~'#0$#29524'"
+		     $"'?#59048$":2~'#0$#29524'"'~'#0$#29524'"
+		DO :2 <- #1
+		DO (1509) NEXT
+		PLEASE RETRIEVE :1
+		DO :2 <- :3
+		PLEASE DO (1509) NEXT
+		DO RETRIEVE :2 + :4
+		PLEASE RESUME #1
+	(1520)	PLEASE STASH .3 + .4
+		DO .3 <- .1~#22143
+		DO (1525) NEXT
+		PLEASE DO .4 <- 'V.3$".2~#22143"'~'#0$#29524'
+		DO .3 <- .1~#7381
+		PLEASE DO (1525) NEXT
+		DO :1 <- .4$"'V.3$".2~#7381"'~'#0$#29524'"
+		PLEASE RETRIEVE .3 + .4
+		DO RESUME #1
+	(1525)	DO .3 <- '"'"!3$#0'~'#9841$#1'"$#0'~'#3280$#4'"
+		     $#0'~'#3280$#4'
+		PLEASE RESUME #1
+	(1530)	DO STASH :2 + :3 + .3 + .5
+		DO :1 <- #0
+		DO :2 <- .2
+		DO .3 <- #1
+		DO (1535) NEXT
+	(1535)	PLEASE FORGET #1
+		DO .5 <- '@"'^".1~.3"$#7'~#4"$#2'~#10
+		DO (1534) NEXT
+		DO (1500) NEXT
+		DO :1 <- :3
+		DO (1536) NEXT
+	(1534)	DO (1531) NEXT
+	(1536)	DO (1500) NEXT
+		DO :1 <- :3
+		PLEASE DO (1533) NEXT
+	(1531)	PLEASE DO (1001) NEXT
+	(1533)	DO FORGET #2
+		DO .3 <- !3$#0'~'#9841$#1'
+		DO :2 <- ":2~'#0$#29524'"$"'":2~'#9841$#0'"$#0'
+		     ~'#9841$#1'"
+		PLEASE DO .5 <- 'V"!3~.3'~#2"$#1'~#1
+		DO (1532) NEXT
+		DO (1535) NEXT
+	(1532)	DO (1001) NEXT
+		PLEASE RETRIEVE :2 + :3 + .3 + .5
+		DO RESUME #2
+	(1540)	PLEASE ABSTAIN FROM (1541)
+		DO ABSTAIN FROM (1542)
+	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
+		DO .1 <- :1~#29524
+		PLEASE DO .2 <- :2~'#29403$#29403'
+		DO .5 <- :1~'#29403$#29403'
+		DO (1530) NEXT
+		DO :3 <- :1
+		DO .2 <- :2~#29524
+		PLEASE DO (1530) NEXT
+		DO :5 <- :1
+		DO .1 <- .5
+		DO (1530) NEXT
+		DO :4 <- :1
+		PLEASE DO :1 <- ":3~'#29403$#29403'"$":4~'#29403
+		     $#29403'"
+		DO .5 <- ':1~:1'~#2
+		DO .2 <- :2~'#29403$#29403'
+		DO (1530) NEXT
+		PLEASE DO .5 <- '"':1~:1'~#2"$.5'~#4
+		DO .1 <- :3~#29524
+		DO .2 <- #0
+		DO (1520) NEXT
+		PLEASE DO :2 <- :1
+		PLEASE DO .1 <- :4~#29524
+		DO (1520) NEXT
+		DO (1509) NEXT
+		DO .5 <- !5$":4~#1"'~#31
+		DO :1 <- :3
+		DO :2 <- :5
+		DO (1509) NEXT
+		PLEASE DO .5 <- !5$":4~#1"'~#274
+		DO .5 <- !5~.5'~#1
+		PLEASE RETRIEVE :4
+	(1541)	DO :4 <- .5
+		DO (1543) NEXT
+	(1542)	DO (1544) NEXT
+		PLEASE DO (1999) NEXT
+	(1543)	DO (1001) NEXT
+	(1544)	DO REINSTATE (1541)
+		PLEASE REINSTATE (1542)
+		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
+		DO RESUME #2
+	(1550)	DO STASH :1 + :4 + :5 + :6 + .5
+		DO :3 <- #0
+		DO .5 <- 'V"':2~:2'~#2"$#1'~#1
+		PLEASE DO (1551) NEXT
+		DO :4 <- #1
+		PLEASE DO (1553) NEXT
+	(1553)	DO FORGET #1
+		DO .5 <- '?"':2~"#39366$#0"'"$#1'~#1
+		DO (1552) NEXT
+		DO :2 <- ":2~'#0$#29524'"$"'":2~'#9841$#0'"$#0'
+		     ~'#9841$#1'"
+		PLEASE DO :4 <- ":4~'#0$#29524'"$"'":4~'#9841
+		     $#0'"$#0'~'#9841$#1'"
+		DO (1553) NEXT
+	(1552)	DO (1001) NEXT
+	(1556)	PLEASE FORGET #1
+		DO :6 <- "'&":2~'#29524$#0'"$"'?#59048$":1
+		     ~'#29524$#0'"'~'#0$#29524'"'~'#0$#29524'"$
+		     "'&":2~'#0$#29524'"$"'?#59048$":1~'#0$
+		     #29524'"'~'#0$#29524'"'~'#0$#29524'"
+		DO :5 <- "'?":1~'#29524$#0'"$":2~'#29524$#0'"'
+		     ~'#0$#59048'"$"'?":1~'#0$#29524'"$":2~'#0$
+		     #29524'"'~'#0$#59048'"
+		DO .5 <- "?'"':6~:5'~'"'"'&"':5~:5'~'#29524$#0'"$
+		     #19683'~'#0$#29524'"$"'?:5~:5'~'#9841$#0'"'
+		     ~'#19683$#9841'"$"'?:5~:5'~'#0$#29524'"'"
+		     ~#1'$#1"~#1
+		DO (1554) NEXT
+		DO :5 <- :3
+		DO (1510) NEXT
+		PLEASE DO :1 <- :3
+		DO :6 <- "'&":2~'#29524$#0'"$"'?#59048$":1
+		     ~'#29524$#0'"'~'#0$#29524'"'~'#0$#29524'"$
+		     "'&":2~'#0$#29524'"$"'?#59048$":1~'#0$
+		     #29524'"'~'#0$#29524'"'~'#0$#29524'"
+		DO :3 <- "'?":1~'#29524$#0'"$":2~'#29524$#0'"'
+		     ~'#0$#59048'"$"'?":1~'#0$#29524'"$":2~'#0$
+		     #29524'"'~'#0$#59048'"
+		DO .5 <- "?'"':6~:3'~'"'"'&"':3~:3'~'#29524$#0'"$
+		     #19683'~'#0$#29524'"$"'?:3~:3'~'#9841$#0'"'
+		     ~'#19683$#9841'"$"'?:3~:3'~'#0$#29524'"'"
+		     ~#1'$#1"~#1
+		DO (1557) NEXT
+		DO (1510) NEXT
+		PLEASE DO :1 <- :3
+		DO :3 <- "'V":4~'#59048$#0'"$":5~'#29524$#0'"'
+		     ~'#0$#29524'"$"'V":4~'#0$#59048'"$":5~'#0$
+		     #29524'"'~'#0$#29524'"
+		PLEASE DO (1555) NEXT
+	(1557)	PLEASE DO (1001) NEXT
+		PLEASE FORGET #1
+		DO :3 <- "'V":4~'#29524$#0'"$":5~'#29524$#0'"'
+		     ~'#0$#29524'"$"'V":4~'#0$#29524'"$":5~'#0$
+		     #29524'"'~'#0$#29524'"
+		PLEASE DO (1555) NEXT
+	(1554)	PLEASE DO (1001) NEXT
+	(1555)	PLEASE FORGET #1
+		DO .5 <- "?':4~#2'$#1"~#1
+		DO (1551) NEXT
+		DO :2 <- :2~'#29524$#29523'
+		DO :4 <- :4~'#29524$#29523'
+		PLEASE DO (1556) NEXT
+	(1551)	DO (1001) NEXT
+		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .5
+		PLEASE RESUME #2
+	(1900)	DO STASH .2 + .5
+		DO .1 <- #0
+		DO .2 <- #1
+		PLEASE DO (1901) NEXT
+	(1901)	DO FORGET #1
+		DO %50 (1904) NEXT
+		DO %50 (1901) NEXT
+		PLEASE DO (1903) NEXT
+	(1904)	DO .1 <- '^.1$.2'~'#0$#29524'
+		DO %50 .1 <- '^.1$.2'~'#0$#29524'
+	(1903)	PLEASE FORGET #1
+		DO .2 <- !2$#0'~'#9841$#1'
+		PLEASE DO .5 <- 'V"!2~.2'~#2"$#1'~#1
+		DO (1902) NEXT
+		DO (1901) NEXT
+	(1902)	DO (1001) NEXT
+		DO RETRIEVE .2 + .5
+		PLEASE RESUME #2
+	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
+		DO .3 <- #59037
+		DO :1 <- #6
+		DO (1911) NEXT
+		PLEASE NOTE THAT YOU CAN'T GET THREE FROM HERE
+	(1912)	DO (1001) NEXT
+	(1911)	DO FORGET #1
+		PLEASE DO (1900) NEXT
+		DO :2 <- .1
+		DO (1500) NEXT
+		PLEASE DO :1 <- :3
+		DO .1 <- .3
+		DO (1020) NEXT
+		PLEASE DO .3 <- .1
+		DO .5 <- '?"!3~.3'~#2"$#1'~#1
+		DO (1912) NEXT
+		DO .1 <- #12
+		PLEASE DO (1050) NEXT
+		DO RETRIEVE .1
+		DO (1530) NEXT
+		DO :2 <- #29524
+		DO (1500) NEXT
+		PLEASE DO .2 <- :3~'#29403$#29403'
+		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
+		DO RESUME #1
diff --git a/pit/lib/syslib4.4i b/pit/lib/syslib4.4i
new file mode 100644
index 0000000..d1c1084
--- /dev/null
+++ b/pit/lib/syslib4.4i
@@ -0,0 +1,354 @@
+		PLEASE KNOCK TWICE TWO TIMES BEFORE ENTERING
+
+	(1000)	PLEASE IGNORE .4
+		PLEASE ABSTAIN FROM (1005)
+	(1009)	DO STASH .1 + .2 + .5 + .6
+		DO .4 <- #1
+		DO (1004) NEXT
+	(1004)	PLEASE FORGET #1
+		DO .3 <- '^.1$.2'~'#0$#21845'
+		DO .6 <- '?"'V"'&.1$.2'~'#0$#21845'"$"'^"'@.1$
+		      .2'~'#0$#21845'"$#21845'~'#0$#43690'"'
+		      ~'#0$#21845'"$#43690'~'#0$#21845'
+		PLEASE DO .5 <- '?".6~#49152"$#4'~#4
+		DO (1002) NEXT
+		DO .4 <- #2
+	(1005)	DO (1006) NEXT
+	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
+	(1002)	DO (1001) NEXT
+	(1006)	PLEASE FORGET #1
+		DO .5 <- '?"!6~.6'~#3"$#4'~#4
+		DO (1003) NEXT
+		DO .1 <- .3
+		DO .2 <- !6$#0'~'#5461$#1'
+		DO (1004) NEXT
+	(1003)	DO (1001) NEXT
+		DO REINSTATE (1005)
+	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
+		DO REMEMBER .4
+		PLEASE RESUME #2
+	(1001)	DO RESUME .5
+	(1010)	DO STASH .1 + .2 + .4
+		DO .4 <- .1
+		DO .1 <- '?#65535$.2'~'#0$#21845'
+		DO (1020) NEXT
+		PLEASE DO .2 <- .4
+		PLEASE DO (1009) NEXT
+		DO RETRIEVE .1 + .2 + .4
+		PLEASE RESUME #1
+	(1020)	DO STASH .2 + .3
+		DO .2 <- #1
+		PLEASE DO (1021) NEXT
+	(1021)	DO FORGET #1
+		DO .3 <- '?"'V".1~.2"$#2'~#1"$#1'~#1
+		PLEASE DO .1 <- '^.1$.2'~'#0$#21845'
+		DO (1022) NEXT
+		DO .2 <- !2$#0'~'#5461$#1'
+		DO (1021) NEXT
+	(1023)	PLEASE RESUME .3
+	(1022)	DO (1023) NEXT
+		PLEASE RETRIEVE .2 + .3
+		PLEASE RESUME #2
+	(1030)	DO ABSTAIN FROM (1033)
+		PLEASE ABSTAIN FROM (1032)
+	(1039)	DO STASH :1 + .5
+		DO (1530) NEXT
+		DO .3 <- :1~#21845
+		PLEASE DO .5 <- :1~'#21760$#21760'
+		DO .5 <- '?"!5~.5'~#3"$#4'~#4
+		DO (1031) NEXT
+	(1032)	DO (1033) NEXT
+		DO (1999) NEXT
+	(1031)	DO (1001) NEXT
+	(1033)	DO .4 <- .5
+		DO REINSTATE (1032)
+		PLEASE REINSTATE (1033)
+		DO RETRIEVE :1 + .5
+		PLEASE RESUME #2
+	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
+		DO .2 <- #0
+		DO (1520) NEXT
+		DO STASH :1
+		PLEASE RETRIEVE .2
+		DO .1 <- .2
+		DO .2 <- #0
+		PLEASE DO (1520) NEXT
+		DO :2 <- :1
+		DO RETRIEVE .1 + .2 + :1
+		DO (1550) NEXT
+		PLEASE DO .3 <- :3
+		DO RETRIEVE :1 + :2 + :3
+		DO RESUME #1
+	(1050)	PLEASE STASH :2 + :3 + .5
+		DO :2 <- .1
+		PLEASE DO (1550) NEXT
+		DO .5 <- :3~'#21760$#21760'
+		DO .5 <- '?"!5~.5'~#3"$#4'~#4
+		DO (1051) NEXT
+		DO (1999) NEXT
+	(1051)	DO (1001) NEXT
+		DO .2 <- :3
+		PLEASE RETRIEVE :2 + :3 + .5
+		DO RESUME #2
+	(1200)	DO .2 <- '^.1$.1'~'#0$#21845'
+		DO .3 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
+		     ~'#0$#21845'"'~'#0$#21845'
+		DO .2 <- '^.2$"!3$#0'~'#5461$#1'"'~'#0$#21845'
+		DO .3 <- .3~#16384
+		PLEASE RESUME #1
+	(1210)	DO .2 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
+		     ~'#0$#21845'"'~'#0$#21845'
+		DO .3 <- '^.1$.1'~'#0$#21845'
+		DO .2 <- '^.2$".3~#21844"'~'#0$#21845'
+		DO .3 <- .3~#1
+		PLEASE RESUME #1
+	(1500)	PLEASE ABSTAIN FROM (1502)
+		PLEASE ABSTAIN FROM (1506)
+	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO .1 <- :1~#21845
+		PLEASE DO .2 <- :2~#21845
+		DO (1009) NEXT
+		DO .5 <- .3
+		PLEASE DO .6 <- .4
+		DO .1 <- :1~'#21760$#21760'
+		DO .2 <- :2~'#21760$#21760'
+		DO (1009) NEXT
+		DO .1 <- .3
+		PLEASE DO (1503) NEXT
+		DO .6 <- .4
+		DO .2 <- #1
+		DO (1009) NEXT
+		DO .1 <- .3
+		DO (1501) NEXT
+	(1504)	PLEASE RESUME .6
+	(1503)	DO (1504) NEXT
+	(1501)	DO .2 <- .5
+		DO .5 <- '&.6$.4'
+		DO (1505) NEXT
+	(1506)	DO (1502) NEXT
+		PLEASE DO (1999) NEXT
+	(1505)	DO (1001) NEXT
+	(1502)	DO :4 <- .5
+		DO (1520) NEXT
+		DO :3 <- :1
+		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO REINSTATE (1502)
+		DO REINSTATE (1506)
+		PLEASE RESUME #3
+	(1510)	DO STASH :1 + :2 + :4
+		DO :1 <- "'?#65535$":2~'#21845$#0'"'~'#0$#21845'"$
+		     "'?#65535$":2~'#0$#21845'"'~'#0$#21845'"
+		DO :2 <- #1
+		DO (1509) NEXT
+		PLEASE RETRIEVE :1
+		DO :2 <- :3
+		PLEASE DO (1509) NEXT
+		DO RETRIEVE :2 + :4
+		PLEASE RESUME #1
+	(1520)	PLEASE STASH .3 + .4
+		DO .3 <- .1~#17476
+		DO (1525) NEXT
+		PLEASE DO .4 <- 'V.3$".2~#17476"'~'#0$#21845'
+		DO .3 <- .1~#4369
+		PLEASE DO (1525) NEXT
+		DO :1 <- .4$"'V.3$".2~#4369"'~'#0$#21845'"
+		PLEASE RETRIEVE .3 + .4
+		DO RESUME #1
+	(1525)	DO .3 <- '"'"!3$#0'~'#5461$#1'"$#0'~'#5461$#1'"$
+		     #0'~'#1365$#5'
+		PLEASE RESUME #1
+	(1530)	DO STASH :2 + :3 + .1 + .2 + .3
+		DO :3 <- #0
+		DO :2 <- .1
+		DO (1535) NEXT
+	(1535)	PLEASE FORGET #1
+		DO .3 <- '?"!2~.2'~#3"$#4'~#4
+		DO (1532) NEXT
+		DO .1 <- .2
+		DO (1210) NEXT
+		DO .3 <- 'V.3$#1'~#1
+		DO (1531) NEXT
+		DO :1 <- :3
+		DO (1500) NEXT
+		PLEASE DO (1533) NEXT
+	(1531)	PLEASE DO (1534) NEXT
+	(1533)	DO FORGET #1
+		DO :1 <- :2
+		DO (1700) NEXT
+		DO (1535) NEXT
+	(1534)	PLEASE RESUME .3
+	(1532)	DO (1534) NEXT
+		DO :1 <- :3
+		PLEASE RETRIEVE :2 + :3 + .1 + .2 + .3
+		DO RESUME #2
+	(1540)	PLEASE ABSTAIN FROM (1541)
+		DO ABSTAIN FROM (1542)
+	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
+		DO .1 <- :1~#21845
+		PLEASE DO .2 <- :2~'#21760$#21760'
+		DO .5 <- :1~'#21760$#21760'
+		DO (1530) NEXT
+		DO :3 <- :1
+		DO .2 <- :2~#21845
+		PLEASE DO (1530) NEXT
+		DO :5 <- :1
+		DO .1 <- .5
+		DO (1530) NEXT
+		DO :4 <- :1
+		PLEASE DO :1 <- ":3~'#21760$#21760'"$":4
+		     ~'#21760$#21760'"
+		DO .5 <- ':1~:1'~#3
+		DO .2 <- :2~'#21760$#21760'
+		DO (1530) NEXT
+		PLEASE DO .5 <- '"':1~:1'~#3"$.5'~#5
+		DO .1 <- :3~#21845
+		DO .2 <- #0
+		DO (1520) NEXT
+		PLEASE DO :2 <- :1
+		PLEASE DO .1 <- :4~#21845
+		DO (1520) NEXT
+		DO (1509) NEXT
+		DO .5 <- !5$"'^":4~#1"$#1'~#1"'~#69
+		DO :1 <- :3
+		DO :2 <- :5
+		DO (1509) NEXT
+		PLEASE DO .5 <- !5$"'^":4~#1"$#1'~#1"'~#1093
+		DO .5 <- '?"!5~.5'~#1"$#1'~#1
+		PLEASE RETRIEVE :4
+	(1541)	DO :4 <- .5
+		DO (1543) NEXT
+	(1542)	DO (1544) NEXT
+		PLEASE DO (1999) NEXT
+	(1543)	DO (1001) NEXT
+	(1544)	DO REINSTATE (1541)
+		PLEASE REINSTATE (1542)
+		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
+		DO RESUME #2
+	(1550)	DO STASH :1 + :1 + :4 + :5 + :6 + .1 + .5
+		DO :3 <- #0
+		DO .5 <- '?"':2~:2'~#3"$#4'~#4
+		PLEASE DO (1551) NEXT
+		DO :4 <- #1
+		PLEASE DO (1553) NEXT
+	(1553)	DO FORGET #1
+		DO .5 <- '?#0$"'V"'@":2~'#16384$#0'"$#3'~#1"$#2'
+		     ~#1"'~#1
+		DO (1552) NEXT
+		DO :5 <- :2
+		DO :1 <- :4
+		PLEASE DO (1700) NEXT
+		DO :4 <- :2
+		DO :1 <- :5
+		PLEASE DO (1700) NEXT
+		DO (1553) NEXT
+	(1552)	DO (1001) NEXT
+		DO RETRIEVE :1
+	(1556)	PLEASE FORGET #1
+		DO :6 <- "'&":2~'#21845$#0'"$"'?#65535$":1
+		     ~'#21845$#0'"'~'#0$#21845'"'~'#0$#21845'"$
+		     "'&":2~'#0$#21845'"$"'?#65535$":1~'#0$
+		     #21845'"'~'#0$#21845'"'~'#0$#21845'"
+		DO :6 <- "'?"'V":6~'#21845$#0'"$#21845'~'#0$
+		     #21845'"$#21845'~'#0$#65535'"$"'?"'V":6
+		     ~'#0$#21845'"$#21845'~'#0$#21845'"$#21845'
+		     ~'#0$#65535'"
+		DO :5 <- "'?":1~'#21845$#0'"$":2~'#21845$#0'"'
+		     ~'#0$#65535'"$"'?":1~'#0$#21845'"$":2~'#0$
+		     #21845'"'~'#0$#65535'"
+		DO .5 <- "?'"':6~:5'~'"'"'&"':5~:5'~'#21845$#0'"$
+		     #16384'~'#0$#21845'"$"'?:5~:5'~'#5461$#0'"'
+		     ~'#16384$#5461'"$"'?:5~:5'~'#0$#21845'"'"
+		     ~#1'$#2"~#1
+		DO (1554) NEXT
+		DO :5 <- :3
+		DO (1510) NEXT
+		PLEASE DO :1 <- :3
+		DO :3 <- "'^":4~'#21845$#0'"$":5~'#21845$#0'"'
+		     ~'#0$#21845'"$"'^":4~'#0$#21845'"$":5~'#0$
+		     #21845'"'~'#0$#21845'"
+		DO (1555) NEXT
+	(1554)	PLEASE DO (1001) NEXT
+	(1555)	DO FORGET #1
+		DO .5 <- 'V":4~#1"$"'?#2$":4~#1"'~#1"'~#1
+		DO (1551) NEXT
+		DO :5 <- :1
+		DO :1 <- :4
+		DO :4 <- :2
+		DO (1710) NEXT
+		DO :1 <- :4
+		DO :4 <- :2
+		DO (1710) NEXT
+		DO :1 <- :5
+		PLEASE DO (1556) NEXT
+	(1551)	DO (1001) NEXT
+		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
+		PLEASE RESUME #2
+	(1700)	PLEASE STASH .2
+		DO .1 <- :1~'#0$#21845'
+		DO .2 <- :1~'#21845$#0'
+		DO :2 <- "'^.2$.2'~'#0$#21845'"$"'^.1$.1'~'#0$
+		     #21845'"
+		DO .1 <- '?"'@.1$#0'~'#0$#21845'"$"'@.1$#65535'
+		     ~'#0$#21845'"'~'#0$#21845'
+		DO .2 <- '?"'@.2$#0'~'#0$#21845'"$"'@.2$#65535'
+		     ~'#0$#21845'"'~'#0$#21845'
+		DO :2 <- "'^":2~'#21845$#0'"$.1'~'#0$#21845'"$
+		     "'^":2~'#0$#21845'"$"'.2$#0'~'#5461$#1'"'
+		     ~'#0$#21845'"
+		DO .1 <- .2~#16384
+		PLEASE RETRIEVE .2
+		PLEASE RESUME #1
+	(1710)	PLEASE STASH :1 + .2
+		DO .1 <- :1~'#0$#21845'
+		DO .2 <- :1~'#21845$#0'
+		DO :2 <- "'^.2$.2'~'#0$#21845'"$"'^.1$.1'~'#0$
+		     #21845'"
+		DO :1 <- "'?"'@.2$#0'~'#0$#21845'"$"'@.2$#65535'
+		     ~'#0$#21845'"'~'#0$#21845'"$"'?"'@.1$#0'
+		     ~'#0$#21845'"$"'@.1$#65535'~'#0$#21845'"'
+		     ~'#0$#21845'"
+		DO .1 <- :2~#1
+		DO :2 <- "'^":1~'#21845$#0'"$":2~'#0$#21844'"'
+		     ~'#0$#21845'"$"'^":1~'#0$#21845'"$":2
+		     ~'#21845$#0'"'~'#0$#21845'"
+		PLEASE RETRIEVE :1 + .2
+		PLEASE RESUME #1
+	(1900)	DO STASH .2 + .5
+		DO .1 <- #0
+		DO .2 <- #1
+		PLEASE DO (1901) NEXT
+	(1901)	PLEASE FORGET #1
+		DO %50 .1 <- 'V.1$.2'~'#0$#21845'
+		DO %50 .1 <- '^.1$".2~#43690"'~'#0$#21845'
+		DO .2 <- !2$#0'~'#5461$#1'
+		PLEASE DO .5 <- '^".2~.2"$#1'~#1
+		DO (1902) NEXT
+		DO (1901) NEXT
+	(1902)	DO (1001) NEXT
+		DO RETRIEVE .2 + .5
+		PLEASE RESUME #2
+	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
+		DO .3 <- #65524
+		DO :1 <- #6
+		DO (1911) NEXT
+		PLEASE NOTE THAT YOU CAN'T GET ANYWHERE FROM HERE
+	(1912)	DO (1001) NEXT
+	(1911)	DO FORGET #1
+		PLEASE DO (1900) NEXT
+		DO :2 <- .1
+		DO (1500) NEXT
+		PLEASE DO :1 <- :3
+		DO .1 <- .3
+		DO (1020) NEXT
+		PLEASE DO .3 <- .1
+		DO .5 <- '?"!3~.3'~#3"$#2'~#1
+		DO (1912) NEXT
+		DO .1 <- #12
+		PLEASE DO (1050) NEXT
+		DO RETRIEVE .1
+		DO (1530) NEXT
+		DO :2 <- #32768
+		DO (1500) NEXT
+		PLEASE DO .2 <- :3~'#21760$#21760'
+		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
+		DO RESUME #1
diff --git a/pit/lib/syslib5.5i b/pit/lib/syslib5.5i
new file mode 100644
index 0000000..518b7cd
--- /dev/null
+++ b/pit/lib/syslib5.5i
@@ -0,0 +1,355 @@
+		PLEASE KNOCK "SHAVE-AND-A-HAIRCUT" BEFORE ENTERING
+
+	(1000)	PLEASE IGNORE .4
+		PLEASE ABSTAIN FROM (1005)
+	(1009)	DO STASH .1 + .2 + .5 + .6
+		DO .4 <- #1
+		DO (1004) NEXT
+	(1004)	PLEASE FORGET #1
+		DO .3 <- '^.1$.2'~'#0$#3906'
+		DO .6 <- '?"'V"'&.1$.2'~'#0$#3906'"$"'^"'@.1$
+		      .2'~'#0$#3906'"$#3906'~'#0$#11718'"'
+		      ~'#0$#3906'"$#11718'~'#0$#3906'
+		PLEASE DO .5 <- "?!6~#12500'$#5"~#5
+		DO (1002) NEXT
+		DO .4 <- #2
+	(1005)	DO (1006) NEXT
+	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
+	(1002)	DO (1001) NEXT
+	(1006)	PLEASE FORGET #1
+		DO .5 <- '?"!6~.6'~#4"$#5'~#5
+		DO (1003) NEXT
+		DO .1 <- .3
+		DO .2 <- !6$#0'~'#781$#1'
+		DO (1004) NEXT
+	(1003)	DO (1001) NEXT
+		DO REINSTATE (1005)
+	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
+		DO REMEMBER .4
+		PLEASE RESUME #2
+	(1001)	DO RESUME .5
+	(1010)	DO STASH .1 + .2 + .4
+		DO .4 <- .1
+		DO .1 <- '?#15624$.2'~'#0$#3906'
+		DO (1020) NEXT
+		PLEASE DO .2 <- .4
+		PLEASE DO (1009) NEXT
+		DO RETRIEVE .1 + .2 + .4
+		PLEASE RESUME #1
+	(1020)	DO STASH .2 + .3
+		DO .2 <- #1
+		PLEASE DO (1021) NEXT
+	(1021)	DO FORGET #1
+		DO .3 <- '?"'V".1~.2"$#3'~#1"$#2'~#1
+		PLEASE DO .1 <- '^.1$.2'~'#0$#3906'
+		DO (1022) NEXT
+		DO .2 <- !2$#0'~'#781$#1'
+		DO (1021) NEXT
+	(1023)	PLEASE RESUME .3
+	(1022)	DO (1023) NEXT
+		PLEASE RETRIEVE .2 + .3
+		PLEASE RESUME #2
+	(1030)	DO ABSTAIN FROM (1033)
+		PLEASE ABSTAIN FROM (1032)
+	(1039)	DO STASH :1 + .5
+		DO (1530) NEXT
+		DO .3 <- :1~#3906
+		PLEASE DO .5 <- :1~'#3875$#3875'
+		DO .5 <- '?"!5~.5'~#4"$#5'~#5
+		DO (1031) NEXT
+	(1032)	DO (1033) NEXT
+		DO (1999) NEXT
+	(1031)	DO (1001) NEXT
+	(1033)	DO .4 <- .5
+		DO REINSTATE (1032)
+		PLEASE REINSTATE (1033)
+		DO RETRIEVE :1 + .5
+		PLEASE RESUME #2
+	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
+		DO .2 <- #0
+		DO (1520) NEXT
+		DO STASH :1
+		PLEASE RETRIEVE .2
+		DO .1 <- .2
+		DO .2 <- #0
+		PLEASE DO (1520) NEXT
+		DO :2 <- :1
+		DO RETRIEVE .1 + .2 + :1
+		DO (1550) NEXT
+		PLEASE DO .3 <- :3
+		DO RETRIEVE :1 + :2 + :3
+		DO RESUME #1
+	(1050)	PLEASE STASH :2 + :3 + .5
+		DO :2 <- .1
+		PLEASE DO (1550) NEXT
+		DO .5 <- :3~'#3875$#3875'
+		DO .5 <- '?"!5~.5'~#4"$#5'~#5
+		DO (1051) NEXT
+		DO (1999) NEXT
+	(1051)	DO (1001) NEXT
+		DO .2 <- :3
+		PLEASE RETRIEVE :2 + :3 + .5
+		DO RESUME #2
+	(1500)	PLEASE ABSTAIN FROM (1502)
+		PLEASE ABSTAIN FROM (1506)
+	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO .1 <- :1~#3906
+		PLEASE DO .2 <- :2~#3906
+		DO (1009) NEXT
+		DO .5 <- .3
+		PLEASE DO .6 <- .4
+		DO .1 <- :1~'#3875$#3875'
+		DO .2 <- :2~'#3875$#3875'
+		DO (1009) NEXT
+		DO .1 <- .3
+		PLEASE DO (1503) NEXT
+		DO .6 <- .4
+		DO .2 <- #1
+		DO (1009) NEXT
+		DO .1 <- .3
+		DO (1501) NEXT
+	(1504)	PLEASE RESUME .6
+	(1503)	DO (1504) NEXT
+	(1501)	DO .2 <- .5
+		DO .5 <- '&.6$.4'
+		DO (1505) NEXT
+	(1506)	DO (1502) NEXT
+		PLEASE DO (1999) NEXT
+	(1505)	DO (1001) NEXT
+	(1502)	DO :4 <- .5
+		DO (1520) NEXT
+		DO :3 <- :1
+		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO REINSTATE (1502)
+		DO REINSTATE (1506)
+		PLEASE RESUME #3
+	(1510)	DO STASH :1 + :2 + :4
+		DO :1 <- "'?#15624$":2~'#3906$#0'"'~'#0$#3906'"$
+		     "'?#15624$":2~'#0$#3906'"'~'#0$#3906'"
+		DO :2 <- #1
+		DO (1509) NEXT
+		PLEASE RETRIEVE :1
+		DO :2 <- :3
+		PLEASE DO (1509) NEXT
+		DO RETRIEVE :2 + :4
+		PLEASE RESUME #1
+	(1520)	PLEASE STASH .3 + .4
+		DO .3 <- .1~#3255
+		DO (1525) NEXT
+		PLEASE DO .4 <- 'V.3$".2~#3255"'~'#0$#3906'
+		DO .3 <- .1~#651
+		PLEASE DO (1525) NEXT
+		DO :1 <- .4$"'V.3$".2~#651"'~'#0$#3906'"
+		PLEASE RETRIEVE .3 + .4
+		DO RESUME #1
+	(1525)	DO .3 <- '"!3$#0'~'#781$#1'"$#0'~'#156$#6'
+		PLEASE RESUME #1
+	(1530)	DO STASH :2 + :3 + :4 + .1 + .2 + .5
+		DO :3 <- #0
+		DO :4 <- .2
+		DO (1535) NEXT
+	(1535)	PLEASE FORGET #1
+		DO .5 <- '?".1~#4"$#5'~#5
+		DO (1531) NEXT
+		DO :1 <- :4
+		DO (1720) NEXT
+		DO :1 <- :3
+		DO (1500) NEXT
+		PLEASE DO (1533) NEXT
+	(1531)	PLEASE DO (1001) NEXT
+	(1533)	DO FORGET #1
+		DO .1 <- .1~#3905
+		DO :4 <- ":4~'#0$#3906'"$"'":4~'#781$#0'"$#0'
+		    ~'#781$#1'"
+		PLEASE DO .5 <- '?"!1~.1'~#4"$#5'~#5
+		DO (1532) NEXT
+		DO (1535) NEXT
+	(1532)	DO (1001) NEXT
+		DO :1 <- :3
+		PLEASE RETRIEVE :2 + :3 + :4 + .1 + .2 + .5
+		DO RESUME #2
+	(1540)	PLEASE ABSTAIN FROM (1541)
+		DO ABSTAIN FROM (1542)
+	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
+		DO .1 <- :1~#3906
+		PLEASE DO .2 <- :2~'#3875$#3875'
+		DO .5 <- :1~'#3875$#3875'
+		DO (1530) NEXT
+		DO :3 <- :1
+		DO .2 <- :2~#3906
+		PLEASE DO (1530) NEXT
+		DO :5 <- :1
+		DO .1 <- .5
+		DO (1530) NEXT
+		DO :4 <- :1
+		PLEASE DO :1 <- ":3~'#3875$#3875'"$":4
+		     ~'#3875$#3875'"
+		DO .5 <- ':1~:1'~#4
+		DO .2 <- :2~'#3875$#3875'
+		DO (1530) NEXT
+		PLEASE DO .5 <- '"':1~:1'~#4"$.5'~#6
+		DO .1 <- :3~#3906
+		DO .2 <- #0
+		DO (1520) NEXT
+		PLEASE DO :2 <- :1
+		PLEASE DO .1 <- :4~#3906
+		DO (1520) NEXT
+		DO (1509) NEXT
+		DO .5 <- !5$"'^":4~#1"$#2'~#1"'~#131
+		DO :1 <- :3
+		DO :2 <- :5
+		DO (1509) NEXT
+		PLEASE DO .5 <- !5$"'^":4~#1"$#2'~#1"'~#3256
+		DO .5 <- '?"!5~.5'~#1"$#2'~#1
+		PLEASE RETRIEVE :4
+	(1541)	DO :4 <- .5
+		DO (1543) NEXT
+	(1542)	DO (1544) NEXT
+		PLEASE DO (1999) NEXT
+	(1543)	DO (1001) NEXT
+	(1544)	DO REINSTATE (1541)
+		PLEASE REINSTATE (1542)
+		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
+		DO RESUME #2
+	(1550)	DO STASH :1 + :4 + :5 + :6 + .1 + .5
+		DO :5 <- #0
+		DO .5 <- '?"':2~:2'~#4"$#5'~#5
+		PLEASE DO (1551) NEXT
+		DO :4 <- #1
+		PLEASE DO (1553) NEXT
+	(1553)	DO FORGET #1
+		DO .5 <- '?"':2~"#12500$#0"'"$#3'~#1
+		DO (1552) NEXT
+		DO :2 <- ":2~'#0$#3906'"$"'":2~'#781$#0'"$#0'
+		     ~'#781$#1'"
+		PLEASE DO :4 <- ":4~'#0$#3906'"$"'":4~'#781
+		     $#0'"$#0'~'#781$#1'"
+		DO (1553) NEXT
+	(1552)	DO (1001) NEXT
+		DO .1 <- #0
+	(1556)	PLEASE FORGET #1
+		DO :6 <- "'&":2~'#3906$#0'"$"'?#15624$":1
+		     ~'#3906$#0'"'~'#0$#3906'"'~'#0$#3906'"$
+		     "'&":2~'#0$#3906'"$"'?#15624$":1~'#0$
+		     #3906'"'~'#0$#3906'"'~'#0$#3906'"
+		DO :6 <- "'?"'V":6~'#3906$#0'"$#7812'~'#0$
+		     #3906'"$#7812'~'#0$#15624'"$"'?"'V":6
+		     ~'#0$#3906'"$#7812'~'#0$#3906'"$#7812'
+		     ~'#0$#15624'"
+		DO :3 <- "'?":1~'#3906$#0'"$":2~'#3906$#0'"'
+		     ~'#0$#15624'"$"'?":1~'#0$#3906'"$":2~'#0$
+		     #3906'"'~'#0$#15624'"
+		DO .5 <- "?'"':6~:3'~'"'"'&"':3~:3'~'#3906$#0'"$
+		     #3125'~'#0$#3906'"$"'?:3~:3'~'#781$#0'"'
+		     ~'#3125$#781'"$"'?:3~:3'~'#0$#3906'"'"~#1'$
+		     #3"~#1
+		PLEASE DO (1557) NEXT
+		DO (1510) NEXT
+		PLEASE DO :1 <- :3
+		DO .5 <- '?#0$"'V.1$#3'~#1"'~#1
+		DO (1557) NEXT
+		DO .1 <- '^.1$#3906'~'#0$#3906'
+		DO (1556) NEXT
+	(1557)	PLEASE DO (1001) NEXT
+		PLEASE FORGET #1
+		DO :5 <- "'V":4~'.1$#0'"$":5~'#3906$#0'"'
+		     ~'#0$#3906'"$"'V":4~'#0$.1'"$":5~'#0$
+		     #3906'"'~'#0$#3906'"
+		DO .5 <- "?#2$':4~#1'"~#1
+		DO (1551) NEXT
+		DO :2 <- :2~'#3906$#3905'
+		DO :4 <- :4~'#3906$#3905'
+		DO .1 <- #0
+		PLEASE DO (1556) NEXT
+	(1551)	DO (1001) NEXT
+		DO :3 <- :5
+		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
+		PLEASE RESUME #2
+	(1720)	PLEASE STASH :1 + :3 + :4 + .1 + .5
+		DO :2 <- #0
+		DO .2 <- #0
+		DO .5 <- '?".1~#4"$#5'~#5
+		DO (1729) NEXT
+		DO .5 <- .1~#1
+		DO .2 <- :1~'#3906$#0'
+		DO .1 <- :1~'#0$#3906'
+		PLEASE DO (1724) NEXT
+		DO :1 <- '"?#0$.2"~"#0$#3906"'$'"?#0$.1"~"#0$
+		     #3906"'
+		DO :2 <- '"?'"V.2$#3906"~"#0$#3906"'$
+		     #3906"~"#0$#3906"'$'"?'"V.1$#3906"
+		     ~"#0$#3906"'$#3906"~"#0$#3906"'
+		DO (1728) NEXT
+	(1724)	PLEASE DO (1723) NEXT
+		DO :1 <- '"?#0$'"^.2$.2"~"#0$#3906"'"~"#0$#3906"'$
+		     '"?#0$'"^.1$.1"~"#0$#3906"'"~"#0$#3906"'
+		DO :2 <- '"?'"V'"@.2$#11718"~"#0$#3906"'$#7812"
+		     ~"#0$#3906"'$#7812"~"#0$#3906"'$'"?'"V'"@.1$
+		     #11718"~"#0$#3906"'$#7812"~"#0$#3906"'$#7812"
+		     ~"#0$#3906"'
+	(1728)	DO .2 <- :2~'#3125$#0'
+		DO :2 <- ':2~"#0$#3906"'$'"':2~"#781$#0"'$#0"
+		     ~"#781$#1"'
+		DO (1509) NEXT
+		DO :2 <- :3
+		DO .2 <- '^.2$"'?":4~#1"$#1'~#1"'~#1
+		DO (1721) NEXT
+	(1723)	PLEASE DO (1722) NEXT
+		DO :1 <- '"^.2$.2"~"#0$#3906"'$'"^.1$.1"~"#0$
+		     #3906"'
+		DO :2 <- '"?'"V'"2@.2$#15624"~"#0$#3906"'$
+		     #11718"~"#0$#3906"'$#11718"~"#0$#3906"'$
+		     '"?'"V'"2@.1$#15624"~"#0$#3906"'$#11718"
+		     ~"#0$#3906"'$#11718"~"#0$#3906"'
+		PLEASE FORGET #2
+		DO (1728) NEXT
+	(1729)	DO (1001) NEXT
+		DO (1721) NEXT
+	(1722)	PLEASE DO (1001) NEXT
+		DO :2 <- :1
+		DO .2 <- #0
+		DO FORGET #1
+	(1721)	PLEASE RETRIEVE :1 + :3 + :4 + .1 + .5
+		PLEASE RESUME #3
+	(1900)	DO STASH .2 + .5
+		DO .1 <- #0
+		DO .2 <- #1
+		PLEASE DO (1901) NEXT
+	(1901)	DO %20 (1903) NEXT
+		DO .1 <- 'V.1$.2'~'#0$#3906'
+		DO %50 .1 <- '^.1$".2~#7812"'~'#0$#3906'
+		DO %50 .1 <- '^.1$.2'~'#0$#3906'
+		PLEASE DO (1903) NEXT
+	(1903)	PLEASE FORGET #2
+		DO .2 <- !2$#0'~'#781$#1'
+		PLEASE DO .5 <- '^".2~.2"$#1'~#1
+		DO (1902) NEXT
+		DO (1901) NEXT
+	(1902)	DO (1001) NEXT
+		DO RETRIEVE .2 + .5
+		PLEASE RESUME #2
+	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
+		DO .3 <- #15613
+		DO :1 <- #6
+		DO (1911) NEXT
+		PLEASE NOTE THAT YOU CAN'T GET SOMETHING FROM NOTHING
+	(1912)	DO (1001) NEXT
+	(1911)	DO FORGET #1
+		PLEASE DO (1900) NEXT
+		DO :2 <- .1
+		DO (1500) NEXT
+		PLEASE DO :1 <- :3
+		DO .1 <- .3
+		DO (1020) NEXT
+		PLEASE DO .3 <- .1
+		DO .5 <- '?"!3~.3'~#4"$#3'~#1
+		DO (1912) NEXT
+		DO .1 <- #12
+		PLEASE DO (1050) NEXT
+		DO RETRIEVE .1
+		DO (1530) NEXT
+		DO :2 <- #7812
+		DO (1500) NEXT
+		PLEASE DO .2 <- :3~'#3875$#3875'
+		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
+		DO RESUME #1
diff --git a/pit/lib/syslib6.6i b/pit/lib/syslib6.6i
new file mode 100644
index 0000000..156a59f
--- /dev/null
+++ b/pit/lib/syslib6.6i
@@ -0,0 +1,373 @@
+		PLEASE KNOCK THRICE TWO TIMES BEFORE ENTERING
+
+	(1000)	PLEASE IGNORE .4
+		PLEASE ABSTAIN FROM (1005)
+	(1009)	DO STASH .1 + .2 + .5 + .6
+		DO .4 <- #1
+		DO (1004) NEXT
+	(1004)	PLEASE FORGET #1
+		DO .3 <- '^.1$.2'~'#0$#9331'
+		DO .6 <- '?"'V"'V"'&.1$.2'~'#0$#9331'"$"'^"'@.1$
+		     .2'~'#0$#9331'"$#9331'~'#0$#9331'"'~'#0$
+		     #9331'"$"'^"'2@.1$.2'~'#0$#9331'"$#18662'
+		     ~'#0$#9331'"'~'#0$#37324'"$#37324'~'#0$#9331'
+		PLEASE DO .5 <- "?!6~#38880'$#6"~#6
+		DO (1002) NEXT
+		DO .4 <- #2
+	(1005)	DO (1006) NEXT
+	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
+	(1002)	DO (1001) NEXT
+	(1006)	PLEASE FORGET #1
+		DO .5 <- '?"!6~.6'~#5"$#6'~#6
+		DO (1003) NEXT
+		DO .1 <- .3
+		DO .2 <- !6$#0'~'#1555$#1'
+		DO (1004) NEXT
+	(1003)	DO (1001) NEXT
+		DO REINSTATE (1005)
+	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
+		DO REMEMBER .4
+		PLEASE RESUME #2
+	(1001)	DO RESUME .5
+	(1010)	DO STASH .1 + .2 + .4
+		DO .4 <- .1
+		DO .1 <- '?#46655$.2'~'#0$#9331'
+		DO (1020) NEXT
+		PLEASE DO .2 <- .4
+		PLEASE DO (1009) NEXT
+		DO RETRIEVE .1 + .2 + .4
+		PLEASE RESUME #1
+	(1020)	DO STASH .2 + .3
+		DO .2 <- #1
+		PLEASE DO (1021) NEXT
+	(1021)	DO FORGET #1
+		DO .3 <- '?"'V".1~.2"$#4'~#1"$#3'~#1
+		PLEASE DO .1 <- '^.1$.2'~'#0$#9331'
+		DO (1022) NEXT
+		DO .2 <- !2$#0'~'#1555$#1'
+		DO (1021) NEXT
+	(1023)	PLEASE RESUME .3
+	(1022)	DO (1023) NEXT
+		PLEASE RETRIEVE .2 + .3
+		PLEASE RESUME #2
+	(1030)	DO ABSTAIN FROM (1033)
+		PLEASE ABSTAIN FROM (1032)
+	(1039)	DO STASH :1 + .5
+		DO (1530) NEXT
+		DO .3 <- :1~#9331
+		PLEASE DO .5 <- :1~'#9288$#9288'
+		DO .5 <- '?"!5~.5'~#5"$#6'~#6
+		DO (1031) NEXT
+	(1032)	DO (1033) NEXT
+		DO (1999) NEXT
+	(1031)	DO (1001) NEXT
+	(1033)	DO .4 <- .5
+		DO REINSTATE (1032)
+		PLEASE REINSTATE (1033)
+		DO RETRIEVE :1 + .5
+		PLEASE RESUME #2
+	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
+		DO .2 <- #0
+		DO (1520) NEXT
+		DO STASH :1
+		PLEASE RETRIEVE .2
+		DO .1 <- .2
+		DO .2 <- #0
+		PLEASE DO (1520) NEXT
+		DO :2 <- :1
+		DO RETRIEVE .1 + .2 + :1
+		DO (1550) NEXT
+		PLEASE DO .3 <- :3
+		DO RETRIEVE :1 + :2 + :3
+		DO RESUME #1
+	(1050)	PLEASE STASH :2 + :3 + .5
+		DO :2 <- .1
+		PLEASE DO (1550) NEXT
+		DO .5 <- :3~'#9288$#9288'
+		DO .5 <- '?"!5~.5'~#5"$#6'~#6
+		DO (1051) NEXT
+		DO (1999) NEXT
+	(1051)	DO (1001) NEXT
+		DO .2 <- :3
+		PLEASE RETRIEVE :2 + :3 + .5
+		DO RESUME #2
+	(1200)	DO .2 <- '^.1$.1'~'#0$#9331'
+		DO .3 <- '?"'2@.1$#0'~'#0$#9331'"$"'2@.1$#46655'
+		     ~'#0$#9331'"'~'#0$#9331'
+		DO .2 <- '^.2$"!3$#0'~'#1555$#1'"'~'#0$#9331'
+		DO .3 <- .3~#7776
+		PLEASE RESUME #1
+	(1210)	DO .2 <- '^"'?"'@.1$#0'~'#0$#9331'"$"'@.1$#46655'
+		     ~'#0$#9331'"'~'#0$#9331'"$"'?"'3@.1$#0'~'#0$
+		     #9331'"$"'3@.1$#46655'~'#0$#9331'"'~'#0$
+		     #9331'"'~'#0$#9331'
+		DO .3 <- '^"'^.1$.1'~'#0$#9331'"$.1'~'#0$#9331'
+		DO .2 <- '^.2$".3~#9330"'~'#0$#9331'
+		DO .3 <- .3~#1
+		PLEASE RESUME #1
+	(1500)	PLEASE ABSTAIN FROM (1502)
+		PLEASE ABSTAIN FROM (1506)
+	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO .1 <- :1~#9331
+		PLEASE DO .2 <- :2~#9331
+		DO (1009) NEXT
+		DO .5 <- .3
+		PLEASE DO .6 <- .4
+		DO .1 <- :1~'#9288$#9288'
+		DO .2 <- :2~'#9288$#9288'
+		DO (1009) NEXT
+		DO .1 <- .3
+		PLEASE DO (1503) NEXT
+		DO .6 <- .4
+		DO .2 <- #1
+		DO (1009) NEXT
+		DO .1 <- .3
+		DO (1501) NEXT
+	(1504)	PLEASE RESUME .6
+	(1503)	DO (1504) NEXT
+	(1501)	DO .2 <- .5
+		DO .5 <- '&.6$.4'
+		DO (1505) NEXT
+	(1506)	DO (1502) NEXT
+		PLEASE DO (1999) NEXT
+	(1505)	DO (1001) NEXT
+	(1502)	DO :4 <- .5
+		DO (1520) NEXT
+		DO :3 <- :1
+		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO REINSTATE (1502)
+		DO REINSTATE (1506)
+		PLEASE RESUME #3
+	(1510)	DO STASH :1 + :2 + :4
+		DO :1 <- "'?#46655$":2~'#9331$#0'"'~'#0$#9331'"$
+		     "'?#46655$":2~'#0$#9331'"'~'#0$#9331'"
+		DO :2 <- #1
+		DO (1509) NEXT
+		PLEASE RETRIEVE :1
+		DO :2 <- :3
+		PLEASE DO (1509) NEXT
+		DO RETRIEVE :2 + :4
+		PLEASE RESUME #1
+	(1520)	PLEASE STASH .3 + .4
+		DO .3 <- .1~#7998
+		DO (1525) NEXT
+		PLEASE DO .4 <- 'V.3$".2~#7998"'~'#0$#9331'
+		DO .3 <- .1~#1333
+		PLEASE DO (1525) NEXT
+		DO :1 <- .4$"'V.3$".2~#1333"'~'#0$#9331'"
+		PLEASE RETRIEVE .3 + .4
+		DO RESUME #1
+	(1525)	DO .3 <- '"!3$#0'~'#1555$#1'"$#0'~'#259$#7'
+		PLEASE RESUME #1
+	(1530)	DO STASH :2 + :3 + .1 + .2 + .3
+		DO :3 <- #0
+		DO :2 <- .1
+		DO (1535) NEXT
+	(1535)	PLEASE FORGET #1
+		DO .3 <- '?"!2~.2'~#5"$#6'~#6
+		DO (1532) NEXT
+		DO .1 <- .2
+		DO (1210) NEXT
+		DO .3 <- '?#1$".3~#5"'~#1
+		DO (1531) NEXT
+		DO :1 <- :3
+		DO (1500) NEXT
+		PLEASE DO (1533) NEXT
+	(1531)	PLEASE DO (1534) NEXT
+	(1533)	DO FORGET #1
+		DO :1 <- :2
+		DO (1700) NEXT
+		DO (1535) NEXT
+	(1534)	PLEASE RESUME .3
+	(1532)	DO (1534) NEXT
+		DO :1 <- :3
+		PLEASE RETRIEVE :2 + :3 + .1 + .2 + .3
+		DO RESUME #2
+	(1540)	PLEASE ABSTAIN FROM (1541)
+		DO ABSTAIN FROM (1542)
+	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
+		DO .1 <- :1~#9331
+		PLEASE DO .2 <- :2~'#9288$#9288'
+		DO .5 <- :1~'#9288$#9288'
+		DO (1530) NEXT
+		DO :3 <- :1
+		DO .2 <- :2~#9331
+		PLEASE DO (1530) NEXT
+		DO :5 <- :1
+		DO .1 <- .5
+		DO (1530) NEXT
+		DO :4 <- :1
+		PLEASE DO :1 <- ":3~'#9288$#9288'"$":4
+		     ~'#9288$#9288'"
+		DO .5 <- ':1~:1'~#5
+		DO .2 <- :2~'#9288$#9288'
+		DO (1530) NEXT
+		PLEASE DO .5 <- '"':1~:1'~#5"$.5'~#7
+		DO .1 <- :3~#9331
+		DO .2 <- #0
+		DO (1520) NEXT
+		PLEASE DO :2 <- :1
+		PLEASE DO .1 <- :4~#9331
+		DO (1520) NEXT
+		DO (1509) NEXT
+		DO .5 <- !5$"'^":4~#1"$#3'~#1"'~#223
+		DO :1 <- :3
+		DO :2 <- :5
+		DO (1509) NEXT
+		PLEASE DO .5 <- !5$"'^":4~#1"$#3'~#1"'~#7999
+		DO .5 <- '?"!5~.5'~#1"$#3'~#1
+		PLEASE RETRIEVE :4
+	(1541)	DO :4 <- .5
+		DO (1543) NEXT
+	(1542)	DO (1544) NEXT
+		PLEASE DO (1999) NEXT
+	(1543)	DO (1001) NEXT
+	(1544)	DO REINSTATE (1541)
+		PLEASE REINSTATE (1542)
+		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
+		DO RESUME #2
+	(1550)	DO STASH :1 + :1 + :4 + :5 + :6 + .1 + .5
+		DO :3 <- #0
+		DO .5 <- '?"':2~:2'~#5"$#6'~#6
+		PLEASE DO (1551) NEXT
+		DO :4 <- #1
+		PLEASE DO (1553) NEXT
+	(1553)	DO FORGET #1
+		DO .5 <- '?#0$"'V"'2@":2~'#7776$#0'"$#5'~#1"$#4'
+		     ~#1"'~#1
+		DO (1552) NEXT
+		DO :5 <- :2
+		DO :1 <- :4
+		PLEASE DO (1700) NEXT
+		DO :4 <- :2
+		DO :1 <- :5
+		PLEASE DO (1700) NEXT
+		DO (1553) NEXT
+	(1552)	DO (1001) NEXT
+		DO RETRIEVE :1
+	(1556)	PLEASE FORGET #1
+		DO :6 <- "'&":2~'#9331$#0'"$"'?#46655$":1
+		     ~'#9331$#0'"'~'#0$#9331'"'~'#0$#9331'"$
+		     "'&":2~'#0$#9331'"$"'?#46655$":1~'#0$
+		     #9331'"'~'#0$#9331'"'~'#0$#9331'"
+		DO :5 <- "'?":1~'#9331$#0'"$":2~'#9331$#0'"'
+		     ~'#0$#9331'"$"'?":1~'#0$#9331'"$":2~'#0$
+		     #9331'"'~'#0$#9331'"
+		DO :6 <- "'&":6~'#9331$#0'"$":5~'#9331$#0'"'
+		     ~'#0$#9331'"$"'&":6~'#0$#9331'"$":5~'#0$
+		     #9331'"'~'#0$#9331'"
+		DO :5 <- :5~'#46655$#46655'
+		DO :6 <- "'?"'V":6~'#9331$#0'"$#27993'~'#0$
+		     #9331'"$#27993'~'#0$#46655'"$"'?"'V":6
+		     ~'#0$#9331'"$#27993'~'#0$#9331'"$#27993'
+		     ~'#0$#46655'"
+		DO .5 <- "?'"':6~:5'~'"'"'&"':5~:5'~'#9331$#0'"$
+		     #7776'~'#0$#9331'"$"'?:5~:5'~'#1555$#0'"'
+		     ~'#7776$#1555'"$"'?:5~:5'~'#0$#9331'"'"~#1'$
+		     #4"~#1
+		DO (1554) NEXT
+		DO :5 <- :3
+		DO (1510) NEXT
+		DO :1 <- :4
+		DO :4 <- :2
+		DO :2 <- :5
+		DO :5 <- :3
+		DO (1500) NEXT
+		DO :2 <- :4
+		DO :4 <- :1
+		DO :1 <- :5
+		DO (1555) NEXT
+	(1554)	PLEASE DO (1001) NEXT
+	(1555)	DO FORGET #1
+		DO .5 <- '?#2$"'@#0$":4~#1"'~#1"'~#1
+		DO (1551) NEXT
+		DO :5 <- :1
+		DO :1 <- :4
+		DO :4 <- :2
+		DO (1710) NEXT
+		DO :1 <- :4
+		DO :4 <- :2
+		DO (1710) NEXT
+		DO :1 <- :5
+		PLEASE DO (1556) NEXT
+	(1551)	DO (1001) NEXT
+		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
+		PLEASE RESUME #2
+	(1700)	PLEASE STASH .2
+		DO .1 <- :1~'#0$#9331'
+		DO .2 <- :1~'#9331$#0'
+		DO :2 <- "'^.2$.2'~'#0$#9331'"$"'^.1$.1'~'#0$
+		     #9331'"
+		DO .1 <- '?"'2@.1$#0'~'#0$#9331'"$"'2@.1$#46655'
+		     ~'#0$#9331'"'~'#0$#9331'
+		DO .2 <- '?"'2@.2$#0'~'#0$#9331'"$"'2@.2$#46655'
+		     ~'#0$#9331'"'~'#0$#9331'
+		DO :2 <- "'^":2~'#9331$#0'"$.1'~'#0$#9331'"$"'^":2
+		     ~'#0$#9331'"$"'.2$#0'~'#1555$#1'"'~'#0$#9331'"
+		DO .1 <- .2~#7776
+		PLEASE RETRIEVE .2
+		PLEASE RESUME #1
+	(1710)	PLEASE STASH :1 + .2
+		DO .2 <- :1~'#9331$#0'
+		DO .1 <- :1~'#0$#9331'
+		DO :2 <- "'^"'^.2$.2'~'#0$#9331'"$.2'~'#0$
+		     #9331'"$"'^"'^.1$.1'~'#0$#9331'"$.1'~'#0$
+		     #9331'"
+		DO .1 <- '^"'?"'@.1$#0'~'#0$#9331'"$"'@.1$#46655'
+		     ~'#0$#9331'"'~'#0$#9331'"$"'?"'3@.1$#0'~'#0$
+		     #9331'"$"'3@.1$#46655'~'#0$#9331'"'~'#0$
+		     #9331'"'~'#0$#9331'
+		DO :1 <- "'^"'?"'@.2$#0'~'#0$#9331'"$"'@.2$#46655'
+		     ~'#0$#9331'"'~'#0$#9331'"$"'?"'3@.2$#0'~'#0$
+		     #9331'"$"'3@.2$#46655'~'#0$#9331'"'~'#0$
+		     #9331'"'~'#0$#9331'"$.1
+		DO .1 <- :2~#1
+		DO :2 <- "'^":1~'#9331$#0'"$":2~'#0$#9330'"'
+		     ~'#0$#9331'"$"'^":1~'#0$#9331'"$":2~'#9331$
+		     #0'"'~'#0$#9331'"
+		PLEASE RETRIEVE :1 + .2
+		PLEASE RESUME #1
+	(1900)	DO STASH .2 + .5
+		DO .1 <- #0
+		DO .2 <- #1
+		PLEASE DO (1901) NEXT
+	(1901)	DO FORGET #1
+		DO %50 (1904) NEXT
+		DO %50 (1901) NEXT
+		PLEASE DO (1903) NEXT
+	(1904)	DO .1 <- '^.1$.2'~'#0$#9331'
+		DO %50 .1 <- '^.1$.2'~'#0$#9331'
+	(1903)	PLEASE FORGET #1
+		DO %50 .1 <- '^.1$".2~#27993"'~'#0$#9331'
+		DO .2 <- !2$#0'~'#1555$#1'
+		PLEASE DO .5 <- '^".2~.2"$#1'~#1
+		DO (1902) NEXT
+		DO (1901) NEXT
+	(1902)	DO (1001) NEXT
+		DO RETRIEVE .2 + .5
+		PLEASE RESUME #2
+	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
+		DO .3 <- #46644
+		DO :1 <- #6
+		DO (1911) NEXT
+		PLEASE NOTE THAT YOU CAN'T GET BLOOD FROM A TURNIP
+	(1912)	DO (1001) NEXT
+	(1911)	DO FORGET #1
+		PLEASE DO (1900) NEXT
+		DO :2 <- .1
+		DO (1500) NEXT
+		PLEASE DO :1 <- :3
+		DO .1 <- .3
+		DO (1020) NEXT
+		PLEASE DO .3 <- .1
+		DO .5 <- '?"!3~.3'~#5"$#4'~#1
+		DO (1912) NEXT
+		DO .1 <- #12
+		PLEASE DO (1050) NEXT
+		DO RETRIEVE .1
+		DO (1530) NEXT
+		DO :2 <- #23328
+		DO (1500) NEXT
+		PLEASE DO .2 <- :3~'#9288$#9288'
+		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
+		DO RESUME #1
diff --git a/pit/lib/syslib7.7i b/pit/lib/syslib7.7i
new file mode 100644
index 0000000..1d51a1a
--- /dev/null
+++ b/pit/lib/syslib7.7i
@@ -0,0 +1,402 @@
+		PLEASE KNOCK "SHAVE-AND-A-HAIRCUT-TWO-PLEASE" BEFORE ENTERING
+
+	(1000)	PLEASE IGNORE .4
+		PLEASE ABSTAIN FROM (1005)
+	(1009)	DO STASH .1 + .2 + .5 + .6
+		DO .4 <- #1
+		DO (1004) NEXT
+	(1004)	PLEASE FORGET #1
+		DO .3 <- '^.1$.2'~'#0$#2801'
+		DO .6 <- '?"'V"'V"'&.1$.2'~'#0$#2801'"$"'^"'@.1$
+		     .2'~'#0$#2801'"$#2801'~'#0$#2801'"'~'#0$
+		     #2801'"$"'^"'2@.1$.2'~'#0$#2801'"$#5602'
+		     ~'#0$#2801'"'~'#0$#14005'"$#14005'~'#0$#2801'
+		PLEASE DO .5 <- "?!6~#14406'$#7"~#7
+		DO (1002) NEXT
+		DO .4 <- #2
+	(1005)	DO (1006) NEXT
+	(1999)	DOUBLE OR SINGLE PRECISION OVERFLOW
+	(1002)	DO (1001) NEXT
+	(1006)	PLEASE FORGET #1
+		DO .5 <- '?"!6~.6'~#6"$#7'~#7
+		DO (1003) NEXT
+		DO .1 <- .3
+		DO .2 <- !6$#0'~'#400$#1'
+		DO (1004) NEXT
+	(1003)	DO (1001) NEXT
+		DO REINSTATE (1005)
+	(1007)	PLEASE RETRIEVE .1 + .2 + .5 + .6
+		DO REMEMBER .4
+		PLEASE RESUME #2
+	(1001)	DO RESUME .5
+	(1010)	DO STASH .1 + .2 + .4
+		DO .4 <- .1
+		DO .1 <- '?#16806$.2'~'#0$#2801'
+		DO (1020) NEXT
+		PLEASE DO .2 <- .4
+		PLEASE DO (1009) NEXT
+		DO RETRIEVE .1 + .2 + .4
+		PLEASE RESUME #1
+	(1020)	DO STASH .2 + .3
+		DO .2 <- #1
+		PLEASE DO (1021) NEXT
+	(1021)	DO FORGET #1
+		DO .3 <- '?"'V".1~.2"$#5'~#1"$#4'~#1
+		PLEASE DO .1 <- '^.1$.2'~'#0$#2801'
+		DO (1022) NEXT
+		DO .2 <- !2$#0'~'#400$#1'
+		DO (1021) NEXT
+	(1023)	PLEASE RESUME .3
+	(1022)	DO (1023) NEXT
+		PLEASE RETRIEVE .2 + .3
+		PLEASE RESUME #2
+	(1030)	DO ABSTAIN FROM (1033)
+		PLEASE ABSTAIN FROM (1032)
+	(1039)	DO STASH :1 + .5
+		DO (1530) NEXT
+		DO .3 <- :1~#2801
+		PLEASE DO .5 <- :1~'#2793$#2744'
+		DO .5 <- '?"!5~.5'~#6"$#7'~#7
+		DO (1031) NEXT
+	(1032)	DO (1033) NEXT
+		DO (1999) NEXT
+	(1031)	DO (1001) NEXT
+	(1033)	DO .4 <- .5
+		DO REINSTATE (1032)
+		PLEASE REINSTATE (1033)
+		DO RETRIEVE :1 + .5
+		PLEASE RESUME #2
+	(1040)	PLEASE STASH .1 + .2 + .2 + :1 + :2 + :3
+		DO .2 <- #0
+		DO (1520) NEXT
+		DO STASH :1
+		PLEASE RETRIEVE .2
+		DO .1 <- .2
+		DO .2 <- #0
+		PLEASE DO (1520) NEXT
+		DO :2 <- :1
+		DO RETRIEVE .1 + .2 + :1
+		DO (1550) NEXT
+		PLEASE DO .3 <- :3
+		DO RETRIEVE :1 + :2 + :3
+		DO RESUME #1
+	(1050)	PLEASE STASH :2 + :3 + .5
+		DO :2 <- .1
+		PLEASE DO (1550) NEXT
+		DO .5 <- :3~'#2793$#2744'
+		DO .5 <- '?"!5~.5'~#6"$#7'~#7
+		DO (1051) NEXT
+		DO (1999) NEXT
+	(1051)	DO (1001) NEXT
+		DO .2 <- :3
+		PLEASE RETRIEVE :2 + :3 + .5
+		DO RESUME #2
+	(1500)	PLEASE ABSTAIN FROM (1502)
+		PLEASE ABSTAIN FROM (1506)
+	(1509)	PLEASE STASH :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO .1 <- :1~#2801
+		PLEASE DO .2 <- :2~#2801
+		DO (1009) NEXT
+		DO .5 <- .3
+		PLEASE DO .6 <- .4
+		DO .1 <- :1~'#2793$#2744'
+		DO .2 <- :2~'#2793$#2744'
+		DO (1009) NEXT
+		DO .1 <- .3
+		PLEASE DO (1503) NEXT
+		DO .6 <- .4
+		DO .2 <- #1
+		DO (1009) NEXT
+		DO .1 <- .3
+		DO (1501) NEXT
+	(1504)	PLEASE RESUME .6
+	(1503)	DO (1504) NEXT
+	(1501)	DO .2 <- .5
+		DO .5 <- '&.6$.4'
+		DO (1505) NEXT
+	(1506)	DO (1502) NEXT
+		PLEASE DO (1999) NEXT
+	(1505)	DO (1001) NEXT
+	(1502)	DO :4 <- .5
+		DO (1520) NEXT
+		DO :3 <- :1
+		PLEASE RETRIEVE :1 + .1 + .2 + .3 + .4 + .5 + .6
+		DO REINSTATE (1502)
+		DO REINSTATE (1506)
+		PLEASE RESUME #3
+	(1510)	DO STASH :1 + :2 + :4
+		DO :1 <- "'?#16806$":2~'#2801$#0'"'~'#0$#2801'"$
+		     "'?#16806$":2~'#0$#2801'"'~'#0$#2801'"
+		DO :2 <- #1
+		DO (1509) NEXT
+		PLEASE RETRIEVE :1
+		DO :2 <- :3
+		PLEASE DO (1509) NEXT
+		DO RETRIEVE :2 + :4
+		PLEASE RESUME #1
+	(1520)	PLEASE STASH .3 + .4
+		DO .3 <- .1~#2451
+		DO (1525) NEXT
+		PLEASE DO .4 <- 'V.3$".2~#350"'~'#0$#2801'
+		DO .3 <- .1~#350
+		PLEASE DO (1526) NEXT
+		DO :1 <- .4$"'V.3$".2~#2451"'~'#0$#2801'"
+		PLEASE RETRIEVE .3 + .4
+		DO RESUME #1
+	(1525)	DO .3 <- '"!3$#0'~'#400$#1'"$#0'~'#400$#1'
+		PLEASE RESUME #1
+	(1526)	DO .3 <- '"!3$#0'~'#400$#1'"$#0'~'#57$#8'
+		PLEASE RESUME #1
+	(1530)	DO STASH :2 + :3 + :4 + .1 + .2 + .5
+		DO :3 <- #0
+		DO :4 <- .2
+		DO (1535) NEXT
+	(1535)	PLEASE FORGET #1
+		DO .5 <- '?".1~#6"$#7'~#7
+		DO (1531) NEXT
+		DO :1 <- :4
+		DO (1720) NEXT
+		DO :1 <- :3
+		DO (1500) NEXT
+		PLEASE DO (1533) NEXT
+	(1531)	PLEASE DO (1001) NEXT
+	(1533)	DO FORGET #1
+		DO .1 <- .1~#2800
+		DO :4 <- ":4~'#0$#2801'"$"'":4~'#400$#0'"$#0'
+		    ~'#400$#1'"
+		PLEASE DO .5 <- '?"!1~.1'~#6"$#7'~#7
+		DO (1532) NEXT
+		DO (1535) NEXT
+	(1532)	DO (1001) NEXT
+		DO :1 <- :3
+		PLEASE RETRIEVE :2 + :3 + :4 + .1 + .2 + .5
+		DO RESUME #2
+	(1540)	PLEASE ABSTAIN FROM (1541)
+		DO ABSTAIN FROM (1542)
+	(1549)	PLEASE STASH :1 + :2 + :4 + :5 + .1 + .2 + .5
+		DO .1 <- :1~#2801
+		PLEASE DO .2 <- :2~'#2793$#2744'
+		DO .5 <- :1~'#2793$#2744'
+		DO (1530) NEXT
+		DO :3 <- :1
+		DO .2 <- :2~#2801
+		PLEASE DO (1530) NEXT
+		DO :5 <- :1
+		DO .1 <- .5
+		DO (1530) NEXT
+		DO :4 <- :1
+		PLEASE DO :1 <- ":3~'#2793$#2744'"$":4
+		     ~'#2793$#2744'"
+		DO .5 <- ':1~:1'~#6
+		DO .2 <- :2~'#2793$#2744'
+		DO (1530) NEXT
+		PLEASE DO .5 <- '"':1~:1'~#6"$.5'~#8
+		DO .1 <- :3~#2801
+		DO .2 <- #0
+		DO (1520) NEXT
+		PLEASE DO :2 <- :1
+		PLEASE DO .1 <- :4~#2801
+		DO (1520) NEXT
+		DO (1509) NEXT
+		DO .5 <- !5$"'^":4~#1"$#4'~#1"'~#351
+		DO :1 <- :3
+		DO :2 <- :5
+		DO (1509) NEXT
+		PLEASE DO .5 <- !5$"'^":4~#1"$#4'~#1"'~'#57$#1'
+		DO .5 <- '?"!5~.5'~#1"$#4'~#1
+		PLEASE RETRIEVE :4
+	(1541)	DO :4 <- .5
+		DO (1543) NEXT
+	(1542)	DO (1544) NEXT
+		PLEASE DO (1999) NEXT
+	(1543)	DO (1001) NEXT
+	(1544)	DO REINSTATE (1541)
+		PLEASE REINSTATE (1542)
+		PLEASE RETRIEVE :1 + :2 + :5 + .1 + .2 + .5
+		DO RESUME #2
+	(1550)	DO STASH :1 + :4 + :5 + :6 + .1 + .5
+		DO :5 <- #0
+		DO .5 <- '?"':2~:2'~#6"$#7'~#7
+		PLEASE DO (1551) NEXT
+		DO :4 <- #1
+		PLEASE DO (1553) NEXT
+	(1553)	DO FORGET #1
+		DO .5 <- '?"':2~"#14406$#0"'"$#5'~#1
+		DO (1552) NEXT
+		DO :2 <- ":2~'#0$#2801'"$"'":2~'#400$#0'"$#0'
+		     ~'#400$#1'"
+		PLEASE DO :4 <- ":4~'#0$#2801'"$"'":4~'#400
+		     $#0'"$#0'~'#400$#1'"
+		DO (1553) NEXT
+	(1552)	DO (1001) NEXT
+		DO .1 <- #0
+	(1556)	PLEASE FORGET #1
+		DO :6 <- "'&":2~'#2801$#0'"$"'?#16806$":1
+		     ~'#2801$#0'"'~'#0$#2801'"'~'#0$#2801'"$
+		     "'&":2~'#0$#2801'"$"'?#16806$":1~'#0$
+		     #2801'"'~'#0$#2801'"'~'#0$#2801'"
+		DO :3 <- "'?":1~'#2801$#0'"$":2~'#2801$#0'"'
+		     ~'#0$#2801'"$"'?":1~'#0$#2801'"$":2~'#0$
+		     #2801'"'~'#0$#2801'"
+		DO :6 <- "'&":6~'#2801$#0'"$":3~'#2801$#0'"'
+		     ~'#0$#2801'"$"'&":6~'#0$#2801'"$":3~'#0$
+		     #2801'"'~'#0$#2801'"
+		DO :3 <- :3~'#16806$#16806'
+		DO :6 <- "'?"'V":6~'#2801$#0'"$#11204'~'#0$
+		     #2801'"$#11204'~'#0$#16806'"$"'?"'V":6
+		     ~'#0$#2801'"$#11204'~'#0$#2801'"$#11204'
+		     ~'#0$#16806'"
+		DO .5 <- "?'"':6~:3'~'"'"'&"':3~:3'~'#2801$#0'"$
+		     #2401'~'#0$#2801'"$"'?:3~:3'~'#400$#0'"'
+		     ~'#2401$#400'"$"'?:3~:3'~'#0$#2801'"'"~#1'$
+		     #5"~#1
+		PLEASE DO (1557) NEXT
+		DO (1510) NEXT
+		DO :1 <- :3
+		DO .5 <- '?#0$"'V.1$#5'~#1"'~#1
+		DO (1557) NEXT
+		DO .1 <- '^.1$#2801'~'#0$#2801'
+		DO (1556) NEXT
+	(1557)	PLEASE DO (1001) NEXT
+		PLEASE FORGET #1
+		DO :5 <- "'V":4~'.1$#0'"$":5~'#2801$#0'"'
+		     ~'#0$#2801'"$"'V":4~'#0$.1'"$":5~'#0$
+		     #2801'"'~'#0$#2801'"
+		DO .5 <- "?#2$':4~#1'"~#1
+		DO (1551) NEXT
+		DO :2 <- :2~'#2801$#2800'
+		DO :4 <- :4~'#2801$#2800'
+		DO .1 <- #0
+		PLEASE DO (1556) NEXT
+	(1551)	DO (1001) NEXT
+		DO :3 <- :5
+		PLEASE RETRIEVE :1 + :4 + :5 + :6 + .1 + .5
+		PLEASE RESUME #2
+	(1720)	PLEASE STASH :1 + :3 + :4 + .1 + .5
+		DO :2 <- #0
+		DO .2 <- #0
+		DO .5 <- '?".1~#6"$#7'~#7
+		DO (1729) NEXT
+		DO .5 <- .1~#1
+		DO .2 <- :1~'#2801$#0'
+		DO .1 <- :1~'#0$#2801'
+		PLEASE DO (1726) NEXT
+		DO :1 <- '"?#0$.2"~"#0$#2801"'$'"?#0$.1"~"#0$
+		     #2801"'
+		DO :2 <- '"?'"V.2$#2801"~"#0$#2801"'$#2801"
+		     ~"#0$#2801"'$'"?'"V.1$#2801"~"#0$#2801"'$
+		     #2801"~"#0$#2801"'
+		DO (1728) NEXT
+	(1726)	PLEASE DO (1725) NEXT
+		DO :1 <- '"?#0$'"^.2$.2"~"#0$#2801"'"~"#0$
+		     #2801"'$'"?#0$'"^.1$.1"~"#0$#2801"'"~"#0$
+		     #2801"'
+		DO .2 <- "^'"V'"2@.2$#11204"~"#0$#2801"'$
+		     #5602"~"#0$#2801"'$'"2@.2$#2801"~"#0$
+		     #2801"'"~"#0$#2801"
+		DO .1 <- "^'"V'"2@.1$#11204"~"#0$#2801"'$
+		     #5602"~"#0$#2801"'$'"2@.1$#2801"~"#0$
+		     #2801"'"~"#0$#2801"
+		DO :2 <- '"?.2$#8403"~"#0$#2801"'$'"?.1$#8403"
+		     ~"#0$#2801"'
+	(1728)	DO .2 <- :2~'#2401$#0'
+		DO :2 <- ':2~"#0$#2801"'$'"':2~"#400$#0"'$#0"
+		     ~"#400$#1"'
+		DO (1509) NEXT
+		DO :2 <- :3
+		DO .2 <- '^.2$"'?":4~#1"$#1'~#1"'~#1
+		DO (1721) NEXT
+	(1725)	PLEASE DO (1724) NEXT
+		DO :2 <- '"?'"V'"?'"3@.2$#14005"~"#0$#2801"'$
+		     '"@.2$#0"~"#0$#2801"'"~"#0$#11204"'$#8403"
+		     ~"#0$#2801"'$#8403"~"#0$#2801"'$
+		     '"?'"V'"?'"3@.1$#14005"~"#0$#2801"'$'"@.1$
+		     #0"~"#0$#2801"'"~"#0$#11204"'$#8403"~"#0$
+		     #2801"'$#8403"~"#0$#2801"'
+		DO .2 <- '^.2$.2'~'#0$#2801'
+		DO .1 <- '^.1$.1'~'#0$#2801'
+		DO :1 <- '"^.2$.2"~"#0$#2801"'$'"^.1$.1"~"#0$
+		     #2801"'
+		PLEASE FORGET #2
+		DO (1728) NEXT
+	(1724)	PLEASE DO (1723) NEXT
+		DO :1 <- '"^'"^.2$.2"~"#0$#2801"'$.2"~"#0$
+		     #2801"'$'"^'"^.1$.1"~"#0$#2801"'$.1"
+		     ~"#0$#2801"'
+		DO .2 <- "^'"V'"2@.2$#16806"~"#0$#2801"'$
+		     #14005"~"#0$#2801"'$'"V'"4@.2$#16806"
+		     ~"#0$#2801"'$#14005"~"#0$#2801"'"~"#0$
+		     #2801"
+		DO .1 <- "^'"V'"2@.1$#16806"~"#0$#2801"'$
+		     #14005"~"#0$#2801"'$'"V'"4@.1$#16806"
+		     ~"#0$#2801"'$#14005"~"#0$#2801"'"~"#0$
+		     #2801"
+		DO :2 <- '"?.2$#8403"~"#0$#2801"'$'"?.1$#8403"
+		     ~"#0$#2801"'
+		PLEASE FORGET #3
+		DO (1728) NEXT
+	(1723)	PLEASE DO (1722) NEXT
+		DO :1 <- '"^.2$.2"~"#0$#2801"'$'"^.1$.1"~"#0$
+		     #2801"'
+		DO :2 <- '"?'"V'"3@.2$#16806"~"#0$#2801"'$
+		     #14005"~"#0$#2801"'$#14005"~"#0$#2801"'$
+		     '"?'"V'"3@.1$#16806"~"#0$#2801"'$#14005"
+		     ~"#0$#2801"'$#14005"~"#0$#2801"'
+		PLEASE FORGET #4
+		DO (1728) NEXT
+	(1729)	DO (1001) NEXT
+		DO (1721) NEXT
+	(1722)	PLEASE DO (1001) NEXT
+		DO :2 <- :1
+		DO .2 <- #0
+		DO FORGET #3
+	(1721)	PLEASE RETRIEVE :1 + :3 + :4 + .1 + .5
+		PLEASE RESUME #3
+	(1900)	DO STASH .2 + .5
+		DO .1 <- #0
+		DO .2 <- #1
+		PLEASE DO (1901) NEXT
+	(1901)	DO FORGET #1
+		DO %50 (1905) NEXT
+		DO %50 (1904) NEXT
+		DO %50 (1901) NEXT
+		PLEASE DO (1903) NEXT
+	(1905)	DO FORGET #1
+		DO .1 <- '^.1$".2~#8403"'~'#0$#2801'
+		PLEASE DO %50 .1 <- '^.1$".2~#5602"'~'#0$#2801'
+		DO (1906) NEXT
+	(1904)	DO .1 <- '^.1$.2'~'#0$#2801'
+	(1906)	DO %50 .1 <- '^.1$.2'~'#0$#2801'
+	(1903)	PLEASE FORGET #1
+		DO .2 <- !2$#0'~'#400$#1'
+		PLEASE DO .5 <- '^".2~.2"$#1'~#1
+		DO (1902) NEXT
+		DO (1901) NEXT
+	(1902)	DO (1001) NEXT
+		DO RETRIEVE .2 + .5
+		PLEASE RESUME #2
+	(1910)	PLEASE STASH .1 + .3 + .5 + :1 + :2 + :3
+		DO .3 <- #16795
+		DO :1 <- #6
+		DO (1911) NEXT
+		PLEASE NOTE THAT YOU CAN'T GET SENSE FROM INTERCAL
+	(1912)	DO (1001) NEXT
+	(1911)	DO FORGET #1
+		PLEASE DO (1900) NEXT
+		DO :2 <- .1
+		DO (1500) NEXT
+		PLEASE DO :1 <- :3
+		DO .1 <- .3
+		DO (1020) NEXT
+		PLEASE DO .3 <- .1
+		DO .5 <- '?"!3~.3'~#6"$#5'~#1
+		DO (1912) NEXT
+		DO .1 <- #12
+		PLEASE DO (1050) NEXT
+		DO RETRIEVE .1
+		DO (1530) NEXT
+		DO :2 <- #8403
+		DO (1500) NEXT
+		PLEASE DO .2 <- :3~'#2793$#2744'
+		PLEASE RETRIEVE .3 + .5 + :1 + :2 + :3
+		DO RESUME #1
diff --git a/src/perpet.c b/src/perpet.c
index 0cb35df..9d2d2e1 100644
--- a/src/perpet.c
+++ b/src/perpet.c
@@ -656,7 +656,7 @@ static void check_syslib(/*@partial@*/ char *buffer,
     if (ick_Base == 2)    /* see code for opening the skeleton */
       (void) ick_snprintf_or_die(buffer, size, "%s.i", SYSLIB);
     else
-      (void) ick_snprintf_or_die(buffer, size, "%s.%di", SYSLIB, ick_Base);
+      (void) ick_snprintf_or_die(buffer, size, "%s%d.%di", SYSLIB, ick_Base, ick_Base);
     if (ick_findandfreopen(buffer, ick_datadir, "r", argv0, stdin) == NULL)
       ick_lose(IE127, 1, (const char*) NULL);
 #ifdef USE_YYRESTART