Elliott 803 Algol 60 Compiler (reconstructed)

File: patterns.t2

For general comments see here
LineAddressObject Code LabelF1N1BF2N2CommentsCheck
1 0  ; tape1.d/patterns.t2
2 0  ;--------------------
3 0  ;
4 0  =1829 
5 1829  ;--------------------------------------------------------------------
6 1829  ; data and tables for gencode
7 1829  ; GPs is start of table used by gencode1 - other labels are
8 1829  ; really short-cuts to specific entries
9 1829  ;
10 1829  GPs::; 
11 1829  GPs:; 
12 1829  .0:GP1F     ; +0 40 0 : 20 1 store @1829
12+11829 4000000400001 40 0:20 +1 
13 1830  .1:GP1F     ; +1 40 0 : 30 1 load @1830
13+11830 4000000600001 40 0:30 +1 
14 1831 0000000003567.2:+.82; +2 @1831
15 1832 0000000003572.3:+.85; +3 @1832
16 1833 0000000003575.4:+.88; +4 @1833
17 1834 0000000003600.5:+.91; +5 FP add @1834
18 1835 0000000003603.6:+.94; +6 FP sub @1835
19 1836 0000000003606.7:+.97; +7 FP subrev @1836
20 1837 0000000003611.8:+.100; +8 FP mult @1837
21 1838 0000000003614.9:+.103; +9 FP divrev @1838
22 1839 0000000003616.10:+.105; +10 FP div @1839
23 1840 0000000003621.11:+.108; +11 @1840
24 1841 0000000003626.12:+.113; +12 @1841
25 1842 0000000003636.13:+.121; +13 @1842
26 1843  .14:GP1F     ; +14 40 0 : 04 1 @1843
26+11843 4000000100001 40 0:04 +1 
27 1844  .15:GP1F     ; +15 40 0 : 05 1 @1844
27+11844 4000000120001 40 0:05 +1 
28 1845  .16:GP1F     ; +16 40 0 : 07 1 @1845
28+11845 4000000160001 40 0:07 +1 
29 1846 0000000003644.17:+.127; +17 @1846
30 1847 0000000003646.18:+.129; +18 @1847
31 1848 0000000003652.19:+.133; +19 @1848
32 1849  .20:GP9F     ; +20 40 0 : 00 9 @1849
32+11849 4000000000011 40 0:00 +9 
33 1850  .21:GP10F     ; +21 40 0 : 00 10 @1850
33+11850 4000000000012 40 0:00 +10 
34 1851  .22:GP11F     ; +22 40 0 : 00 11 @1851
34+11851 4000000000013 40 0:00 +11 
35 1852  .23:GP12F     ; +23 40 0 : 00 12 @1852
35+11852 4000000000014 40 0:00 +12 
36 1853  .24:GP9F     ; +24 40 0 : 01 9 @1853
36+11853 4000000020011 40 0:01 +9 
37 1854  .25:GP10F     ; +25 40 0 : 01 10 @1854
37+11854 4000000020012 40 0:01 +10 
38 1855  .26:GP9F     ; +26 40 0 : 02 9 @1855
38+11855 4000000040011 40 0:02 +9 
39 1856  .27:GP10F     ; +27 40 0 : 02 10 @1856
39+11856 4000000040012 40 0:02 +10 
40 1857 0000000003656.28:+.137; +28 @1857
41 1858  .29:GP1F     ; +29 40 0 : 03 1 @1858
41+11858 4000000060001 40 0:03 +1 
42 1859 0000000003663.30:+.142; +30 @1859
43 1860 0000000003747.31:+.194; +31 NE fwd @1860
44 1861 0000000003666.32:+.145; +32 EQ fwd @1861
45 1862 0000000003670.33:+.147; +33 LS rev @1862
46 1863 0000000003745.34:+.192; +34 LS @1863
47 1864 0000000003672.35:+.149; +35 GR @1864
48 1865 0000000003700.36:+.155; +36 LE @1865
49 1866 0000000003702.37:+.157; +37 GE @1866
50 1867 0000000003704.38:+.159; +38 @1867
51 1868 0000000003711.39:+.164; +39 @1868
52 1869 0000000003714.40:+.167; +40 @1869
53 1870 0000000003716.41:+.169; +41 @1870
54 1871 0000000003736.42:+.185; +42 @1871
55 1872  .43:GP7F ,   ; +43 enter block @1872
55+11872 4000010000007 40 +2:00 +7 
56 1873  .44:GP7F ,   ; +44 exit block @1873
56+11873 4000014000007 40 +3:00 +7 
57 1874  .45:GP1F     ; +45 @1874
57+11874 4000001000001 40 0:40 +1 
58 1875 0000000003720.46:+.171; +46 index1 @1875
59 1876 0000000003722.47:+.173; +47 index2 @1876
60 1877 0000000003724.48:+.175; +48 index3 @1877
61 1878 0000000003726.49:+.177; +49 start print @1878
62 1879 0000000003730.50:+.179; +50 end print @1879
63 1880  .51:GP7F ,   ; +51 OutReal @1880
63+11880 4000104000007 40 +17:00 +7 
64 1881  .52:GP7F ,   ; +52 OutInt @1881
64+11881 4000110000007 40 +18:00 +7 
65 1882  .53:GP7F ,   ; +53 Setup @1882
65+11882 4000034000007 40 +7:00 +7 
66 1883 0000000003732.54:+.181; +54 @1883
67 1884 0000000003734.55:+.183; +55 @1884
68 1885  .56:GP7F ,   ; +56 OutStr @1885
68+11885 4000050100007 40 +10:04 +7 
69 1886  .57:GP7F ,   ; +57 StackInfo @1886
69+11886 4000044000007 40 +9:00 +7 
70 1887  .58:GP7F ,   ; +58 UnstkInfo @1887
70+11887 4000050000007 40 +10:00 +7 
71 1888  .59:GP1F     ; +59 @1888
71+11888 4000000540001 40 0:26 +1 
72 1889  .60:GP7F ,   ; +60 AllocArray @1889
72+11889 4000024000007 40 +5:00 +7 
73 1890  .61:GP2F ,   ; +61 @1890
73+11890 4000031000002 40 +6:40 +2 
74 1891 0000000003741.62:+.188; +62 @1891
75 1892  .63:GP2F ,   ; +63 @1892
75+11892 4000161000002 40 +28:40 +2 
76 1893 0000000003751.64:+.196; +64 @1893
77 1894 0000000003753.65:+.198; +65 @1894
78 1895 0000000003755.66:+.200; +66 @1895
79 1896 0000000003761.67:+.204; +67 @1896
80 1897  .68:GP1F     ; +68 40 0 : 22 1 @1897
80+11897 4000000440001 40 0:22 +1 
81 1898 0000000003767.69:+.210; +69 @1898
82 1899 0000000003772.70:+.213; +70 @1899
83 1900  .71:GP2F ,   ; +71 40 9 : 44 2 @1900
83+11900 4000045100002 40 +9:44 +2 
84 1901  .72:GP0F ,   ; +72 40 6 : 40 0 @1901
84+11901 4000031000000 40 +6:40 +0 
85 1902 0000000004001.73:+.220; +73 GR rev @1902
86 1903 0000000004007.74:+.226; +74 LE rev @1903
87 1904 0000000004003.75:+.222; +75 NE rev @1904
88 1905 0000000004011.76:+.228; +76 EQ rev @1905
89 1906 0000000004013.77:+.230; +77 GE rev @1906
90 1907 0000000004015.78:+.232; +78 @1907
91 1908  .79:GP7F ,   ; +79 ?? @1908
91+11908 4000320000007 40 +52:00 +7 
92 1909 0000000004017.80:+.234; +80 @1909
93 1910 0000000004021.81:+.236; +81 @1910
94 1911  .82:GP1     ; +82 00 0 : 30 1 @1911
94+11911 0000000600001 00 0:30 +1 
95 1912  .83:GP4F ,   ; +83 43 0 : 00 4 @1912
95+11912 4300000000004 43 +0:00 +4 
96 1913  .84:GP0F ,   ; +84 40 4096 : 65 0 @1913
96+11913 4040001520000 40 +4096:65 +0 
97 1914  .85:GP3 ,   ; +85 03 1 : 00 3 @1914
97+11914 0300004000003 03 +1:00 +3 
98 1915  .86:GP0F ,   ; +86 40 4096 : 65 0 @1915
98+11915 4040001520000 40 +4096:65 +0 
99 1916  .87:GP7F ,   ; +87 ?? @1916
99+11916 4000010100007 40 +2:04 +7 
100 1917  ;
101 1917  .88:GP3 ,   ; +88 03 1 : 00 3 @1917
101+11917 0300004000003 03 +1:00 +3 
102 1918   GP0F ,   ; +89 40 0 : 01 0 @1918
102+11918 4000000020000 40 +0:01 +0 
103 1919   GP0F ,   ; +90 40 0 : 62 0 @1919
103+11919 4000001440000 40 +0:62 +0 
104 1920  ;
105 1920  .91:GP5F     ; +91 make sure both ops real @1920
105+11920 4000000000005 40 0:00 +5 
106 1921   GP1     ; +92 fwd op=60 @1921
106+11921 0000001400001 00 0:60 +1 
107 1922   GP1     ; +93 fwd op=60 @1922
107+11922 0000001400001 00 0:60 +1 
108 1923  ;
109 1923  .94:GP5F     ; +94 make sure both ops real @1923
109+11923 4000000000005 40 0:00 +5 
110 1924   GP1     ; +95 fwd op=61 @1924
110+11924 0000001420001 00 0:61 +1 
111 1925   GP1     ; +96 rev op=62 @1925
111+11925 0000001440001 00 0:62 +1 
112 1926  ;
113 1926  .97:GP5F     ; +97 make sure both ops real @1926
113+11926 4000000000005 40 0:00 +5 
114 1927   GP1     ; +98 fwd op=62 @1927
114+11927 0000001440001 00 0:62 +1 
115 1928   GP1     ; +99 rev op=61 @1928
115+11928 0000001420001 00 0:61 +1 
116 1929  ;
117 1929  .100:GP5F     ; +100 make sure both ops real @1929
117+11929 4000000000005 40 0:00 +5 
118 1930   GP1     ; +101 fwd op=63 @1930
118+11930 0000001460001 00 0:63 +1 
119 1931   GP1     ; +102 rev op=63 @1931
119+11931 0000001460001 00 0:63 +1 
120 1932  ;
121 1932  .103:GP1     ; +103 00 0 : 10 1 @1932
121+11932 0000000200001 00 0:10 +1 
122 1933   GP1F     ; +104 40 0 : 64 1 @1933
122+11933 4000001500001 40 0:64 +1 
123 1934  ;
124 1934  .105:GP5F     ; +105 make sure both ops real @1934
124+11934 4000000000005 40 0:00 +5 
125 1935   GP1     ; +106 fwd op=64 (fdv) @1935
125+11935 0000001500001 00 0:64 +1 
126 1936   GP6     ; +107 rev op=regen(9=FPdivrev) @1936
126+11936 0000044000006 00 +9:00 +6 
127 1937  ;
128 1937  .108:GP3 ,   ; +108 03 1 : 00 3 @1937
128+11937 0300004000003 03 +1:00 +3 
129 1938   GP0 ,   ; +109 00 4096 : 65 0 @1938
129+11938 0040001520000 00 +4096:65 +0 
130 1939   GP2 ,   ; +110 00 1 : 20 2 @1939
130+11939 0000004400002 00 +1:20 +2 
131 1940   GP6     ; +111 00 2 : 00 6 @1940
131+11940 0000010000006 00 +2:00 +6 
132 1941   GP2F ,   ; +112 40 1 : 64 2 @1941
132+11941 4000005500002 40 +1:64 +2 
133 1942  ;
134 1942  .113:GP3 ,   ; +113 03 1 : 00 3 @1942
134+11942 0300004000003 03 +1:00 +3 
135 1943   GP0 ,   ; +114 00 4096 : 65 0 @1943
135+11943 0040001520000 00 +4096:65 +0 
136 1944   GP2 ,   ; +115 00 13 : 20 2 @1944
136+11944 0000064400002 00 +13:20 +2 
137 1945   GP1     ; +116 00 0 : 30 1 @1945
137+11945 0000000600001 00 0:30 +1 
138 1946   GP2 ,   ; +117 00 14 : 20 2 @1946
138+11946 0000070400002 00 +14:20 +2 
139 1947   GP4 ,   ; +118 03 1 : 00 4 @1947
139+11947 0300004000004 03 +1:00 +4 
140 1948   GP7F ,   ; +119 @1948
140+11948 4000020100007 40 +4:04 +7 
141 1949   GP7F ,   ; +120 @1949
141+11949 4000024100007 40 +5:04 +7 
142 1950  ;
143 1950  .121:GP2 ,   ; +121 00 14 : 20 2 @1950
143+11950 0000070400002 00 +14:20 +2 
144 1951   GP6     ; +122 00 2 : 00 6 @1951
144+11951 0000010000006 00 +2:00 +6 
145 1952   GP2 ,   ; +123 00 13 : 20 2 @1952
145+11952 0000064400002 00 +13:20 +2 
146 1953   GP3 ,   ; +124 03 1 : 00 3 @1953
146+11953 0300004000003 03 +1:00 +3 
147 1954   GP7F ,   ; +125 40 4 : 04 7 @1954
147+11954 4000020100007 40 +4:04 +7 
148 1955   GP7F ,   ; +126 40 5 : 04 7 @1955
148+11955 4000024100007 40 +5:04 +7 
149 1956  ;
150 1956  .127:GP1     ; +127 00 0 : 52 1 @1956
150+11956 0000001240001 00 0:52 +1 
151 1957   GP0F ,   ; +128 40 38 : 54 0 @1957
151+11957 4000231300000 40 +38:54 +0 
152 1958  ;
153 1958  .129:GP2 ,   ; +129 00 13 : 20 2 @1958
153+11958 0000064400002 00 +13:20 +2 
154 1959   GP1     ; +130 00 0 : 30 1 @1959
154+11959 0000000600001 00 0:30 +1 
155 1960   GP2 ,   ; +131 00 14 : 20 2 @1960
155+11960 0000070400002 00 +14:20 +2 
156 1961   GP7F ,   ; +132 40 3 : 04 7 @1961
156+11961 4000014100007 40 +3:04 +7 
157 1962  ;
158 1962  .133:GP2 ,   ; +133 00 14 : 20 2 @1962
158+11962 0000070400002 00 +14:20 +2 
159 1963   GP1     ; +134 00 0 : 30 1 @1963
159+11963 0000000600001 00 0:30 +1 
160 1964   GP2 ,   ; +135 00 13 : 20 2 @1964
160+11964 0000064400002 00 +13:20 +2 
161 1965   GP7F ,   ; +136 40 3 : 04 7 @1965
161+11965 4000014100007 40 +3:04 +7 
162 1966  ;
163 1966  .137:GP2 ,   ; +137 00 11 : 43 2 @1966
163+11966 0000055060002 00 +11:43 +2 
164 1967   GP8     ; +138 00 0 : 04 8 @1967
164+11967 0000000100010 00 0:04 +8 
165 1968   GP0F ,   ; +139 40 0 : 00 0 @1968
165+11968 4000000000000 40 +0:00 +0 
166 1969   GP9     ; +140 00 0 : 43 9 @1969
166+11969 0000001060011 00 0:43 +9 
167 1970   GP12F     ; +141 40 0 : 00 12 @1970
167+11970 4000000000014 40 0:00 +12 
168 1971  ;
169 1971  .142:GP9     ; +142 00 0 : 41 9 @1971
169+11971 0000001020011 00 0:41 +9 
170 1972   GP1     ; +143 00 0 : 30 1 @1972
170+11972 0000000600001 00 0:30 +1 
171 1973   GP12F     ; +144 40 0 : 00 12 @1973
171+11973 4000000000014 40 0:00 +12 
172 1974  ;
173 1974  .145:GP6     ; +145 00 31 : 00 6 @1974
173+11974 0000174000006 00 +31:00 +6 
174 1975   GP6F     ; +146 40 28 : 00 6 @1975
174+11975 4000160000006 40 +28:00 +6 
175 1976  ;
176 1976  .147:GP8F     ; +147 40 0 : 03 8 @1976
176+11976 4000000060010 40 0:03 +8 
177 1977   GP0F ,   ; +148 40 0 : 00 0 @1977
177+11977 4000000000000 40 +0:00 +0 
178 1978  ;
179 1978  .149:GP3 ,   ; +149 03 3 : 00 3 @1978
179+11978 0300014000003 03 +3:00 +3 
180 1979   GP4 ,   ; +150 03 2 : 00 4 @1979
180+11979 0300010000004 03 +2:00 +4 
181 1980   GP1     ; +151 00 0 : 07 1 @1980
181+11980 0000000160001 00 0:07 +1 
182 1981   GP6F     ; +152 40 33 : 00 6 @1981
182+11981 4000204000006 40 +33:00 +6 
183 1982   GP6     ; +153 00 7 : 00 6 @1982
183+11982 0000034000006 00 +7:00 +6 
184 1983   GP6F     ; +154 40 33 : 00 6 @1983
184+11983 4000204000006 40 +33:00 +6 
185 1984  ;
186 1984  .155:GP6     ; +155 00 35 : 00 6 @1984
186+11984 0000214000006 00 +35:00 +6 
187 1985   GP6F     ; +156 40 28 : 00 6 @1985
187+11985 4000160000006 40 +28:00 +6 
188 1986  ;
189 1986  .157:GP6     ; +157 00 34 : 00 6 @1986
189+11986 0000210000006 00 +34:00 +6 
190 1987   GP6F     ; +158 40 28 : 00 6 @1987
190+11987 4000160000006 40 +28:00 +6 
191 1988  ;
192 1988  .159:GP2 ,   ; +159 00 11 : 43 2 @1988
192+11988 0000055060002 00 +11:43 +2 
193 1989   GP1     ; +160 00 0 : 04 1 @1989
193+11989 0000000100001 00 0:04 +1 
194 1990   GP9     ; +161 00 0 : 43 9 @1990
194+11990 0000001060011 00 0:43 +9 
195 1991   GP12     ; +162 @1991
195+11991 0000000000014 00 0:00 +12 
196 1992   GP6F     ; +163 40 28 : 00 6 @1992
196+11992 4000160000006 40 +28:00 +6 
197 1993  ;
198 1993  .164:GP1M     ; +164 00 0 / 00 1 @1993
198+11993 0000002000001 00 0/00 +1 
199 1994   GP0 ,   ; +165 00 0 : 73 0 @1994
199+11994 0000001660000 00 +0:73 +0 
200 1995   GP1F     ; +166 40 0 : 40 1 @1995
200+11995 4000001000001 40 0:40 +1 
201 1996  ;
202 1996  .167:GP2M ,   ; +167 00 1 / 20 2 @1996
202+11996 0000006400002 00 +1/20 +2 
203 1997   GP0F ,   ; +168 40 0 : 30 0 @1997
203+11997 4000000600000 40 +0:30 +0 
204 1998  ;
205 1998  .169:GP1M     ; +169 00 0 / 00 1 @1998
205+11998 0000002000001 00 0/00 +1 
206 1999   GP0F ,   ; +170 40 1 : 44 0 @1999
206+11999 4000005100000 40 +1:44 +0 
207 2000  ;
208 2000  .171:GP1     ; +171 00 0 : 30 1 @2000
208+12000 0000000600001 00 0:30 +1 
209 2001   GP7F ,   ; +172 Index1 @2001
209+12001 4000030100007 40 +6:04 +7 
210 2002  ;
211 2002  .173:GP1     ; +173 00 0 : 30 1 @2002
211+12002 0000000600001 00 0:30 +1 
212 2003   GP2F ,   ; +174 40 7 : 44 2 @2003
212+12003 4000035100002 40 +7:44 +2 
213 2004  ;
214 2004  .175:GP1     ; +175 00 0 : 30 1 @2004
214+12004 0000000600001 00 0:30 +1 
215 2005   GP2F ,   ; +176 40 8 : 44 2 @2005
215+12005 4000041100002 40 +8:44 +2 
216 2006  ;
217 2006  .177:GP2 ,   ; +177 00 26 : 30 2 @2006
217+12006 0000150600002 00 +26:30 +2 
218 2007   GP7F ,   ; +178 StackData @2007
218+12007 4000044000007 40 +9:00 +7 
219 2008  ;
220 2008  .179:GP2 ,   ; +179 00 26 : 30 2 @2008
220+12008 0000150600002 00 +26:30 +2 
221 2009   GP7F ,   ; +180 UnstkData @2009
221+12009 4000050000007 40 +10:00 +7 
222 2010  ;
223 2010  .181:GP7 ,   ; +181 RaedReal @2010
223+12010 0000054100007 00 +11:04 +7 
224 2011   GP1F     ; +182 40 0 : 20 1 @2011
224+12011 4000000400001 40 0:20 +1 
225 2012  ;
226 2012  .183:GP7 ,   ; +183 ReadInt @2012
226+12012 0000060100007 00 +12:04 +7 
227 2013   GP1F     ; +184 40 0 : 20 1 @2013
227+12013 4000000400001 40 0:20 +1 
228 2014  ;
229 2014  .185:GP1     ; +185 00 0 : 30 1 @2014
229+12014 0000000600001 00 0:30 +1 
230 2015   GP7 ,   ; +186 00 4 : 00 7 @2015
230+12015 0000020000007 00 +4:00 +7 
231 2016   GP1F     ; +187 40 0 : 20 1 @2016
231+12016 4000000400001 40 0:20 +1 
232 2017  ;
233 2017  .188:GP3 ,   ; +188 if type==3 skip 2 @2017
233+12017 0300010000003 03 +2:00 +3 
234 2018   GP4 ,   ; +189 if idtype == 3 skip 2 @2018
234+12018 0300004000004 03 +1:00 +4 
235 2019   GP1F     ; +190 gen 05 xxx @2019
235+12019 4000000120001 40 0:05 +1 
236 2020   GP6F     ; +191 regen 6 @2020
236+12020 4000030000006 40 +6:00 +6 
237 2021  ;
238 2021  .192:GP6     ; +192 regen(62) @2021
238+12021 0000370000006 00 +62:00 +6 
239 2022   GP6F     ; +193 regen(33) @2022
239+12022 4000204000006 40 +33:00 +6 
240 2023  ;
241 2023  .194:GP6     ; +194 regen(62) @2023
241+12023 0000370000006 00 +62:00 +6 
242 2024   GP6F     ; +195 regen(75) @2024
242+12024 4000454000006 40 +75:00 +6 
243 2025  ;
244 2025  .196:GP13     ; +196 00 0 / 00 13 @2025
244+12025 0000002000015 00 0/00 +13 
245 2026   GP1F     ; +197 40 0 : 40 1 @2026
245+12026 4000001000001 40 0:40 +1 
246 2027  ;
247 2027  .198:GP1M     ; +198 00 0 / 00 1 @2027
247+12027 0000002000001 00 0/00 +1 
248 2028   GP0F ,   ; +199 40 2 : 40 0 @2028
248+12028 4000011000000 40 +2:40 +0 
249 2029  ;
250 2029  .200:GP4 ,   ; +200 03 1 : 00 4 @2029
250+12029 0300004000004 03 +1:00 +4 
251 2030   GP1F     ; +201 40 0 : 24 1 @2030
251+12030 4000000500001 40 0:24 +1 
252 2031  ;
253 2031  .202:GP1     ; +202 00 0 : 60 1 @2031
253+12031 0000001400001 00 0:60 +1 
254 2032   GP1F     ; +203 40 0 : 20 1 @2032
254+12032 4000000400001 40 0:20 +1 
255 2033  ;
256 2033  .204:GP1     ; +204 00 0 : 10 1 @2033
256+12033 0000000200001 00 0:10 +1 
257 2034   GP9     ; +205 00 0 : 41 9 @2034
257+12034 0000001020011 00 0:41 +9 
258 2035   GP1     ; +206 00 0 : 30 1 @2035
258+12035 0000000600001 00 0:30 +1 
259 2036   GP11     ; +207 00 0 : 00 11 @2036
259+12036 0000000000013 00 0:00 +11 
260 2037   GP1     ; +208 00 0 : 11 1 @2037
260+12037 0000000220001 00 0:11 +1 
261 2038   GP12F     ; +209 40 0 : 00 12 @2038
261+12038 4000000000014 40 0:00 +12 
262 2039  ;
263 2039  .210:GP4 ,   ; +210 03 1 : 00 4 @2039
263+12039 0300004000004 03 +1:00 +4 
264 2040   GP1F     ; +211 40 0 : 07 1 @2040
264+12040 4000000160001 40 0:07 +1 
265 2041   GP1F     ; +212 40 0 : 62 1 @2041
265+12041 4000001440001 40 0:62 +1 
266 2042  ;
267 2042  .213:GP1     ; +213 00 0 : 30 1 @2042
267+12042 0000000600001 00 0:30 +1 
268 2043   GP4 ,   ; +214 03 1 : 00 4 @2043
268+12043 0300004000004 03 +1:00 +4 
269 2044   GP0 ,   ; +215 00 4096 : 65 0 @2044
269+12044 0040001520000 00 +4096:65 +0 
270 2045   GP9     ; +216 genbr(41) @2045
270+12045 0000001020011 00 0:41 +9 
271 2046   GP11     ; +217 @2046
271+12046 0000000000013 00 0:00 +11 
272 2047   GP0 ,   ; +218 00 0 : 62 0 @2047
272+12047 0000001440000 00 +0:62 +0 
273 2048   GP12F     ; +219 patchbr() @2048
273+12048 4000000000014 40 0:00 +12 
274 2049  ;
275 2049  .220:GP6     ; +220 00 4 : 00 6 @2049
275+12049 0000020000006 00 +4:00 +6 
276 2050   GP6F     ; +221 40 33 : 00 6 @2050
276+12050 4000204000006 40 +33:00 +6 
277 2051  ;
278 2051  .222:GP9     ; +222 genbr(42) @2051
278+12051 0000001040011 00 0:42 +9 
279 2052   GP8     ; +223 gen(30 *+1) @2052
279+12052 0000000600010 00 0:30 +8 
280 2053 4000000000000 +04000000000000; +224 false @2053
281 2054   GP12F     ; +225 patchbr() @2054
281+12054 4000000000014 40 0:00 +12 
282 2055  ;
283 2055  .226:GP6     ; +226 00 73 : 00 6 @2055
283+12055 0000444000006 00 +73:00 +6 
284 2056   GP6F     ; +227 40 28 : 00 6 @2056
284+12056 4000160000006 40 +28:00 +6 
285 2057  ;
286 2057  .228:GP6     ; +228 00 75 : 00 6 @2057
286+12057 0000454000006 00 +75:00 +6 
287 2058   GP6F     ; +229 40 28 : 00 6 @2058
287+12058 4000160000006 40 +28:00 +6 
288 2059  ;
289 2059  .230:GP6     ; +230 00 33 : 00 6 @2059
289+12059 0000204000006 00 +33:00 +6 
290 2060   GP6F     ; +231 40 28 : 00 6 @2060
290+12060 4000160000006 40 +28:00 +6 
291 2061  ;
292 2061  .232:GP1     ; +232 00 0 : 73 1 @2061
292+12061 0000001660001 00 0:73 +1 
293 2062   GP2F ,   ; +233 40 6 : 40 2 @2062
293+12062 4000031000002 40 +6:40 +2 
294 2063  ;
295 2063  .234:GP2 ,   ; +234 00 53 : 30 2 @2063
295+12063 0000324600002 00 +53:30 +2 
296 2064   GP7F ,   ; +235 StackData @2064
296+12064 4000044000007 40 +9:00 +7 
297 2065  ;
298 2065  .236:GP2 ,   ; +236 00 53 : 30 2 @2065
298+12065 0000324600002 00 +53:30 +2 
299 2066   GP7F ,   ; +237 UnstkData @2066
299+12066 4000050000007 40 +10:00 +7 
300 2067 0000000000000 +0; +238 @2067
301 2068  ;
302 2068  ; end of generate patterns
303 2068  ;

Page created by Bill Purvis, last updated: January 09 2004