B2Wsh M:2 DEF libhdr.h[153] B2Wsh=2
B2Wsh M:2 MAN libhdr.h[159] bytesperword=1<<B2Wsh
CloseObj M:1 DEF libhdr.h[204] CloseObj=1
GB2312 M:-2 DEF libhdr.h[438] GB2312=-2
InitObj M:0 DEF libhdr.h[203] InitObj=0
Sys_buttons M:56 DEF libhdr.h[344] Sys_buttons=56
Sys_callc M:59 DEF libhdr.h[347] Sys_callc=59
Sys_callnative M:53 DEF libhdr.h[341] Sys_callnative=53
Sys_close M:16 DEF libhdr.h[308] Sys_close=16
Sys_cputime M:30 DEF libhdr.h[320] Sys_cputime=30
Sys_cputime M:30 MAN pal.b[41] sys(Sys_cputime)
Sys_datstamp M:44 DEF libhdr.h[332] Sys_datstamp=44
Sys_delay M:57 DEF libhdr.h[345] Sys_delay=57
Sys_deletefile M:17 DEF libhdr.h[309] Sys_deletefile=17
Sys_devcom M:43 DEF libhdr.h[331] Sys_devcom=43
Sys_dumpmem M:52 DEF libhdr.h[340] Sys_dumpmem=52
Sys_filemodtime M:31 DEF libhdr.h[321] Sys_filemodtime=31
Sys_filesize M:46 DEF libhdr.h[334] Sys_filesize=46
Sys_flt M:63 DEF libhdr.h[352] Sys_flt=63
Sys_freevec M:22 DEF libhdr.h[313] Sys_freevec=22
Sys_getpid M:51 DEF libhdr.h[339] Sys_getpid=51
Sys_getprefix M:33 DEF libhdr.h[323] Sys_getprefix=33
Sys_getsysval M:48 DEF libhdr.h[336] Sys_getsysval=48
Sys_gettrval M:62 DEF libhdr.h[351] Sys_gettrval=62
Sys_getvec M:21 DEF libhdr.h[312] Sys_getvec=21
Sys_globin M:24 DEF libhdr.h[315] Sys_globin=24
Sys_graphics M:34 DEF libhdr.h[324] Sys_graphics=34
Sys_inc M:55 DEF libhdr.h[343] Sys_inc=55
Sys_interpret M:7 DEF libhdr.h[300] Sys_interpret=7
Sys_intflag M:28 DEF libhdr.h[318] Sys_intflag=28
Sys_loadseg M:23 DEF libhdr.h[314] Sys_loadseg=23
Sys_lockirq M:41 DEF libhdr.h[329] Sys_lockirq=41
Sys_muldiv M:26 DEF libhdr.h[317] Sys_muldiv=26
Sys_openread M:14 DEF libhdr.h[306] Sys_openread=14
Sys_openreadwrite M:47 DEF libhdr.h[335] Sys_openreadwrite=47
Sys_openwrite M:15 DEF libhdr.h[307] Sys_openwrite=15
Sys_platform M:54 DEF libhdr.h[342] Sys_platform=54
Sys_putsysval M:49 DEF libhdr.h[337] Sys_putsysval=49
Sys_quit M:0 DEF libhdr.h[293] Sys_quit=0
Sys_read M:12 DEF libhdr.h[304] Sys_read=12
Sys_renamefile M:18 DEF libhdr.h[310] Sys_renamefile=18
Sys_rti M:1 DEF libhdr.h[294] Sys_rti=1
Sys_sardch M:10 DEF libhdr.h[302] Sys_sardch=10
Sys_saveregs M:2 DEF libhdr.h[295] Sys_saveregs=2
Sys_sawrch M:11 DEF libhdr.h[303] Sys_sawrch=11
Sys_seek M:38 DEF libhdr.h[326] Sys_seek=38
Sys_setcount M:-1 DEF libhdr.h[292] Sys_setcount=-1
Sys_setprefix M:32 DEF libhdr.h[322] Sys_setprefix=32
Sys_setraster M:29 DEF libhdr.h[319] Sys_setraster=29
Sys_setst M:3 DEF libhdr.h[296] Sys_setst=3
Sys_settrcount M:61 DEF libhdr.h[350] Sys_settrcount=61
Sys_shellcom M:50 DEF libhdr.h[338] Sys_shellcom=50
Sys_sound M:58 DEF libhdr.h[346] Sys_sound=58
Sys_tally M:6 DEF libhdr.h[299] Sys_tally=6
Sys_tell M:39 DEF libhdr.h[327] Sys_tell=39
Sys_tracing M:4 DEF libhdr.h[297] Sys_tracing=4
Sys_trpush M:60 DEF libhdr.h[349] Sys_trpush=60
Sys_unloadseg M:25 DEF libhdr.h[316] Sys_unloadseg=25
Sys_unlockirq M:42 DEF libhdr.h[330] Sys_unlockirq=42
Sys_waitirq M:40 DEF libhdr.h[328] Sys_waitirq=40
Sys_watch M:5 DEF libhdr.h[298] Sys_watch=5
Sys_write M:13 DEF libhdr.h[305] Sys_write=13
UTF8 M:-1 DEF libhdr.h[437] UTF8=-1
a F:30 LF pal.b[8115] a(@ll_rsc,"QC  ")
a F:30 LF pal.b[8116] a(@ll_rsf,"QF  ")
a F:30 LF pal.b[8117] a(@ll_svc,"SVC ")
a F:30 LF pal.b[8118] a(@ll_svf,"SVF ")
a F:30 LF pal.b[8119] a(@ll_svf1,"SVF1")
a F:30 LF pal.b[8123] a(@ll_binde,"BE  ")
a F:30 LF pal.b[8133] a(@ll_unbind,"UBV ")
a F:30 LF pal.b[8135] a(@ll_cyf,"LF  ")
a F:30 LF pal.b[8139] a(@ll_naf,"NF  ")
a F:30 LF pal.b[8140] a(@ll_na1f,"NF1 ")
a F:30 LF pal.b[8141] a(@ll_na2f,"NF2 ")
a F:30 LF pal.b[8142] a(@ll_st,"S   ")
a F:30 LF pal.b[8144] a(@ll_rec0,"REC0")
a F:30 LF pal.b[8148] a(@ll_cond,"->  ")
a F:30 LF pal.b[8149] a(@ll_tup,"AUG ")
a F:30 LF pal.b[8150] a(@ll_tupa,"AUGA")
a F:30 LF pal.b[8161] a(@ll_ap2f,"B2F ")
a F:30 LF pal.b[8163] a(@ll_ap2sf,"B2SF")
a F:30 LF pal.b[8165] a(@ll_consf,"AUF ")
a F:30 LF pal.b[8167] a(@ll_xconsf,"XAUF")
a F:30 RT pal.b[8092] LET a(n,s)BE..
a_div G:451 DEF palhdr.h[546] a_div=
a_div G:451 LG pal.b[5180] RESULTIS arithfn(a,b,a_div)
a_div G:451 LG pal.b[7012] RESULTIS arithfn(y1,p,a_div)
a_div G:451 SG pal.b[8284] a_div:=ds("/",@div,mk_div,...)
a_eq G:446 DEF palhdr.h[541] a_eq=
a_eq G:446 LG pal.b[10038] a:=ap2(a,b,a_eq)
a_eq G:446 SG pal.b[8279] a_eq:=dt("=",@eqlv,ap2,...)
a_fclos G:445 DEF palhdr.h[540] a_fclos=
a_fclos G:445 LG pal.b[5896] .. REPEATWHILE tyv(a)=a_fclos
a_fclos G:445 LG pal.b[6062] WHILE tyv(c)=a_fclos DO ..
a_fclos G:445 LG pal.b[6077] WHILE tyv(c3)=a_fclos DO ..
a_fclos G:445 LG pal.b[8254] typ!i:=a_fclos
a_fclos G:445 LG pal.b[8255] set_z(!a_fclos,"fn",...,...)
a_fclos G:445 LG pal.b[9963] IF t=a_fclos&h1!a=ze DO ..
a_fclos G:445 SG pal.b[8253] a_fclos:=du("lambda",s_code2,...,s_fclos)
a_gt G:447 DEF palhdr.h[542] a_gt=
a_gt G:447 LG pal.b[10043] a:=ap2(b,a,a_gt)
a_gt G:447 LG pal.b[10047] ap2(b,a,a_gt)
a_gt G:447 LG pal.b[10051] a:=ap2(a,b,a_gt)
a_gt G:447 SG pal.b[8280] a_gt:=dt(">",@gtv,ap2,...)
a_minu G:449 DEF palhdr.h[544] a_minu=
a_minu G:449 LG pal.b[329] RESULTIS arithfn(a,b,a_minu)
a_minu G:449 LG pal.b[6942] RESULTIS arithfn(y0,p,a_minu)
a_minu G:449 SG pal.b[8282] a_minu:=ds("-",@minu,mk_minu,...)
a_mul G:450 DEF palhdr.h[545] a_mul=
a_mul G:450 LG pal.b[4859] RESULTIS arithfn(a,b,a_mul)
a_mul G:450 SG pal.b[8283] a_mul:=ds("**",@mul,mk_mul,...)
a_null G:452 DEF palhdr.h[547] a_null=
a_null G:452 LG pal.b[9826] mk_a1v(a_null,a,null)
a_null G:452 LLG pal.b[4453] FOR i=@e TO @a_null DO..
a_null G:452 LLG pal.b[8210] FOR i=@e TO @a_null DO..
a_null G:452 LLG pal.b[8496] FOR i=@e TO @a_null DO..
a_null G:452 SG pal.b[8288] a_null:=set_v("NULL",@null)
a_num G:443 DEF palhdr.h[538] a_num=
a_num G:443 LG pal.b[6438] RESULTIS a_num
a_num G:443 LG pal.b[6776] RESULTIS tyv(a)=a_num
a_num G:443 LG pal.b[8230] typ!i:=a_num
a_num G:443 SG pal.b[8229] a_num:=set_v("NUM",@num)
a_plus G:448 DEF palhdr.h[543] a_plus=
a_plus G:448 LG pal.b[10120] mk_plus(b,y1,a_plus)
a_plus G:448 LG pal.b[10140] mk_plus(i,s,a_plus)
a_plus G:448 LG pal.b[188] RESULTIS arithfn(a,b,a_plus)
a_plus G:448 SG pal.b[8281] a_plus:=ds("+",@add,mk_plus,...)
a_qu G:444 DEF palhdr.h[539] a_qu=
a_qu G:444 LG pal.b[3376] IF tyv(a1)=a_qu DO ..
a_qu G:444 LG pal.b[8247] set_z(!a_qu,"qu",...,...)
a_qu G:444 LG pal.b[8248] typ!i:=a_qu
a_qu G:444 LG pal.b[9862] IF tyv(d)=a_qu DO ..
a_qu G:444 LG pal.b[9902] TEST t=a_qu THEN .. ELSE ..
a_qu G:444 SG pal.b[8246] a_qu:=dv("'",s_codev,...,...)
abort G:202 DEF palhdr.h[257] abort=
abort G:202 LG pal.b[1658] IF !q1=abort DO ..
abort G:202 LG pal.b[5385] abort(0)
abort G:202 RT pal.b[997] LET abort(code,addr,oldstack,data)BE..
abort G:28 DEF libhdr.h[43] abort=28
abort G:28 LG pal.b[43] abort(n)
absv G:492 DEF palhdr.h[593] absv=
absv G:492 FN pal.b[7082] LET absv(p)=..
absv G:492 LLG pal.b[8305] set_v("ABS",@absv)
add G:525 DEF palhdr.h[630] add=
add G:525 FN pal.b[84] LET add(a,b)=..
add G:525 LG pal.b[10060] RESULTIS add(a,b)
add G:525 LG pal.b[122] a:=add(a,b)
add G:525 LG pal.b[145] a:=add(a,h2!b)
add G:525 LG pal.b[1461] r:=add(r,d)
add G:525 LG pal.b[158] a:=add(a,b)
add G:525 LG pal.b[5456] add(c,bXORysg)
add G:525 LG pal.b[5489] t:=add(t,d1)
add G:525 LG pal.b[5524] (f->minu,add)(a,b)
add G:525 LG pal.b[5534] add
add G:525 LG pal.b[6513] v:=add(i,v)
add G:525 LG pal.b[6746] RESULTIS add(a,a)
add G:525 LG pal.b[7549] q:=(p<ysg->add,minu)(q,r)
add G:525 LG pal.b[7585] (pXORq)<ysg->add,minu
add G:525 LG pal.b[7619] p<ysg->add,minu
add G:525 LG pal.b[7686] q1<ysg->add,minu
add G:525 LLG pal.b[8281] a_plus:=ds("+",@add,mk_plus,...)
add G:525 SG pal.b[5535] add,ddadd:=ddadd|signbit,t|signbit
addp1 G:556 DEF palhdr.h[665] addp1=
addp1 G:556 FN pal.b[7613] LET addp1(a,p)=..
addp1 G:556 LG pal.b[176] RESULTIS addp1(a,b)
addp1 G:556 LG pal.b[316] RESULTIS addp1(a,t)
addpoly G:555 DEF palhdr.h[664] addpoly=
addpoly G:555 FN pal.b[7559] LET addpoly(p,q)=..
addpoly G:555 LG pal.b[177] RESULTIS addpoly(a,b)
addpoly G:555 LG pal.b[318] RESULTIS addpoly(a,bXORysg)
addpoly G:555 LG pal.b[5550] addpoly
addpoly G:555 SG pal.b[5551] addpoly,ddaddpoly:=ddaddpoly|signbit,t|signbit
af0 F:3 FN pal.b[368] LET af0(ap,ae)=..
af0 F:3 LF pal.b[351] TEST af0(@p,@e) THEN .. ELSE ..
af0 F:3 LF pal.b[353] TEST af0(@q,@e) THEN .. ELSE ..
af1 F:4 FN pal.b[389] LET af1(ae,b)=..
af1 F:4 LF pal.b[354] p:=af1(@e,p)
af1 F:4 LF pal.b[357] p:=af1(@e,p)
af1 F:4 LF pal.b[358] q:=af1(@e,q)
alg G:553 DEF palhdr.h[662] alg=
alg G:553 FN pal.b[7525] LET alg(n)=..
alg G:553 LG pal.b[7531] RESULTIS lmapl(alg,n)
alg G:553 LG pal.b[7532] msg1(16,alg,n)
alg G:553 LLG pal.b[8336] set_v("ALG",@alg)
algatom G:554 DEF palhdr.h[663] algatom=
algatom G:554 FN pal.b[7519] LET algatom(p,n)=..
algatom G:554 LG pal.b[7529] RESULTIS algatom(n,algn)
algatom G:554 LLG pal.b[8337] set_c("ALGATOM",@algatom)
algn G:406 DEF palhdr.h[496] algn=
algn G:406 LG pal.b[7528] algn:=algn+1
algn G:406 LG pal.b[7529] RESULTIS algatom(n,algn)
algn G:406 SG pal.b[7528] algn:=algn+1
algn G:406 SG pal.b[8060] gensymn,algn:=y0,y0
ap1 G:582 DEF palhdr.h[692] ap1=
ap1 G:582 FN pal.b[9900] LET ap1(a,b)=..
ap1 G:582 LG pal.b[10107] ap1(a,z)
ap1 G:582 LG pal.b[10112] RESULTIS ap1(e,z)
ap1 G:582 LG pal.b[10121] k:=ap1(a,k)
ap1 G:582 LG pal.b[10125] l:=ap1(l,b)
ap1 G:582 LG pal.b[10126] f:=ap1(f,l)
ap1 G:582 LG pal.b[10129] RESULTIS ap1(f,y1)
ap1 G:582 LG pal.b[10132] s:=ap1(a,s)
ap1 G:582 LG pal.b[10137] RESULTIS ap1(f,l)
ap1 G:582 LG pal.b[10141] k:=ap1(a,k)
ap1 G:582 LG pal.b[10150] RESULTIS ap1(f,l)
ap1 G:582 LG pal.b[2016] arg1:=ap1(c,arg1)
ap1 G:582 LG pal.b[406] RESULTIS ap1(b,2!ae)
ap1 G:582 LG pal.b[9667] e:=ap1(e,e2)
ap1 G:582 LG pal.b[9694] h3!d:=ap1(n,d3)
ap1 G:582 LG pal.b[9893] ap1(h1!a,h2!a)
ap1 G:582 LG pal.b[9895] msg1(13,ap1)
ap1 G:582 LG pal.b[9978] RESULTIS ap1(f,b)
ap1 G:582 LLG pal.b[8270] typ!s_apz:=set_c("AP",@ap1)
ap2 G:583 DEF palhdr.h[693] ap2=
ap2 G:583 FN pal.b[10002] LET ap2(a,b,f)=..
ap2 G:583 LG pal.b[10028] RESULTIS ap2(a,b,f)
ap2 G:583 LG pal.b[10038] a:=ap2(a,b,a_eq)
ap2 G:583 LG pal.b[10043] a:=ap2(b,a,a_gt)
ap2 G:583 LG pal.b[10047] ap2(b,a,a_gt)
ap2 G:583 LG pal.b[10051] a:=ap2(a,b,a_gt)
ap2 G:583 LG pal.b[10061] RESULTIS ap2(a,b,f)
ap2 G:583 LG pal.b[10069] RESULTIS ap2(a,b,f)
ap2 G:583 LG pal.b[10081] RESULTIS ap2(a,b,f)
ap2 G:583 LG pal.b[10092] RESULTIS ap2(a,b,f)
ap2 G:583 LG pal.b[10102] RESULTIS ap2(a,b,f)
ap2 G:583 LG pal.b[8274] ds(":=",@assg,ap2,...)
ap2 G:583 LG pal.b[8276] ds("<<",@shlv,ap2,...)
ap2 G:583 LG pal.b[8277] ds(">>",@shrv,ap2,...)
ap2 G:583 LG pal.b[8278] dt("is",@isv,ap2,...)
ap2 G:583 LG pal.b[8279] a_eq:=dt("=",@eqlv,ap2,...)
ap2 G:583 LG pal.b[8280] a_gt:=dt(">",@gtv,ap2,...)
ap2 G:583 LG pal.b[8285] ds("mod",@modv,ap2,...)
ap2 G:583 LG pal.b[9925] IF v3<-1&v3~=ap2 DO ..
appendstream G:66 DEF libhdr.h[81] appendstream=66
apply G:542 DEF palhdr.h[649] apply=
apply G:542 FN pal.b[3749] LET apply(c1,c2)=..
apply G:542 LG pal.b[2136] apply(c2,c31)
apply G:542 LG pal.b[6006] apply(h1!c,h2!c)
apply G:542 LG pal.b[6494] apply(f,m)
apply G:542 LG pal.b[6502] RESULTIS apply(p,v)
apply G:542 LG pal.b[6512] apply(p,v)
apply G:542 LG pal.b[7303] apply(h3!c,a)
aptovec G:228 DEF palhdr.h[293] aptovec=
arg1 G:439 DEF palhdr.h[533] arg1=
arg1 G:439 LG pal.b[1720] dotrace(c,arg1)
arg1 G:439 LG pal.b[1767] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1768] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1769] arg1:=(h3!c)(arg1,h2!c)
arg1 G:439 LG pal.b[1776] (fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1789] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1790] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1800] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1801] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1805] e:=get4(s_e,h1!c,arg1,...)
arg1 G:439 LG pal.b[1826] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1827] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1828] arg1:=(h3!c)(arg1)
arg1 G:439 LG pal.b[1832] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1833] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1834] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[1835] arg1:=h1!arg1
arg1 G:439 LG pal.b[1836] arg1:=(h3!c)(arg1)
arg1 G:439 LG pal.b[1840] h2!h1!arg1
arg1 G:439 LG pal.b[1843] arg1:=h2!arg1
arg1 G:439 LG pal.b[1844] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1845] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1851] e:=get4(s_e,e,arg1,...)
arg1 G:439 LG pal.b[1857] h2!h1!arg1
arg1 G:439 LG pal.b[1860] arg1:=h2!arg1
arg1 G:439 LG pal.b[1861] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1862] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1863] arg1:=(h3!c)(arg1,a2)
arg1 G:439 LG pal.b[1870] e:=binda(h2!c,arg1,h1!c)
arg1 G:439 LG pal.b[1883] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1884] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1913] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1914] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1917] e:=bind(h2!c,arg1,e)
arg1 G:439 LG pal.b[1922] UNLESS arg1<=0 DO ..
arg1 G:439 LG pal.b[1923] arg1:=(fff!!arg1)(arg1)
arg1 G:439 LG pal.b[1926] e:=get4(s_e,e,arg1,...)
arg1 G:439 LG pal.b[1952] RESULTIS arg1
arg1 G:439 LG pal.b[1982] f:=get4(s_mmcf,...,...)+yfj
arg1 G:439 LG pal.b[1988] h2!f:=arg1
arg1 G:439 LG pal.b[1995] h3!f:=arg1
arg1 G:439 LG pal.b[2016] arg1:=ap1(c,arg1)
arg1 G:439 LG pal.b[2024] e:=bind(h3!c,arg1,h2!c)
arg1 G:439 LG pal.b[2036] e:=get4(s_e,ze,arg1,...)
arg1 G:439 LG pal.b[2050] prch(arg1)
arg1 G:439 LG pal.b[2068] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2069] arg1:=h1!arg1
arg1 G:439 LG pal.b[2072] arg1:=(h2!c)(arg1)
arg1 G:439 LG pal.b[2076] UNTIL arg1>0&!arg1=s_tuple&h3!arg1=y2 DO ..
arg1 G:439 LG pal.b[2077] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2078] arg1:=h1!arg1
arg1 G:439 LG pal.b[2079] msg1(28,arg1,y2)
arg1 G:439 LG pal.b[2080] arg1:=(h2!c)(h2!h1!arg1,h2!arg1)
arg1 G:439 LG pal.b[2084] arg1:=g_nt(arg1,y3)
arg1 G:439 LG pal.b[2085] gw0:=h1!arg1
arg1 G:439 LG pal.b[2086] arg1:=(h2!c)(h2!h1!gw0,h2!gw0,h2!arg1)
arg1 G:439 LG pal.b[2090] arg1:=g_nt(arg1,y0+4)
arg1 G:439 LG pal.b[2091] gw0:=h1!arg1
arg1 G:439 LG pal.b[2095] arg1:=gw2(h2!h1!gw0,h2!gw0,gw1,...)
arg1 G:439 LG pal.b[2099] UNLESS arg1<0 DO ..
arg1 G:439 LG pal.b[2100] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2101] arg1:=h1!arg1
arg1 G:439 LG pal.b[2102] UNLESS arg1<0 DO ..
arg1 G:439 LG pal.b[2103] IF arg1=0 DO ..
arg1 G:439 LG pal.b[2106] IF !arg1=s_tuple DO ..
arg1 G:439 LG pal.b[2107] mqu(h1!arg1)
arg1 G:439 LG pal.b[2109] arg1:=h2!arg1
arg1 G:439 LG pal.b[2111] msg1(20,c,arg1)
arg1 G:439 LG pal.b[2113] UNLESS y0<arg1&arg1<=h3!c DO ..
arg1 G:439 LG pal.b[2115] FOR i=arg1+1 TO h3!c DO..
arg1 G:439 LG pal.b[2121] UNLESS arg1<0 DO ..
arg1 G:439 LG pal.b[2122] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2123] arg1:=h1!arg1
arg1 G:439 LG pal.b[2124] UNLESS arg1<0 DO ..
arg1 G:439 LG pal.b[2125] msg1(20,c,arg1)
arg1 G:439 LG pal.b[2126] IF arg1<=y0 DO ..
arg1 G:439 LG pal.b[2129] IF arg1<=c3 DO ..
arg1 G:439 LG pal.b[2130] FOR i=arg1 TO c3 DO..
arg1 G:439 LG pal.b[2134] h2!c,arg1
arg1 G:439 LG pal.b[2138] h1!c:=get4(s_tuple,h1!c,arg1,c31)
arg1 G:439 LG pal.b[2152] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2153] arg1:=h1!arg1
arg1 G:439 LG pal.b[2154] IF arg1=z DO ..
arg1 G:439 LG pal.b[2157] UNLESS arg1<0 DO ..
arg1 G:439 LG pal.b[2158] msg1(29,arg1)
arg1 G:439 LG pal.b[2160] .. REPEATUNTIL c=z|arg1<=h3!c
arg1 G:439 LG pal.b[2161] TEST c=z|arg1<h3!c THEN .. ELSE ..
arg1 G:439 LG pal.b[2191] arg1:=get4(s_jclos,z,c,arg1)
arg1 G:439 LG pal.b[2196] e,c:=c,arg1
arg1 G:439 LG pal.b[2207] e:=get4(s_e,h1!c,arg1,...)
arg1 G:439 LG pal.b[2216] UNTIL arg1>0&!arg1=s_tuple&h3!arg1=h3!c2 DO ..
arg1 G:439 LG pal.b[2217] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2218] arg1:=h1!arg1
arg1 G:439 LG pal.b[2219] msg1(6,c2,arg1)
arg1 G:439 LG pal.b[2220] e:=binda(c2,arg1,h1!c)
arg1 G:439 LG pal.b[2227] e:=bind(h2!c,arg1,h1!c)
arg1 G:439 LG pal.b[2259] arg1:=get4(s_tuple,z,arg1,y1)
arg1 G:439 LG pal.b[2260] arg1:=get4(s_tuple,t,arg1,...)
arg1 G:439 LG pal.b[2267] h2!f,h3!f:=h1!c,arg1
arg1 G:439 LG pal.b[2273] arg1:=get4(s_tuple,z,arg1,y1)
arg1 G:439 LG pal.b[2274] arg1:=get4(s_tuple,t,arg1,...)
arg1 G:439 LG pal.b[2280] f:=get4(!f,...,...)+yfj
arg1 G:439 LG pal.b[2293] e:=binda(h2!c,arg1,h1!c)
arg1 G:439 LG pal.b[2306] e:=get4(s_e,h1!c,arg1,...)
arg1 G:439 LG pal.b[2310] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2311] arg1:=h1!arg1
arg1 G:439 LG pal.b[2315] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2316] arg1:=h1!arg1
arg1 G:439 LG pal.b[2321] arg1:=c(arg1)
arg1 G:439 LG pal.b[2326] h3!f:=arg1
arg1 G:439 LG pal.b[2331] f:=get4(!f,...,...)+yfj
arg1 G:439 LG pal.b[2347] e:=get4(s_e,e,arg1,...)
arg1 G:439 LG pal.b[2353] h3!f:=arg1
arg1 G:439 LG pal.b[2358] f:=get4(!f,...,...)+yfj
arg1 G:439 LG pal.b[2369] arg1:=c(arg1,gw0)
arg1 G:439 LG pal.b[2392] e:=bind(v,arg1,e)
arg1 G:439 LG pal.b[2401] TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
arg1 G:439 LG pal.b[2426] arg1:=h1!arg1
arg1 G:439 LG pal.b[2427] arg1:=h2!arg1
arg1 G:439 LG pal.b[2444] arg1:=h1!arg1
arg1 G:439 LG pal.b[2445] f:=get4(s_mmcf,f,...)+yfj
arg1 G:439 LG pal.b[2460] f:=get4(s_mmcf,f,...)+yfj
arg1 G:439 LG pal.b[2473] gw0:=get4(s_tuple,h2!f,arg1,...)
arg1 G:439 LG pal.b[2481] gw0:=get4(s_tuple,z,arg1,y1)
arg1 G:439 LG pal.b[2488] arg1:=get4(s_tuple,h2!f,arg1,...)
arg1 G:439 LG pal.b[2492] !t,h1!t,h2!t,h3!t:=s_tuple,h2!t,arg1,h2!c
arg1 G:439 LG pal.b[2498] arg1:=get4(s_tuple,z,arg1,y1)
arg1 G:439 LG pal.b[2505] arg1:=get4(!arg1,e,...,...)
arg1 G:439 LG pal.b[2511] arg1:=get4(!arg1,h1!arg1,e,...)
arg1 G:439 LG pal.b[2517] e:=bind(h2!c,arg1,e)
arg1 G:439 LG pal.b[2528] UNLESS arg1>=yloc DO ..
arg1 G:439 LG pal.b[2529] arg1:=get4(s_loc,arg1,...)+yloc
arg1 G:439 LG pal.b[2532] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2533] arg1:=h1!arg1
arg1 G:439 LG pal.b[2536] e:=get4(s_e,e,arg1,...)
arg1 G:439 LG pal.b[2543] h2!f:=h1!arg1
arg1 G:439 LG pal.b[2544] arg1:=h2!arg1
arg1 G:439 LG pal.b[2550] h2!f:=h1!arg1
arg1 G:439 LG pal.b[2551] e:=get4(s_e,e,...,...)
arg1 G:439 LG pal.b[2556] f:=get4(s_mmcf,f,...)+yfj
arg1 G:439 LG pal.b[2559] arg1:=h2!arg1
arg1 G:439 LG pal.b[2571] e:=get4(s_e,e,...,...)
arg1 G:439 LG pal.b[2572] arg1:=h1!arg1
arg1 G:439 LG pal.b[2577] arg1:=h2!arg1
arg1 G:439 LG pal.b[2578] e:=get4(s_e,e,arg1,...)
arg1 G:439 LG pal.b[2587] e:=get4(s_e,e,arg1,...)
arg1 G:439 LG pal.b[2593] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2594] arg1:=h1!arg1
arg1 G:439 LG pal.b[2597] arg1:=(h2!c)(arg1)
arg1 G:439 LG pal.b[2602] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2603] arg1:=h1!arg1
arg1 G:439 LG pal.b[2604] TEST arg1>0&!arg1>=mm3 THEN .. ELSE ..
arg1 G:439 LG pal.b[2605] arg1:=h2!arg1
arg1 G:439 LG pal.b[2611] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2612] arg1:=h1!arg1
arg1 G:439 LG pal.b[2613] TEST arg1>0&!arg1>=mm3 THEN .. ELSE ..
arg1 G:439 LG pal.b[2614] arg1:=h3!arg1
arg1 G:439 LG pal.b[2620] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2621] arg1:=h1!arg1
arg1 G:439 LG pal.b[2622] TEST arg1>0 THEN .. ELSE ..
arg1 G:439 LG pal.b[2623] arg1:=h1!arg1
arg1 G:439 LG pal.b[2629] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2630] arg1:=h1!arg1
arg1 G:439 LG pal.b[2631] arg1:=arg1=z
arg1 G:439 LG pal.b[2636] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2637] arg1:=h1!arg1
arg1 G:439 LG pal.b[2638] TEST arg1<=0 THEN .. ELSE ..
arg1 G:439 LG pal.b[2640] arg1:=!arg1<=s_glo
arg1 G:439 LG pal.b[2646] arg1:=(h2!c)(h2!f,arg1)
arg1 G:439 LG pal.b[2649] arg1:=(h2!c)(arg1,h2!f)
arg1 G:439 LG pal.b[2657] gw0:=(h2!c)(h2!f,arg1)
arg1 G:439 LG pal.b[2660] gw0:=(h2!c)(arg1,h2!f)
arg1 G:439 LG pal.b[2669] arg1
arg1 G:439 LG pal.b[2673] TEST arg1<=0 THEN .. ELSE ..
arg1 G:439 LG pal.b[2674] UNLESS arg1=z DO ..
arg1 G:439 LG pal.b[2677] UNTIL !arg1=s_tuple DO ..
arg1 G:439 LG pal.b[2678] IF arg1>=yloc DO ..
arg1 G:439 LG pal.b[2679] arg1:=h1!arg1
arg1 G:439 LG pal.b[2682] arg1:=get4(s_tuple,arg1,t,...)
arg1 G:439 LG pal.b[2691] h2!f,arg1
arg1 G:439 LG pal.b[2693] s,t:=arg1,h2!f
arg1 G:439 LG pal.b[2733] arg1:=(h2!c)(arg1,h3!e)
arg1 G:439 LG pal.b[2738] arg1:=difr(arg1,h2!c)
arg1 G:439 LG pal.b[2743] TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
arg1 G:439 LG pal.b[2813] e:=get4(s_e,ze,arg1,...)
arg1 G:439 LG pal.b[2821] e:=get4(s_e,ze,arg1,...)
arg1 G:439 LG pal.b[2828] e:=get4(s_e,ze,arg1,...)
arg1 G:439 LG pal.b[6681] v:=transbcpl(arg1,buffp+buffl)
arg1 G:439 LG pal.b[6682] UNLESS arg1>0&!arg1=s_tuple DO ..
arg1 G:439 LG pal.b[7311] writef("*n# Do' val %E*n",f,print,arg1)
arg1 G:439 LG pal.b[8997] eval(arg1)
arg1 G:439 LG pal.b[9169] writef("# %N 'alue %P*n",cycles-y0,...,arg1)
arg1 G:439 LG pal.b[9211] RESULTIS arg1
arg1 G:439 SG pal.b[1708] arg1:=c
arg1 G:439 SG pal.b[1712] arg1:=c
arg1 G:439 SG pal.b[1726] arg1:=h2!c
arg1 G:439 SG pal.b[1732] arg1:=h2!g
arg1 G:439 SG pal.b[1742] arg1:=e
arg1 G:439 SG pal.b[1750] arg1:=j
arg1 G:439 SG pal.b[1758] arg1:=get4(!c,e,...,...)
arg1 G:439 SG pal.b[1766] arg1:=h1!c
arg1 G:439 SG pal.b[1768] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1769] arg1:=(h3!c)(arg1,h2!c)
arg1 G:439 SG pal.b[1775] arg1:=h1!c
arg1 G:439 SG pal.b[1788] arg1:=h2!c
arg1 G:439 SG pal.b[1790] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1799] arg1:=h2!c
arg1 G:439 SG pal.b[1801] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1825] arg1:=h2!c
arg1 G:439 SG pal.b[1827] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1828] arg1:=(h3!c)(arg1)
arg1 G:439 SG pal.b[1831] arg1:=h2!c
arg1 G:439 SG pal.b[1833] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1835] arg1:=h1!arg1
arg1 G:439 SG pal.b[1836] arg1:=(h3!c)(arg1)
arg1 G:439 SG pal.b[1839] arg1:=h2!c
arg1 G:439 SG pal.b[1843] arg1:=h2!arg1
arg1 G:439 SG pal.b[1845] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1856] arg1:=h2!c
arg1 G:439 SG pal.b[1860] arg1:=h2!arg1
arg1 G:439 SG pal.b[1862] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1863] arg1:=(h3!c)(arg1,a2)
arg1 G:439 SG pal.b[1866] arg1:=ff_tuple(h2!c)
arg1 G:439 SG pal.b[1882] arg1:=h2!c
arg1 G:439 SG pal.b[1884] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1912] arg1:=h3!c
arg1 G:439 SG pal.b[1914] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[1921] arg1:=h3!c
arg1 G:439 SG pal.b[1923] arg1:=(fff!!arg1)(arg1)
arg1 G:439 SG pal.b[2008] arg1:=c
arg1 G:439 SG pal.b[2012] arg1:=c
arg1 G:439 SG pal.b[2016] arg1:=ap1(c,arg1)
arg1 G:439 SG pal.b[2046] arg1:=rea()
arg1 G:439 SG pal.b[2054] arg1:=callbcpl(c)
arg1 G:439 SG pal.b[2059] arg1:=z
arg1 G:439 SG pal.b[2064] arg1:=transpal(gw0)
arg1 G:439 SG pal.b[2069] arg1:=h1!arg1
arg1 G:439 SG pal.b[2072] arg1:=(h2!c)(arg1)
arg1 G:439 SG pal.b[2078] arg1:=h1!arg1
arg1 G:439 SG pal.b[2080] arg1:=(h2!c)(h2!h1!arg1,h2!arg1)
arg1 G:439 SG pal.b[2084] arg1:=g_nt(arg1,y3)
arg1 G:439 SG pal.b[2086] arg1:=(h2!c)(h2!h1!gw0,h2!gw0,h2!arg1)
arg1 G:439 SG pal.b[2090] arg1:=g_nt(arg1,y0+4)
arg1 G:439 SG pal.b[2095] arg1:=gw2(h2!h1!gw0,h2!gw0,gw1,...)
arg1 G:439 SG pal.b[2101] arg1:=h1!arg1
arg1 G:439 SG pal.b[2104] arg1:=c
arg1 G:439 SG pal.b[2109] arg1:=h2!arg1
arg1 G:439 SG pal.b[2114] arg1:=z
arg1 G:439 SG pal.b[2117] arg1:=h2!c
arg1 G:439 SG pal.b[2123] arg1:=h1!arg1
arg1 G:439 SG pal.b[2127] arg1:=z
arg1 G:439 SG pal.b[2132] arg1:=h2!c
arg1 G:439 SG pal.b[2145] arg1:=a
arg1 G:439 SG pal.b[2153] arg1:=h1!arg1
arg1 G:439 SG pal.b[2155] arg1:=evalpoly(c)
arg1 G:439 SG pal.b[2162] arg1:=y0
arg1 G:439 SG pal.b[2164] arg1:=h2!c
arg1 G:439 SG pal.b[2165] arg1:=neg(h2!c)
arg1 G:439 SG pal.b[2191] arg1:=get4(s_jclos,z,c,arg1)
arg1 G:439 SG pal.b[2218] arg1:=h1!arg1
arg1 G:439 SG pal.b[2259] arg1:=get4(s_tuple,z,arg1,y1)
arg1 G:439 SG pal.b[2260] arg1:=get4(s_tuple,t,arg1,...)
arg1 G:439 SG pal.b[2273] arg1:=get4(s_tuple,z,arg1,y1)
arg1 G:439 SG pal.b[2274] arg1:=get4(s_tuple,t,arg1,...)
arg1 G:439 SG pal.b[2311] arg1:=h1!arg1
arg1 G:439 SG pal.b[2316] arg1:=h1!arg1
arg1 G:439 SG pal.b[2321] arg1:=c(arg1)
arg1 G:439 SG pal.b[2369] arg1:=c(arg1,gw0)
arg1 G:439 SG pal.b[2415] arg1:=h2!c
arg1 G:439 SG pal.b[2424] arg1:=h1!h1!e
arg1 G:439 SG pal.b[2426] arg1:=h1!arg1
arg1 G:439 SG pal.b[2427] arg1:=h2!arg1
arg1 G:439 SG pal.b[2432] arg1:=h2!e
arg1 G:439 SG pal.b[2437] arg1:=h2!h1!e
arg1 G:439 SG pal.b[2442] arg1:=h1!h1!e
arg1 G:439 SG pal.b[2444] arg1:=h1!arg1
arg1 G:439 SG pal.b[2466] arg1:=h2!f
arg1 G:439 SG pal.b[2488] arg1:=get4(s_tuple,h2!f,arg1,...)
arg1 G:439 SG pal.b[2493] arg1:=t
arg1 G:439 SG pal.b[2498] arg1:=get4(s_tuple,z,arg1,y1)
arg1 G:439 SG pal.b[2504] arg1:=h2!c
arg1 G:439 SG pal.b[2505] arg1:=get4(!arg1,e,...,...)
arg1 G:439 SG pal.b[2510] arg1:=h2!c
arg1 G:439 SG pal.b[2511] arg1:=get4(!arg1,h1!arg1,e,...)
arg1 G:439 SG pal.b[2529] arg1:=get4(s_loc,arg1,...)+yloc
arg1 G:439 SG pal.b[2533] arg1:=h1!arg1
arg1 G:439 SG pal.b[2542] arg1:=h2!f
arg1 G:439 SG pal.b[2544] arg1:=h2!arg1
arg1 G:439 SG pal.b[2549] arg1:=h2!f
arg1 G:439 SG pal.b[2559] arg1:=h2!arg1
arg1 G:439 SG pal.b[2564] arg1:=h2!h2!f
arg1 G:439 SG pal.b[2572] arg1:=h1!arg1
arg1 G:439 SG pal.b[2577] arg1:=h2!arg1
arg1 G:439 SG pal.b[2594] arg1:=h1!arg1
arg1 G:439 SG pal.b[2597] arg1:=(h2!c)(arg1)
arg1 G:439 SG pal.b[2603] arg1:=h1!arg1
arg1 G:439 SG pal.b[2605] arg1:=h2!arg1
arg1 G:439 SG pal.b[2606] arg1:=z
arg1 G:439 SG pal.b[2612] arg1:=h1!arg1
arg1 G:439 SG pal.b[2614] arg1:=h3!arg1
arg1 G:439 SG pal.b[2615] arg1:=z
arg1 G:439 SG pal.b[2621] arg1:=h1!arg1
arg1 G:439 SG pal.b[2623] arg1:=h1!arg1
arg1 G:439 SG pal.b[2624] arg1:=z
arg1 G:439 SG pal.b[2630] arg1:=h1!arg1
arg1 G:439 SG pal.b[2631] arg1:=arg1=z
arg1 G:439 SG pal.b[2637] arg1:=h1!arg1
arg1 G:439 SG pal.b[2639] arg1:=TRUE
arg1 G:439 SG pal.b[2640] arg1:=!arg1<=s_glo
arg1 G:439 SG pal.b[2646] arg1:=(h2!c)(h2!f,arg1)
arg1 G:439 SG pal.b[2649] arg1:=(h2!c)(arg1,h2!f)
arg1 G:439 SG pal.b[2670] arg1:=h2!f
arg1 G:439 SG pal.b[2676] arg1:=get4(s_tuple,z,t,y1)
arg1 G:439 SG pal.b[2679] arg1:=h1!arg1
arg1 G:439 SG pal.b[2682] arg1:=get4(s_tuple,arg1,t,...)
arg1 G:439 SG pal.b[2715] arg1:=e
arg1 G:439 SG pal.b[2722] arg1:=j
arg1 G:439 SG pal.b[2733] arg1:=(h2!c)(arg1,h3!e)
arg1 G:439 SG pal.b[2738] arg1:=difr(arg1,h2!c)
arg1 G:439 SG pal.b[3750] arg1,c2:=c2,z
arg1 G:439 SG pal.b[7304] arg1:=a
arg1 G:439 SG pal.b[8994] arg1:=erz
arithfn G:522 DEF palhdr.h[627] arithfn=
arithfn G:522 FN pal.b[349] LET arithfn(p,q,f)=..
arithfn G:522 LG pal.b[188] RESULTIS arithfn(a,b,a_plus)
arithfn G:522 LG pal.b[329] RESULTIS arithfn(a,b,a_minu)
arithfn G:522 LG pal.b[4859] RESULTIS arithfn(a,b,a_mul)
arithfn G:522 LG pal.b[5180] RESULTIS arithfn(a,b,a_div)
arithfn G:522 LG pal.b[6942] RESULTIS arithfn(y0,p,a_minu)
arithfn G:522 LG pal.b[7012] RESULTIS arithfn(y1,p,a_div)
arithv G:520 DEF palhdr.h[625] arithv=
arithv G:520 FN pal.b[338] LET arithv(p)=..
arithv G:520 LG pal.b[10060] IF arithv(a)&arithv(b) DO ..
arithv G:520 LG pal.b[10067] IF arithv(a)&arithv(b) DO ..
arithv G:520 LG pal.b[10079] IF arithv(a)&arithv(b) DO ..
arithv G:520 LG pal.b[10086] IF arithv(a)&arithv(b) DO ..
arithv G:520 LG pal.b[10097] IF arithv(a)&arithv(b) DO ..
arithv G:520 LG pal.b[6787] UNLESS arithv(a) DO ..
arithv G:520 LG pal.b[7542] IF arithv(a) DO ..
assg G:511 DEF palhdr.h[615] assg=
assg G:511 FN pal.b[6539] LET assg(p,q)=..
assg G:511 LG pal.b[6553] assg(h2!p,h3!q)
assg G:511 LLG pal.b[8274] ds(":=",@assg,ap2,...)
asym G:514 DEF palhdr.h[618] asym=
asym G:514 FN pal.b[6890] LET asym(n)=..
asym G:514 LG pal.b[10106] asym(y0)
asym G:514 LG pal.b[10116] asym(y0)
asym G:514 LG pal.b[10119] asym(ym)
atom G:537 DEF palhdr.h[643] atom=
atom G:537 FN pal.b[6795] LET atom(a)=..
atom G:537 LG pal.b[3473] TEST a3=atom THEN .. ELSE ..
atom G:537 LLG pal.b[8338] set_v("ATOM",@atom)
aug G:509 DEF palhdr.h[613] aug=
aug G:509 FN pal.b[6519] LET aug(p,q)=..
aug G:509 LG pal.b[10006] b:=aug(z,b)
aug G:509 LG pal.b[10007] b:=aug(b,a)
aug G:509 LG pal.b[10027] RESULTIS aug(z,b)
aug G:509 LG pal.b[3491] TEST a3=aug THEN .. ELSE ..
aug G:509 LG pal.b[6486] q:=aug(q,t)
aug G:509 LG pal.b[6495] q:=aug(q,t)
aug G:509 LG pal.b[9606] e:=aug(zsy,e)
aug G:509 LG pal.b[9608] e:=aug(e,e2)
aug G:509 LG pal.b[9698] aug(z,h2!d)
aug G:509 LG pal.b[9699] aug(zsy,h3!d)
aug G:509 LG pal.b[9701] d2:=aug(d2,h2!d)
aug G:509 LG pal.b[9702] d3:=aug(d3,h3!d)
aug G:509 LG pal.b[9755] d:=aug(z,d)
aug G:509 LG pal.b[9758] d:=aug(d,d1)
aug G:509 LG pal.b[9976] b:=aug(z,b)
aug G:509 LG pal.b[9977] b:=aug(b,a)
aug G:509 LLG pal.b[8275] ds("aug",@aug,mk_aug,...)
backtr G:316 DEF palhdr.h[388] backtr=
backtr G:316 LG pal.b[1076] backtr(stackb,q)
backtr G:316 LG pal.b[1210] backtr(stackbase,level()>>2)
backtr G:316 LG pal.b[1597] backtr(erlev>>2,level()>>2)
backtr G:316 RT pal.b[1213] LET backtr(l,p)BE..
backtrace G:203 DEF palhdr.h[258] backtrace=
backtrace G:203 LG pal.b[1063] backtrace()
backtrace G:203 LG pal.b[1602] backtrace()
backtrace G:203 LG pal.b[3088] f:=backtrace
backtrace G:203 LG pal.b[5386] backtrace()
backtrace G:203 RT pal.b[1209] LET backtrace()BE..
bcplbit M:8388608 DEF pal.b[715] bcplbit=#x00800000
bcplbit M:8388608 MAN pal.b[1166] IF (p!9&bcplbit)~=0&(s=0|eqdd(s,...)) DO ..
bcplf G:383 DEF palhdr.h[468] bcplf=
bcplf G:383 FN pal.b[6661] LET bcplf(n)=..
bcplf G:383 LLG pal.b[8237] typ!s_bcplf:=set_v("BCPLF",@bcplf)
bcplr G:384 DEF palhdr.h[469] bcplr=
bcplr G:384 FN pal.b[6666] LET bcplr(n)=..
bcplr G:384 LLG pal.b[8238] typ!s_bcplr:=set_v("BCPLR",@bcplr)
bcplv G:385 DEF palhdr.h[470] bcplv=
bcplv G:385 FN pal.b[6671] LET bcplv(n)=..
bcplv G:385 LLG pal.b[8239] typ!s_bcplv:=set_v("BCPLV",@bcplv)
binaryinput G:214 DEF palhdr.h[276] binaryinput=
bind G:622 DEF palhdr.h[738] bind=
bind G:622 FN pal.b[7119] LET bind(v,w,k)=..
bind G:622 LG pal.b[1917] e:=bind(h2!c,arg1,e)
bind G:622 LG pal.b[2024] e:=bind(h3!c,arg1,h2!c)
bind G:622 LG pal.b[2227] e:=bind(h2!c,arg1,h1!c)
bind G:622 LG pal.b[2392] e:=bind(v,arg1,e)
bind G:622 LG pal.b[2517] e:=bind(h2!c,arg1,e)
bind G:622 LG pal.b[7135] k:=bind(h2!v,h2!w,k)
bind G:622 LG pal.b[7244] bind(b,a,e)
bind1 G:623 DEF palhdr.h[739] bind1=
bind1 G:623 FN pal.b[7169] LET bind1(v,w,k)=..
bind1 G:623 LG pal.b[7134] RESULTIS bind1(v,w,k)
binda G:624 DEF palhdr.h[740] binda=
binda G:624 FN pal.b[7227] LET binda(v,w,k)=..
binda G:624 LG pal.b[1870] e:=binda(h2!c,arg1,h1!c)
binda G:624 LG pal.b[2220] e:=binda(c2,arg1,h1!c)
binda G:624 LG pal.b[2293] e:=binda(h2!c,arg1,h1!c)
bindr G:625 DEF palhdr.h[741] bindr=
bindr G:625 RT pal.b[7235] LET bindr(v,w)BE..
binrdch G:39 DEF libhdr.h[54] binrdch=39
binwrch G:222 DEF palhdr.h[287] binwrch=
binwrch G:42 DEF libhdr.h[57] binwrch=42
bitsperbyte M:8 DEF libhdr.h[160] bitsperbyte=8
bitsperbyte M:8 MAN libhdr.h[161] bitsperword=bitsperbyte*bytesperword
bitsperword M:32 DEF libhdr.h[161] bitsperword=bitsperbyte*bytesperword
bitsperword M:32 MAN libhdr.h[163] minint=1<<bitsperword-1
blocksize G:270 DEF palhdr.h[342] blocksize=
bootregs M:11 DEF libhdr.h[354] bootregs=11
buffl M:128 DEF palhdr.h[49] buffl=128
buffl M:128 MAN pal.b[6681] v:=transbcpl(arg1,buffp+buffl)
buffl M:128 MAN pal.b[8084] putbyte(buffp+buffl-2,i,getbyte(...))
buffl M:128 MAN pal.b[8085] buffp!buffl:=@g0<<2
buffl M:128 MAN pal.b[8905] LET u=VEC buffl
buffl M:128 MAN pal.b[9278] IF s0=buffl DO ..
buffp G:398 DEF palhdr.h[487] buffp=
buffp G:398 LG pal.b[6677] v:=buffp
buffp G:398 LG pal.b[6681] v:=transbcpl(arg1,buffp+buffl)
buffp G:398 LG pal.b[6684] FOR i=5 TO !buffp DO..
buffp G:398 LG pal.b[6685] (@f+fr_callbcpl)!i:=buffp!i
buffp G:398 LG pal.b[6686] RESULTIS f(buffp!1,buffp!2,...,...)
buffp G:398 LG pal.b[7976] unpackstring(s,buffp)
buffp G:398 LG pal.b[7977] RESULTIS string(buffp)
buffp G:398 LG pal.b[8084] putbyte(buffp+buffl-2,i,getbyte(...))
buffp G:398 LG pal.b[8085] buffp!buffl:=@g0<<2
buffp G:398 LG pal.b[9280] s0,buffp!s0:=s0+1,rch()
buffp G:398 LG pal.b[9285] !buffp:=s0
buffp G:398 LG pal.b[9286] s0:=string(buffp)
buffp G:398 LG pal.b[9327] !buffp:=s0
buffp G:398 LG pal.b[9328] s0:=number(buffp)
buffp G:398 SG pal.b[8923] buffp:=u+signbit
bytesperword M:4 DEF libhdr.h[159] bytesperword=1<<B2Wsh
bytesperword M:4 DEF palhdr.h[39] bytesperword=4
bytesperword M:4 MAN libhdr.h[161] bitsperword=bitsperbyte*bytesperword
bytesperword M:4 MAN libhdr.h[162] mcaddrinc=bytesperword
bytesperword M:4 MAN libhdr.h[401] scb_nameeend=scb_name+scb_maxnamelen/bytesperword
bytesperword M:4 MAN palhdr.h[224] str1=bytesperword*2
c0 S:1 DEF pal.b[6301] c0=0
c0 S:1 LL pal.b[6307] UNTIL c0!g=z DO ..
c0 S:1 LL pal.b[6308] g,c0:=c0!g,compl(a,...)+2
c0 S:1 LL pal.b[6309] IF c0=2 DO ..
c0 S:1 LL pal.b[6312] c0!g:=get4(s_name,z,a,z)
c0 S:1 LL pal.b[6313] RESULTIS c0!g
c0 S:1 LL pal.b[6319] UNTIL c0!g=z DO ..
c0 S:1 LL pal.b[6320] g,c0:=c0!g,compl(a,...)+2
c0 S:1 LL pal.b[6321] IF c0=2 DO ..
c0 S:1 LL pal.b[6329] UNTIL c0!g=z DO ..
c0 S:1 LL pal.b[6330] g,c0:=c0!g,compl(a,...)+2
c0 S:1 LL pal.b[6331] IF c0=2 DO ..
c0 S:1 LL pal.b[6333] c0!g:=get4(s_name,z,b,z)
c0 S:1 LL pal.b[6334] RESULTIS c0!g
c0 S:1 SL pal.b[6306] n,c0:=-n,0
c0 S:1 SL pal.b[6308] g,c0:=c0!g,compl(a,...)+2
c0 S:1 SL pal.b[6318] c0:=0
c0 S:1 SL pal.b[6320] g,c0:=c0!g,compl(a,...)+2
c0 S:1 SL pal.b[6328] c0:=0
c0 S:1 SL pal.b[6330] g,c0:=c0!g,compl(a,...)+2
c0 S:80 DEF pal.b[6824] c0=0
c0 S:80 LL pal.b[6836] c2:=c0+!c0
c0 S:80 LL pal.b[6837] IF c0>=c2 DO ..
c0 S:80 LL pal.b[6839] .. REPEATWHILE !c0=48
c0 S:80 LL pal.b[6839] c0:=c0+1
c0 S:80 LL pal.b[6840] c1:=c0+(c2-c0+1)MODnw2
c0 S:80 LL pal.b[6841] UNLESS c0=c1 DO ..
c0 S:80 LL pal.b[6843] UNTIL c0>=c1-numwi DO ..
c0 S:80 LL pal.b[6844] c0:=c0+1
c0 S:80 LL pal.b[6844] n:=n*10+!c0-48
c0 S:80 LL pal.b[6845] UNTIL c0=c1 DO ..
c0 S:80 LL pal.b[6846] c0:=c0+1
c0 S:80 LL pal.b[6846] m:=m*10+!c0-48
c0 S:80 LL pal.b[6847] IF c0>c2&n=0 DO ..
c0 S:80 LL pal.b[6850] UNTIL c0>c2 DO ..
c0 S:80 LL pal.b[6852] c1:=c0+numwi
c0 S:80 LL pal.b[6853] UNTIL c0=c1 DO ..
c0 S:80 LL pal.b[6854] c0:=c0+1
c0 S:80 LL pal.b[6854] n:=n*10+!c0-48
c0 S:80 LL pal.b[6855] c1:=c0+numwi
c0 S:80 LL pal.b[6856] UNTIL c0=c1 DO ..
c0 S:80 LL pal.b[6857] c0:=c0+1
c0 S:80 LL pal.b[6857] m:=m*10+!c0-48
c0 S:80 SL pal.b[6835] c0,v:=v&p_addr,z
c0 S:80 SL pal.b[6839] c0:=c0+1
c0 S:80 SL pal.b[6844] c0:=c0+1
c0 S:80 SL pal.b[6846] c0:=c0+1
c0 S:80 SL pal.b[6854] c0:=c0+1
c0 S:80 SL pal.b[6857] c0:=c0+1
c1 S:81 DEF pal.b[6825] c1=0
c1 S:81 LL pal.b[6841] UNLESS c0=c1 DO ..
c1 S:81 LL pal.b[6843] UNTIL c0>=c1-numwi DO ..
c1 S:81 LL pal.b[6845] UNTIL c0=c1 DO ..
c1 S:81 LL pal.b[6853] UNTIL c0=c1 DO ..
c1 S:81 LL pal.b[6856] UNTIL c0=c1 DO ..
c1 S:81 LL pal.b[6868] IF c1>str2 DO ..
c1 S:81 LL pal.b[6870] putbyte(gg,c1,v!i)
c1 S:81 LL pal.b[6871] c1:=c1+1
c1 S:81 SL pal.b[6840] c1:=c0+(c2-c0+1)MODnw2
c1 S:81 SL pal.b[6852] c1:=c0+numwi
c1 S:81 SL pal.b[6855] c1:=c0+numwi
c1 S:81 SL pal.b[6866] c1:=maxint
c1 S:81 SL pal.b[6869] c1,h1!gg,gg:=str1,getx(s_string,...),h1!gg
c1 S:81 SL pal.b[6871] c1:=c1+1
c2 S:82 DEF pal.b[6826] c2=0
c2 S:82 LL pal.b[6837] IF c0>=c2 DO ..
c2 S:82 LL pal.b[6840] c1:=c0+(c2-c0+1)MODnw2
c2 S:82 LL pal.b[6847] IF c0>c2&n=0 DO ..
c2 S:82 LL pal.b[6850] UNTIL c0>c2 DO ..
c2 S:82 SL pal.b[6836] c2:=c0+!c0
callbcpl G:396 DEF palhdr.h[484] callbcpl=
callbcpl G:396 FN pal.b[6676] LET callbcpl(f)=..
callbcpl G:396 LG pal.b[2054] arg1:=callbcpl(c)
callbcpl G:396 LG pal.b[2058] callbcpl(c)
callbcpl G:396 LG pal.b[2063] gw0:=callbcpl(c)
callco G:19 DEF libhdr.h[34] callco=19
callifort G:262 DEF palhdr.h[330] callifort=
callrfort G:263 DEF palhdr.h[331] callrfort=
callseg G:107 DEF libhdr.h[123] callseg=107
capitalch G:96 DEF libhdr.h[112] capitalch=96
cc S:73 DEF pal.b[4388] cc=0
cc S:73 LL pal.b[4394] a,c,d:=-a,cc,dd
cc S:73 SL pal.b[4391] cc,dd:=c,d
ch G:253 DEF palhdr.h[321] ch=
ch G:253 LG pal.b[1302] WHILE ch=32|ch=10 DO ..
ch G:253 LG pal.b[1304] IF ch=43|ch=45 DO ..
ch G:253 LG pal.b[1304] neg:=ch=45
ch G:253 LG pal.b[1313] nval(ch)
ch G:253 LG pal.b[789] ch
ch G:253 LG pal.b[9203] TEST ch=10 THEN .. ELSE ..
ch G:253 LG pal.b[9261] IF ch=39 DO ..
ch G:253 LG pal.b[9265] WHILE ch=32|ch=10 DO ..
ch G:253 LG pal.b[9270] TEST 65<=ch&ch<=90 THEN .. ELSE ..
ch G:253 LG pal.b[9272] TEST 97<=ch&ch<=122 THEN .. ELSE ..
ch G:253 LG pal.b[9274] TEST 48<=ch&ch<=57 THEN .. ELSE ..
ch G:253 LG pal.b[9276] s1:=s1*10+ch-48
ch G:253 LG pal.b[9303] TEST ch=46&(VALOF {..}) THEN .. ELSE ..
ch G:253 LG pal.b[9310] UNLESS 48<=ch&ch<=57 DO ..
ch G:253 LG pal.b[9313] s1:=s1#*#1e1#+(Op26)
ch G:253 LG pal.b[9314] IF ch=69 DO ..
ch G:253 LG pal.b[9334] putbyte(a,str1+1,ch)
ch G:253 LG pal.b[9340] TEST ch=endstreamch THEN .. ELSE ..
ch G:253 LG pal.b[9374] TEST ch=37 THEN .. ELSE ..
ch G:253 LG pal.b[9392] UNTIL ch=10|ch=endstreamch DO ..
ch G:253 LG pal.b[9421] UNTIL ch=s0 DO ..
ch G:253 LG pal.b[9422] IF ch=endstreamch DO ..
ch G:253 LG pal.b[9424] s1:=ch
ch G:253 LG pal.b[9425] IF ch=35 DO ..
ch G:253 LG pal.b[9427] IF ch=10|ch=32 DO ..
ch G:253 LG pal.b[9428] .. REPEATUNTIL ch=35|ch=endstreamch
ch G:253 LG pal.b[9430] TEST ch=78|ch=110 THEN .. ELSE ..
ch G:253 LG pal.b[9432] TEST ch=83|ch=115 THEN .. ELSE ..
ch G:253 LG pal.b[9434] TEST ch=90|ch=122 THEN .. ELSE ..
ch G:253 LG pal.b[9436] s1:=ch
ch G:253 LG pal.b[9575] IF ch=32|ch=10|ch=endstreamch DO ..
ch G:253 LG pal.b[9652] UNLESS 65<=ch&ch<=90|97<=ch&ch<=122|48<=ch&ch<=57 DO ..
ch G:253 LG pal.b[9657] IF ch=32|ch=10|ch=endstreamch DO ..
ch G:253 SG pal.b[741] ch,rch:=endstreamch,rch0
ch G:253 SG pal.b[751] ch:=rdch()
ch G:253 SG pal.b[767] ch:=endstreamch
ch G:253 SG pal.b[790] ch:=rdch()
changeco G:6 DEF libhdr.h[21] changeco=6
charith F:26 LF pal.b[5549] charith()
charith F:26 RT pal.b[5533] LET charith()BE..
charith1 F:27 LF pal.b[5455] charith1()
charith1 F:27 LF pal.b[5457] charith1()
charith1 F:27 LF pal.b[5471] charith1()
charith1 F:27 LF pal.b[5473] charith1()
charith1 F:27 LF pal.b[5487] charith1()
charith1 F:27 LF pal.b[5490] charith1()
charith1 F:27 LF pal.b[5506] charith1()
charith1 F:27 LF pal.b[5509] charith1()
charith1 F:27 LF pal.b[5523] charith1()
charith1 F:27 LF pal.b[5526] charith1()
charith1 F:27 RT pal.b[5548] LET charith1()BE..
chc G:282 DEF palhdr.h[354] chc=
chc G:282 LG pal.b[1239] IF chc=0 DO ..
chc G:282 LG pal.b[1664] IF chc=0 DO ..
chc G:282 LG pal.b[6211] -wrc,-chc
chc G:282 LG pal.b[756] UNLESS chc=0|q_output=0 DO ..
chc G:282 LG pal.b[797] IF chc=0 DO ..
chc G:282 LG pal.b[812] TEST chc>=chz THEN .. ELSE ..
chc G:282 LG pal.b[815] chc:=chc+1
chc G:282 LG pal.b[828] chc
chc G:282 LG pal.b[829] chc:=chc+1
chc G:282 LG pal.b[831] IF chc<t DO ..
chc G:282 LG pal.b[832] chc:=chc+1
chc G:282 LG pal.b[837] TEST n<=chc THEN .. ELSE ..
chc G:282 LG pal.b[842] UNTIL n<=chc DO ..
chc G:282 LG pal.b[847] tab(n+chc)
chc G:282 LG pal.b[851] UNLESS n=0|chc=0 DO ..
chc G:282 LG pal.b[852] xtab(n-chcMODn)
chc G:282 LG pal.b[857] IF chc+n>=chz DO ..
chc G:282 LG pal.b[9199] UNLESS chc=0 DO ..
chc G:282 LG pal.b[942] UNLESS chc=0 DO ..
chc G:282 SG pal.b[6217] wrc,chc:=-w1,-w2
chc G:282 SG pal.b[731] chc,chz:=0,130
chc G:282 SG pal.b[759] chc:=0
chc G:282 SG pal.b[781] chc:=0
chc G:282 SG pal.b[811] chc:=0
chc G:282 SG pal.b[814] chc:=7
chc G:282 SG pal.b[815] chc:=chc+1
chc G:282 SG pal.b[829] chc:=chc+1
chc G:282 SG pal.b[832] chc:=chc+1
checkfor F:10 LF pal.b[9376] checkfor(s_name,8)
checkfor F:10 RT pal.b[9232] LET checkfor(s,n)BE..
checkrpar F:9 LF pal.b[9573] checkrpar()
checkrpar F:9 LF pal.b[9642] checkrpar()
checkrpar F:9 LF pal.b[9677] checkrpar()
checkrpar F:9 LF pal.b[9729] checkrpar()
checkrpar F:9 RT pal.b[9227] LET checkrpar()BE..
chpoly F:16 LF pal.b[5411] chpoly(h1!a)
chpoly F:16 LF pal.b[5412] chpoly(h2!a)
chpoly F:16 LF pal.b[5430] chpoly(c)
chpoly F:16 LF pal.b[5436] chpoly(c)
chpoly F:16 LF pal.b[5442] chpoly(c)
chpoly F:16 LF pal.b[5448] chpoly(c)
chpoly F:16 LF pal.b[5454] chpoly(c)
chpoly F:16 LF pal.b[5468] chpoly(c)
chpoly F:16 LF pal.b[5485] chpoly(c)
chpoly F:16 LF pal.b[5486] chpoly(d1)
chpoly F:16 LF pal.b[5505] chpoly(c)
chpoly F:16 RT pal.b[5400] LET chpoly(a)BE..
chz G:283 DEF palhdr.h[355] chz=
chz G:283 LG pal.b[812] TEST chc>=chz THEN .. ELSE ..
chz G:283 LG pal.b[839] IF n>chz DO ..
chz G:283 LG pal.b[857] IF chc+n>=chz DO ..
chz G:283 LG pal.b[9132] r:=chz+y0
chz G:283 SG pal.b[731] chc,chz:=0,130
chz G:283 SG pal.b[9135] chz:=t
cinabort G:201 DEF palhdr.h[254] cinabort=
cinabort G:201 FN pal.b[43] LET cinabort(n)=..
cinabort G:201 LG pal.b[8212] cinabort(1009)
cinabort G:201 LG pal.b[8214] cinabort(1010)
cinabort G:201 LG pal.b[8979] cinabort(1004)
cis G:12 DEF libhdr.h[27] cis=12
clear_words G:115 DEF libhdr.h[131] clear_words=115
clihook G:4 DEF libhdr.h[19] clihook=4
cliregs M:21 DEF libhdr.h[355] cliregs=21
clock G:402 DEF palhdr.h[491] clock=
clock G:402 LG pal.b[4307] clock(FALSE)
clock G:402 LG pal.b[4360] clock(TRUE)
clock G:402 LG pal.b[4410] clock(FALSE)
clock G:402 LG pal.b[4431] clock(TRUE)
clock G:402 LG pal.b[8387] clock(TRUE)
clock G:402 LG pal.b[8457] clock(FALSE)
clock G:402 LG pal.b[8555] clock(TRUE)
clock G:402 RT pal.b[4240] LET clock(b)BE..
closeblockfile G:273 DEF palhdr.h[345] closeblockfile=
closelibrary G:234 DEF palhdr.h[301] closelibrary=
co_c M:5 DEF libhdr.h[201] co_c=
co_fn M:3 DEF libhdr.h[199] co_fn=
co_list M:2 DEF libhdr.h[198] co_list=
co_parent M:1 DEF libhdr.h[197] co_parent=
co_pptr M:0 DEF libhdr.h[196] co_pptr=0
co_size M:4 DEF libhdr.h[200] co_size=
co_size M:5 DEF palhdr.h[5] co_size=5
co_size M:5 MAN pal.b[8916] stackend:=stackbase+currco!co_size
co_size M:5 MAN pal.b[8956] stackb,stackl:=currco,currco+currco!co_size
code G:382 DEF palhdr.h[467] code=
code G:382 FN pal.b[6649] LET code(n)=..
code G:382 LG pal.b[6653] msg1(17,code,n)
code G:382 LLG pal.b[8240] typ!s_codev:=set_v("CODE",@code)
codewrch G:126 DEF libhdr.h[142] codewrch=126
coerce G:521 DEF palhdr.h[626] coerce=
coerce G:521 FN pal.b[428] LET coerce(a,commut)=..
coerce G:521 LG pal.b[192] SWITCHON coerce(@a,FALSE) INTO..
coerce G:521 LG pal.b[4748] SWITCHON coerce(@a,TRUE) INTO..
coerce G:521 LG pal.b[4867] SWITCHON coerce(@a,FALSE) INTO..
coerce G:521 LG pal.b[5187] coerce(@a,FALSE)
coerce G:521 LG pal.b[5237] coerce(@a,FALSE)
coerce G:521 LG pal.b[7018] SWITCHON coerce(@a,TRUE) INTO..
coerce G:521 LG pal.b[7422] SWITCHON coerce(@p,FALSE) INTO..
coerce G:521 LG pal.b[84] SWITCHON coerce(@a,TRUE) INTO..
colist G:8 DEF libhdr.h[23] colist=8
colon G:573 DEF palhdr.h[683] colon=
colon G:573 FN pal.b[10212] LET colon(a,b)=..
colon G:573 LG pal.b[9602] RESULTIS colon(e,e2)
compch G:97 DEF libhdr.h[113] compch=97
compl G:549 DEF palhdr.h[657] compl=
compl G:549 FN pal.b[6368] LET compl(a,b)=..
compl G:549 LG pal.b[6308] g,c0:=c0!g,compl(a,...)+2
compl G:549 LG pal.b[6320] g,c0:=c0!g,compl(a,...)+2
compl G:549 LG pal.b[6330] g,c0:=c0!g,compl(a,...)+2
compl G:549 LG pal.b[7484] RESULTIS compl(p,q)>0
compl G:549 LG pal.b[7934] RESULTIS compl(a,b)=0
compstring G:98 DEF libhdr.h[114] compstring=98
cond G:577 DEF palhdr.h[687] cond=
cond G:577 FN pal.b[10244] LET cond(a,b,c)=..
cond G:577 LG pal.b[10109] e:=cond(e,f,z)
cond G:577 LG pal.b[10123] f:=cond(i,f,v)
cond G:577 LG pal.b[10134] f:=cond(i,f,v)
cond G:577 LG pal.b[10147] f:=cond(k,f,v)
cond G:577 LG pal.b[9499] e:=cond(e,zsc,e1)
cond G:577 LG pal.b[9553] e:=cond(e,e1,e2)
cond G:577 LG pal.b[9616] e:=cond(e,e1,e2)
cons G:403 DEF palhdr.h[493] cons=
cons G:403 LG pal.b[4233] cons:=cons+4
cons G:403 LG pal.b[4267] writef("   %N' %N cons",cycles-y0,cons-y0)
cons G:403 LG pal.b[4300] cons:=cons+4
cons G:403 LG pal.b[4358] cons:=cons+w
cons G:403 LG pal.b[4428] cons:=cons+w
cons G:403 LG pal.b[4433] IF cons>h3!trz DO ..
cons G:403 LG pal.b[7316] n:=n+cons-y0
cons G:403 LG pal.b[9169] writef("# %N 'alue %P*n",cycles-y0,...,arg1)
cons G:403 SG pal.b[4233] cons:=cons+4
cons G:403 SG pal.b[4300] cons:=cons+4
cons G:403 SG pal.b[4358] cons:=cons+w
cons G:403 SG pal.b[4428] cons:=cons+w
cons G:403 SG pal.b[8059] cons,cycles:=y0,y0
copy_bytes G:116 DEF libhdr.h[132] copy_bytes=116
copy_words G:114 DEF libhdr.h[130] copy_words=114
copydir G:79 DEF libhdr.h[94] copydir=79
copyobj G:75 DEF libhdr.h[90] copyobj=75
copystring G:99 DEF libhdr.h[115] copystring=99
copyu G:561 DEF palhdr.h[670] copyu=
copyu G:561 FN pal.b[7809] LET copyu(p)=..
copyu G:561 LG pal.b[7722] copyu(h1!pXORp&ysg)
copyu G:561 LG pal.b[7763] copyu(h1!pXORp&ysg)
copyv G:562 DEF palhdr.h[671] copyv=
copyv G:562 FN pal.b[7826] LET copyv(p)=..
copyv G:562 LG pal.b[7723] copyv(h1!qXORq&ysg)
copyv G:562 LG pal.b[7765] copyv(h1!qXORq&ysg)
cos G:13 DEF libhdr.h[28] cos=13
countword1 M:1173028884 DEF pal.b[720] countword1=#x45EB0000|20
countword1 M:1173028884 MAN pal.b[1158] IF map&(p!0=countword1|p!0=countword2) DO ..
countword1 M:1173028884 MAN pal.b[721] countword2=countword1+60
countword2 M:1173028944 DEF pal.b[721] countword2=countword1+60
countword2 M:1173028944 MAN pal.b[1158] IF map&(p!0=countword1|p!0=countword2) DO ..
cowait G:20 DEF libhdr.h[35] cowait=20
createblockfile G:271 DEF palhdr.h[343] createblockfile=
createco G:17 DEF libhdr.h[32] createco=17
createdir G:82 DEF libhdr.h[97] createdir=82
currco G:7 DEF libhdr.h[22] currco=7
currco G:7 DEF palhdr.h[15] currco=7
currco G:7 LG pal.b[8915] stackbase:=currco
currco G:7 LG pal.b[8916] stackend:=stackbase+currco!co_size
currco G:7 LG pal.b[8956] stackb,stackl:=currco,currco+currco!co_size
currentdir G:14 DEF libhdr.h[29] currentdir=14
cy S:2 DEF pal.b[3793] cy=0
cy S:2 LL pal.b[3835] gw1:=h3!a+h3!b+cy
cy S:2 LL pal.b[3840] gw2:=h2!a+h2!b+cy
cy S:2 LL pal.b[3850] IF cy=0 DO ..
cy S:2 LL pal.b[3855] IF cy=0 DO ..
cy S:2 LL pal.b[3880] gw1:=h3!a-h3!b-cy
cy S:2 LL pal.b[3885] gw2:=h2!a-h2!b-cy
cy S:2 LL pal.b[3894] TEST cy~=0 THEN .. ELSE ..
cy S:2 SL pal.b[3834] sg,cy:=a&ysg,0
cy S:2 SL pal.b[3838] cy:=1
cy S:2 SL pal.b[3839] cy:=0
cy S:2 SL pal.b[3843] cy:=1
cy S:2 SL pal.b[3844] cy:=0
cy S:2 SL pal.b[3879] sg,cy:=a&ysg,0
cy S:2 SL pal.b[3883] cy:=1
cy S:2 SL pal.b[3884] cy:=0
cy S:2 SL pal.b[3888] cy:=1
cy S:2 SL pal.b[3889] cy:=0
cycles G:404 DEF palhdr.h[494] cycles=
cycles G:404 LG pal.b[1706] cycles:=cycles+1
cycles G:404 LG pal.b[4267] writef("   %N' %N cons",cycles-y0,cons-y0)
cycles G:404 LG pal.b[9169] writef("# %N 'alue %P*n",cycles-y0,...,arg1)
cycles G:404 SG pal.b[1706] cycles:=cycles+1
cycles G:404 SG pal.b[8059] cons,cycles:=y0,y0
d F:19 FN pal.b[8043] LET d(s,n,f)=..
d F:19 LF pal.b[8028] d(s,s_code1,f)
d F:19 LF pal.b[8031] d(s,s_codev,f)
d F:19 LF pal.b[8034] d(s,s_code2,f)
d F:19 LF pal.b[8037] d(s,s_bcplf,f)
d F:19 LF pal.b[8040] d(s,s_bcplr,f)
d F:19 LF pal.b[8244] typ!s_gensy:=d("GENSYM",s_code0,@gensym)
d F:19 LF pal.b[8308] d("READ",s_code0,@rea)
d F:19 LF pal.b[8318] d("INPUT",s_bcplv,@input)
d F:19 LF pal.b[8320] d("READX",s_code0,@readx)
d F:19 LF pal.b[8324] d("OUTPUT",s_bcplv,@output)
d F:19 LF pal.b[8335] d("TRAP",s_code3,@trap)
d F:19 LF pal.b[8354] d("PUT",s_code3,@put)
d F:19 LF pal.b[8366] d("PRINK",s_code3,@prink)
d F:29 LF pal.b[8094] d(n,s)
d F:29 LF pal.b[8096] d(@ll_zc+i,"NNN ")
d F:29 LF pal.b[8097] d(@ll_zc,"Q   ")
d F:29 LF pal.b[8098] d(@la_entx,"IEX ")
d F:29 LF pal.b[8099] d(@la_enty,"IEY ")
d F:29 LF pal.b[8100] d(@la_entz,"IEZ ")
d F:29 LF pal.b[8101] d(@la_aploc,"IAL ")
d F:29 LF pal.b[8102] d(@la_aptup,"IAT ")
d F:29 LF pal.b[8103] d(@la_apcode2,"IAB2")
d F:29 LF pal.b[8104] d(@la_apclos2,"IAE2")
d F:29 LF pal.b[8105] d(@la_apeclos,"IAE ")
d F:29 LF pal.b[8106] d(@la_apfclos,"IAF ")
d F:29 LF pal.b[8107] d(@ll_entx,"KEX ")
d F:29 LF pal.b[8108] d(@ll_enty,"KEY ")
d F:29 LF pal.b[8109] d(@ll_entz,"KEZ ")
d F:29 LF pal.b[8110] d(@ll_apeclos,"KAE ")
d F:29 LF pal.b[8111] d(@ll_apfclos,"KAF ")
d F:29 LF pal.b[8112] d(@la_a1,"IA1 ")
d F:29 LF pal.b[8113] d(@la_ae,"IAE ")
d F:29 LF pal.b[8114] d(@ll_ap,"IA  ")
d F:29 LF pal.b[8120] d(@ll_closl,"CLL ")
d F:29 LF pal.b[8121] d(@ll_closx,"CLX ")
d F:29 LF pal.b[8122] d(@ll_bind,"BV  ")
d F:29 LF pal.b[8124] d(@ll_lv,"BVLV")
d F:29 LF pal.b[8125] d(@ll_rv,"BVRV")
d F:29 LF pal.b[8126] d(@ll_bvf,"BVF ")
d F:29 LF pal.b[8127] d(@ll_bvfe,"BVFE")
d F:29 LF pal.b[8128] d(@ll_bvfa,"BVFA")
d F:29 LF pal.b[8129] d(@ll_bvf1,"BVF1")
d F:29 LF pal.b[8130] d(@ll_bvfz,"BVFZ")
d F:29 LF pal.b[8131] d(@ll_bve,"BVE ")
d F:29 LF pal.b[8132] d(@ll_bvez,"BVEZ")
d F:29 LF pal.b[8134] d(@ll_cy,"L   ")
d F:29 LF pal.b[8136] d(@ll_na,"N   ")
d F:29 LF pal.b[8137] d(@ll_na1,"N1  ")
d F:29 LF pal.b[8138] d(@ll_na2,"N2  ")
d F:29 LF pal.b[8143] d(@ll_us,"F   ")
d F:29 LF pal.b[8145] d(@ll_rec1,"REC1")
d F:29 LF pal.b[8146] d(@ll_e,"E   ")
d F:29 LF pal.b[8147] d(@ll_j,"J   ")
d F:29 LF pal.b[8151] d(@ll_tupz,"AUGZ")
d F:29 LF pal.b[8152] d(@ll_1tup,"AUG1")
d F:29 LF pal.b[8153] d(@ll_apv,"B1V ")
d F:29 LF pal.b[8154] d(@ll_ap1,"B1  ")
d F:29 LF pal.b[8155] d(@ll_hdv,"HD  ")
d F:29 LF pal.b[8156] d(@ll_miv,"MI  ")
d F:29 LF pal.b[8157] d(@ll_tlv,"TL  ")
d F:29 LF pal.b[8158] d(@ll_null,"NULL")
d F:29 LF pal.b[8159] d(@ll_atom,"ATOM")
d F:29 LF pal.b[8160] d(@ll_ap2,"B2  ")
d F:29 LF pal.b[8162] d(@ll_ap2s,"B2S ")
d F:29 LF pal.b[8164] d(@ll_cons,"AU  ")
d F:29 LF pal.b[8166] d(@ll_xcons,"XAU ")
d F:29 LF pal.b[8168] d(@ll_apnf,"APF ")
d F:29 LF pal.b[8169] d(@ll_apnf1,"APF1")
d F:29 LF pal.b[8170] d(@ll_apnk,"APK ")
d F:29 LF pal.b[8171] d(@ll_apnc,"APC ")
d F:29 LF pal.b[8172] d(@ll_apnj,"APJ ")
d F:29 LF pal.b[8173] d(@ll_apcf,"ACF ")
d F:29 LF pal.b[8174] d(@ll_apcf1,"ACF1")
d F:29 LF pal.b[8175] d(@ll_apck,"ACK ")
d F:29 LF pal.b[8176] d(@ll_apcc,"ACC ")
d F:29 LF pal.b[8177] d(@ll_apbf,"ABF ")
d F:29 LF pal.b[8178] d(@ll_apbf1,"ABF1")
d F:29 LF pal.b[8179] d(@ll_apbk,"ABK ")
d F:29 LF pal.b[8180] d(@ll_apbc,"ABC ")
d F:29 LF pal.b[8181] d(@ll_apkf,"ATF ")
d F:29 LF pal.b[8182] d(@ll_apkk,"ATK ")
d F:29 LF pal.b[8183] d(@ll_apkc,"ATC ")
d F:29 LF pal.b[8184] d(@ll_apkj,"ATJ ")
d F:29 RT pal.b[8088] LET d(n,s)BE..
dat_to_strings G:110 DEF libhdr.h[126] dat_to_strings=110
dat_to_strings G:110 DEF palhdr.h[33] dat_to_strings=110
dat_to_strings G:110 LG pal.b[54] dat_to_strings(dv,datstr)
dat_to_strings G:110 LG pal.b[62] dat_to_strings(dv,datstr)
date G:221 DEF palhdr.h[283] date=
date G:221 FN pal.b[58] LET date()=..
date G:221 LG pal.b[8075] writef("*n# Pa'K bytes*n",timeofday(),...,...)
datstamp G:109 DEF libhdr.h[125] datstamp=109
datstamp G:109 DEF palhdr.h[32] datstamp=109
datstamp G:109 LG pal.b[53] datstamp(dv)
datstamp G:109 LG pal.b[61] datstamp(dv)
datstr S:1 DEF pal.b[32] datstr=0
datstr S:1 LL pal.b[54] dat_to_strings(dv,datstr)
datstr S:1 LL pal.b[55] RESULTIS datstr
datstr S:1 LL pal.b[62] dat_to_strings(dv,datstr)
datstr S:1 LL pal.b[63] sawritef("*ndate=>%s*n",datstr+5)
datstr S:1 LL pal.b[64] RESULTIS datstr+5
datstr S:1 SL pal.b[52] datstr:=TABLE 0,0,0,...
datstr S:1 SL pal.b[60] datstr:=TABLE 0,0,0,...
datstring G:108 DEF libhdr.h[124] datstring=108
datstring G:108 DEF palhdr.h[31] datstring=108
dd S:74 DEF pal.b[4389] dd=0
dd S:74 LL pal.b[4394] a,c,d:=-a,cc,dd
dd S:74 SL pal.b[4391] cc,dd:=c,d
dd0 S:2 DEF pal.b[5270] dd0=0
dd0 S:2 LL pal.b[5333] IF dd0 DO ..
dd0 S:2 SL pal.b[5327] l0,dd0:=ll,TRUE
dd0 S:2 SL pal.b[5360] dd0,dd1,dd2,dd3:=FALSE,p&~3,p&3,q
dd0 S:2 SL pal.b[5364] dd0:=FALSE
dd1 S:3 DEF pal.b[5271] dd1=0
dd1 S:3 LL pal.b[5336] writef("*n# Ba') -> %E*n",errorp,dd1,...)
dd1 S:3 LL pal.b[5337] writeargp(dd1,TRUE)
dd1 S:3 SL pal.b[5360] dd0,dd1,dd2,dd3:=FALSE,p&~3,p&3,q
dd1 S:3 SL pal.b[5365] dd1,dd2,dd3:=p&~3,p&3,q
dd2 S:4 DEF pal.b[5272] dd2=0
dd2 S:4 LL pal.b[5336] writef("*n# Ba') -> %E*n",errorp,dd1,...)
dd2 S:4 SL pal.b[5360] dd0,dd1,dd2,dd3:=FALSE,p&~3,p&3,q
dd2 S:4 SL pal.b[5365] dd1,dd2,dd3:=p&~3,p&3,q
dd3 S:5 DEF pal.b[5273] dd3=0
dd3 S:5 LL pal.b[5336] writef("*n# Ba') -> %E*n",errorp,dd1,...)
dd3 S:5 LL pal.b[5338] IF st1<=dd3&dd3<=st2 DO ..
dd3 S:5 LL pal.b[5340] writeargp(h2!dd3,TRUE)
dd3 S:5 LL pal.b[5342] writeargp(h3!dd3,TRUE)
dd3 S:5 SL pal.b[5360] dd0,dd1,dd2,dd3:=FALSE,p&~3,p&3,q
dd3 S:5 SL pal.b[5365] dd1,dd2,dd3:=p&~3,p&3,q
ddadd G:744 DEF palhdr.h[873] ddadd=
ddadd G:744 FN pal.b[5428] LET ddadd(a,b)=..
ddadd G:744 LG pal.b[5429] ddadd(a,b)
ddadd G:744 LG pal.b[5535] add,ddadd:=ddadd|signbit,t|signbit
ddadd G:744 SG pal.b[5535] add,ddadd:=ddadd|signbit,t|signbit
ddaddpoly G:748 DEF palhdr.h[877] ddaddpoly=
ddaddpoly G:748 FN pal.b[5452] LET ddaddpoly(a,b)=..
ddaddpoly G:748 LG pal.b[5453] ddaddpoly(a,b)
ddaddpoly G:748 LG pal.b[5551] addpoly,ddaddpoly:=ddaddpoly|signbit,t|signbit
ddaddpoly G:748 SG pal.b[5551] addpoly,ddaddpoly:=ddaddpoly|signbit,t|signbit
dddiv G:747 DEF palhdr.h[876] dddiv=
dddiv G:747 FN pal.b[5446] LET dddiv(a,b)=..
dddiv G:747 LG pal.b[5447] dddiv(a,b)
dddiv G:747 LG pal.b[5544] div,dddiv:=dddiv|signbit,t|signbit
dddiv G:747 SG pal.b[5544] div,dddiv:=dddiv|signbit,t|signbit
dddivpoly G:750 DEF palhdr.h[879] dddivpoly=
dddivpoly G:750 FN pal.b[5482] LET dddivpoly(a,b)=..
dddivpoly G:750 LG pal.b[5483] dddivpoly(a,b)
dddivpoly G:750 LG pal.b[5557] divpoly,dddivpoly:=dddivpoly|signbit,t|signbit
dddivpoly G:750 SG pal.b[5557] divpoly,dddivpoly:=dddivpoly|signbit,t|signbit
ddequp G:752 DEF palhdr.h[881] ddequp=
ddequp G:752 FN pal.b[5521] LET ddequp(a,b,f)=..
ddequp G:752 LG pal.b[5522] ddequp(a,b,f)
ddequp G:752 LG pal.b[5563] eqpoly,ddequp:=ddequp|signbit,t|signbit
ddequp G:752 SG pal.b[5563] eqpoly,ddequp:=ddequp|signbit,t|signbit
ddminu G:745 DEF palhdr.h[874] ddminu=
ddminu G:745 FN pal.b[5434] LET ddminu(a,b)=..
ddminu G:745 LG pal.b[5435] ddminu(a,b)
ddminu G:745 LG pal.b[5538] minu,ddminu:=ddminu|signbit,t|signbit
ddminu G:745 SG pal.b[5538] minu,ddminu:=ddminu|signbit,t|signbit
ddmul G:746 DEF palhdr.h[875] ddmul=
ddmul G:746 FN pal.b[5440] LET ddmul(a,b)=..
ddmul G:746 LG pal.b[5441] ddmul(a,b)
ddmul G:746 LG pal.b[5541] mul,ddmul:=ddmul|signbit,t|signbit
ddmul G:746 SG pal.b[5541] mul,ddmul:=ddmul|signbit,t|signbit
ddmulpoly G:749 DEF palhdr.h[878] ddmulpoly=
ddmulpoly G:749 FN pal.b[5466] LET ddmulpoly(a,b)=..
ddmulpoly G:749 LG pal.b[5467] ddmulpoly(a,b)
ddmulpoly G:749 LG pal.b[5554] mulpoly,ddmulpoly:=ddmulpoly|signbit,t|signbit
ddmulpoly G:749 SG pal.b[5554] mulpoly,ddmulpoly:=ddmulpoly|signbit,t|signbit
ddpseu G:751 DEF palhdr.h[880] ddpseu=
ddpseu G:751 FN pal.b[5502] LET ddpseu(a,b)=..
ddpseu G:751 LG pal.b[5503] ddpseu(a,b)
ddpseu G:751 LG pal.b[5560] pseudorempoly,ddpseu:=ddpseu|signbit,t|signbit
ddpseu G:751 SG pal.b[5560] pseudorempoly,ddpseu:=ddpseu|signbit,t|signbit
deadcode M:-559038242 DEF libhdr.h[183] deadcode=#xDEADC0DE
delay G:128 DEF libhdr.h[144] delay=128
delayuntil G:129 DEF libhdr.h[145] delayuntil=129
deleteco G:18 DEF libhdr.h[33] deleteco=18
deletefile G:76 DEF libhdr.h[91] deletefile=76
deleteself G:125 DEF libhdr.h[141] deleteself=125
deplete G:43 DEF libhdr.h[58] deplete=43
difr G:628 DEF palhdr.h[745] difr=
difr G:628 FN pal.b[1395] LET difr(p,n)=..
difr G:628 LG pal.b[2738] arg1:=difr(arg1,h2!c)
difr G:628 LG pal.b[2984] RESULTIS difr(b,h2!a)
difr G:628 LG pal.b[9836] RESULTIS get4(s_dash,a,n,difr)
difr1 G:629 DEF palhdr.h[746] difr1=
difr1 G:629 FN pal.b[1401] LET difr1(p)=..
difr1 G:629 LG pal.b[1397] p:=difr1(p)
difr1 G:629 LG pal.b[1415] msg1(16,difr1,p)
difr1 G:629 LG pal.b[1417] difr1(h2!p)
difr1 G:629 LG pal.b[1419] difr1(h1!p)
difr1 G:629 LG pal.b[1453] difr1(h2!p1)
div G:528 DEF palhdr.h[633] div=
div G:528 FN pal.b[4865] LET div(a,b)=..
div G:528 LG pal.b[10087] RESULTIS div(a,b)
div G:528 LG pal.b[1425] RESULTIS div(s1,p)
div G:528 LG pal.b[152] u:=div(u,d)
div G:528 LG pal.b[153] div(v,d)
div G:528 LG pal.b[162] a,v:=div(a,d),div(v,d)
div G:528 LG pal.b[285] u:=div(u,d)
div G:528 LG pal.b[286] div(v,d)
div G:528 LG pal.b[295] a,v:=div(a,d),div(v,d)
div G:528 LG pal.b[4814] a:=div(a,h1!b)
div G:528 LG pal.b[4823] div(h2!b,h1!a)
div G:528 LG pal.b[4824] a:=div(h2!a,h1!b)
div G:528 LG pal.b[4839] a:=div(a,h1!b)
div G:528 LG pal.b[4848] div(h2!b,h1!a)
div G:528 LG pal.b[4849] a:=div(h2!a,h1!b)
div G:528 LG pal.b[4934] a,b:=div(a,c),div(b,c)
div G:528 LG pal.b[5055] gw1:=div(h2!a,b)
div G:528 LG pal.b[5069] gw1:=div(h2!b,a)
div G:528 LG pal.b[5081] div(h2!a,h2!b)
div G:528 LG pal.b[5082] b:=div(h1!a,h1!b)
div G:528 LG pal.b[5091] RESULTIS polymapf(a,b,div)
div G:528 LG pal.b[5102] c:=div(c,lcoef)
div G:528 LG pal.b[5105] a:=div(a,c)
div G:528 LG pal.b[5106] b:=div(b,c)
div G:528 LG pal.b[5111] a:=div(a,lcoef)
div G:528 LG pal.b[5126] a:=div(h2!a,lcoef)
div G:528 LG pal.b[5129] a:=div(h2!a,b)
div G:528 LG pal.b[5132] div(h2!a,b)
div G:528 LG pal.b[5144] div(h2!b,a)
div G:528 LG pal.b[5156] b:=div(h1!b,lcoef)
div G:528 LG pal.b[5160] b2:=div(h2!a,b2)
div G:528 LG pal.b[5164] div(h2!a,h2!b)
div G:528 LG pal.b[5165] b:=div(h1!a,h1!b)
div G:528 LG pal.b[5472] div(c,b)
div G:528 LG pal.b[5508] t:=div(t,b)
div G:528 LG pal.b[5543] div
div G:528 LG pal.b[7005] RESULTIS div(h1!p,h2!p)
div G:528 LG pal.b[7724] div
div G:528 LG pal.b[7867] div(h2!a,t)
div G:528 LG pal.b[7899] q:=polymapf(r,c,div)
div G:528 LLG pal.b[8284] a_div:=ds("/",@div,mk_div,...)
div G:528 SG pal.b[5544] div,dddiv:=dddiv|signbit,t|signbit
divpoly G:559 DEF palhdr.h[668] divpoly=
divpoly G:559 FN pal.b[7718] LET divpoly(p,q)=..
divpoly G:559 LG pal.b[5095] ga1:=divpoly(a,b)
divpoly G:559 LG pal.b[5223] divpoly(a,b)
divpoly G:559 LG pal.b[5556] divpoly
divpoly G:559 LG pal.b[7054] RESULTIS divpoly(h2!p,h1!p)
divpoly G:559 SG pal.b[5557] divpoly,dddivpoly:=dddivpoly|signbit,t|signbit
dofor G:508 DEF palhdr.h[612] dofor=
dofor G:508 FN pal.b[6500] LET dofor(v,p)=..
dofor G:508 LG pal.b[6508] msg1(16,dofor,v)
dorec G:626 DEF palhdr.h[742] dorec=
dorec G:626 FN pal.b[7241] LET dorec(a,b)=..
dorec G:626 LG pal.b[9791] dorec
doreca G:627 DEF palhdr.h[743] doreca=
doreca G:627 FN pal.b[7249] LET doreca(a)=..
doreca G:627 LG pal.b[9798] f:=doreca
dotrace G:486 DEF palhdr.h[585] dotrace=
dotrace G:486 LG pal.b[1720] dotrace(c,arg1)
dotrace G:486 RT pal.b[7300] LET dotrace(c,a)BE..
dotrace1 G:487 DEF palhdr.h[586] dotrace1=
dotrace1 G:487 FN pal.b[7310] LET dotrace1(a,f)=..
dotrace1 G:487 LG pal.b[7306] gw0,gw1,gw2:=dotrace1,h1!c,h2!c
dotrap G:482 DEF palhdr.h[581] dotrap=
dotrap G:482 LG pal.b[4433] dotrap()
dotrap1 G:483 DEF palhdr.h[582] dotrap1=
dotrap1 G:483 LG pal.b[7328] gw0,gw1,gw2:=dotrap1,b,a
ds F:5 FN pal.b[7980] LET ds(s,g1,g2,p1,p2,p3)=..
ds F:5 LF pal.b[8263] typ!s_seq:=ds(";",@mseq,seq,...)
ds F:5 LF pal.b[8274] ds(":=",@assg,ap2,...)
ds F:5 LF pal.b[8275] ds("aug",@aug,mk_aug,...)
ds F:5 LF pal.b[8276] ds("<<",@shlv,ap2,...)
ds F:5 LF pal.b[8277] ds(">>",@shrv,ap2,...)
ds F:5 LF pal.b[8281] a_plus:=ds("+",@add,mk_plus,...)
ds F:5 LF pal.b[8282] a_minu:=ds("-",@minu,mk_minu,...)
ds F:5 LF pal.b[8283] a_mul:=ds("**",@mul,mk_mul,...)
ds F:5 LF pal.b[8284] a_div:=ds("/",@div,mk_div,...)
ds F:5 LF pal.b[8285] ds("mod",@modv,ap2,...)
ds F:5 LF pal.b[8286] ds("^",@pow,mk_pow,...)
dt F:6 FN pal.b[7987] LET dt(s,g1,g2,p1,p2,p3)=..
dt F:6 LF pal.b[8278] dt("is",@isv,ap2,...)
dt F:6 LF pal.b[8279] a_eq:=dt("=",@eqlv,ap2,...)
dt F:6 LF pal.b[8280] a_gt:=dt(">",@gtv,ap2,...)
du F:7 FN pal.b[7994] LET du(s,f,g,n)=..
du F:7 LF pal.b[8253] a_fclos:=du("lambda",s_code2,...,s_fclos)
du F:7 LF pal.b[8256] typ!s_rec:=du("rec",s_code2,...,s_rec)
du F:7 LF pal.b[8258] typ!s_let:=du("let",s_code3,...,s_let)
du F:7 LF pal.b[8261] typ!s_cond:=du("->",s_code3,...,s_cond)
du F:7 LF pal.b[8266] typ!s_colon:=du(":",s_code2,...,s_colon)
dummy G:200 DEF palhdr.h[253] dummy=ug
dummy G:200 FN pal.b[35] LET dummy(a)=..
dummy G:200 LG pal.b[3080] zero,dummy,wrc
dummy G:200 LG pal.b[5381] userpostmortem:=dummy
dump G:611 DEF palhdr.h[725] dump=
dump G:611 FN pal.b[9173] LET dump(a)=..
dump G:611 LLG pal.b[8360] set_f("DUMP",@dump)
dv F:8 FN pal.b[8000] LET dv(s,f,g,n,p)=..
dv F:8 LF pal.b[8246] a_qu:=dv("'",s_codev,...,...)
dv F:8 LF pal.b[8260] typ!s_retu:=dv("return",s_codev,...,...)
dv F:8 LF pal.b[8268] typ!s_aa:=dv("@",s_codev,...,...)
dv F:8 LF pal.b[8269] typ!s_zz:=dv("!",s_codev,...,...)
dv F:8 LF pal.b[8289] dv("~",s_codev,...,...)
dv F:8 LF pal.b[8383] dv("$",s_codev,...,...)
dy F:9 FN pal.b[8007] LET dy(s,v,n)=..
dy F:9 LF pal.b[8316] dy("true",TRUE,s_pp)
dy F:9 LF pal.b[8362] dy("E",ze,s_pp)
dy F:9 LF pal.b[8363] dy("J",zj,s_pp)
e G:437 DEF palhdr.h[531] e=
e G:437 LG pal.b[1429] q:=find(q,e)
e G:437 LG pal.b[1650] e,j
e G:437 LG pal.b[1700] z,-m,e,j
e G:437 LG pal.b[1730] e
e G:437 LG pal.b[1742] arg1:=e
e G:437 LG pal.b[1758] arg1:=get4(!c,e,...,...)
e G:437 LG pal.b[1761] e:=get4(s_e,e,zsy,...)
e G:437 LG pal.b[1765] e:=get4(s_e,e,zsy,...)
e G:437 LG pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[1851] e:=get4(s_e,e,arg1,...)
e G:437 LG pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[1917] e:=bind(h2!c,arg1,e)
e G:437 LG pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[1926] e:=get4(s_e,e,arg1,...)
e G:437 LG pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
e G:437 LG pal.b[1936] e:=get4(s_e,e,a,...)
e G:437 LG pal.b[1938] h1!e1,h2!e1,h3!e1:=h1!e,h2!e,h3!e
e G:437 LG pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2347] e:=get4(s_e,e,arg1,...)
e G:437 LG pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
e G:437 LG pal.b[2392] e:=bind(v,arg1,e)
e G:437 LG pal.b[2424] arg1:=h1!h1!e
e G:437 LG pal.b[2432] arg1:=h2!e
e G:437 LG pal.b[2437] arg1:=h2!h1!e
e G:437 LG pal.b[2442] arg1:=h1!h1!e
e G:437 LG pal.b[2450] f:=get4(s_mmcf,f,...)+yfj
e G:437 LG pal.b[2455] f:=get4(s_mmcf,f,...)+yfj
e G:437 LG pal.b[2505] arg1:=get4(!arg1,e,...,...)
e G:437 LG pal.b[2511] arg1:=get4(!arg1,h1!arg1,e,...)
e G:437 LG pal.b[2517] e:=bind(h2!c,arg1,e)
e G:437 LG pal.b[2523] e:=h1!e
e G:437 LG pal.b[2536] e:=get4(s_e,e,arg1,...)
e G:437 LG pal.b[2551] e:=get4(s_e,e,...,...)
e G:437 LG pal.b[2571] e:=get4(s_e,e,...,...)
e G:437 LG pal.b[2578] e:=get4(s_e,e,arg1,...)
e G:437 LG pal.b[2587] e:=get4(s_e,e,arg1,...)
e G:437 LG pal.b[2715] arg1:=e
e G:437 LG pal.b[2728] e:=get4(s_e,e,zsy,...)
e G:437 LG pal.b[2733] arg1:=(h2!c)(arg1,h3!e)
e G:437 LG pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
e G:437 LG pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
e G:437 LG pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
e G:437 LG pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
e G:437 LG pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
e G:437 LG pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
e G:437 LG pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
e G:437 LG pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
e G:437 LG pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
e G:437 LG pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
e G:437 LG pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
e G:437 LG pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
e G:437 LG pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
e G:437 LG pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
e G:437 LG pal.b[2969] get4(!a,e,...,...)
e G:437 LG pal.b[2973] e:=get4(s_e,e,zsy,...)
e G:437 LG pal.b[2987] e
e G:437 LG pal.b[3128] e
e G:437 LG pal.b[3751] -m,e,j
e G:437 LG pal.b[3763] -m,e,j
e G:437 LG pal.b[7111] e
e G:437 LG pal.b[7140] w:=get4(s_clos,e,z,w)
e G:437 LG pal.b[7187] w:=get4(s_clos,e,z,w)
e G:437 LG pal.b[7242] e
e G:437 LG pal.b[7243] e:=h1!e
e G:437 LG pal.b[7244] bind(b,a,e)
e G:437 LG pal.b[7250] h2!e:=a
e G:437 LG pal.b[7251] e:=h1!e
e G:437 LG pal.b[9197] e
e G:437 LLG pal.b[4314] FOR i=@e TO @erz DO..
e G:437 LLG pal.b[4414] FOR i=@e TO @erz DO..
e G:437 LLG pal.b[4453] FOR i=@e TO @a_null DO..
e G:437 LLG pal.b[8210] FOR i=@e TO @a_null DO..
e G:437 LLG pal.b[8496] FOR i=@e TO @a_null DO..
e G:437 SG pal.b[1761] e:=get4(s_e,e,zsy,...)
e G:437 SG pal.b[1765] e:=get4(s_e,e,zsy,...)
e G:437 SG pal.b[1805] e:=get4(s_e,h1!c,arg1,...)
e G:437 SG pal.b[1850] e:=get4(s_e,h1!c,a2,...)
e G:437 SG pal.b[1851] e:=get4(s_e,e,arg1,...)
e G:437 SG pal.b[1870] e:=binda(h2!c,arg1,h1!c)
e G:437 SG pal.b[1917] e:=bind(h2!c,arg1,e)
e G:437 SG pal.b[1926] e:=get4(s_e,e,arg1,...)
e G:437 SG pal.b[1936] e:=get4(s_e,e,a,...)
e G:437 SG pal.b[1951] m,e,j:=-p1,p2,p3
e G:437 SG pal.b[1959] e,f,j:=h1!j,h3!j,h2!j
e G:437 SG pal.b[1967] e,c,j:=h1!j,h3!j,h2!j
e G:437 SG pal.b[1975] e,f,j:=h1!j,h3!j,h2!j
e G:437 SG pal.b[1980] e,f,j:=h1!j,h3!j,h2!j
e G:437 SG pal.b[1987] e,f,j:=h1!j,h3!j,h2!j
e G:437 SG pal.b[2024] e:=bind(h3!c,arg1,h2!c)
e G:437 SG pal.b[2030] e:=h2!c
e G:437 SG pal.b[2036] e:=get4(s_e,ze,arg1,...)
e G:437 SG pal.b[2196] e,c:=c,arg1
e G:437 SG pal.b[2201] e,c:=h1!c,h3!c
e G:437 SG pal.b[2207] e:=get4(s_e,h1!c,arg1,...)
e G:437 SG pal.b[2220] e:=binda(c2,arg1,h1!c)
e G:437 SG pal.b[2227] e:=bind(h2!c,arg1,h1!c)
e G:437 SG pal.b[2240] e,j:=h1!c,h2!c
e G:437 SG pal.b[2293] e:=binda(h2!c,arg1,h1!c)
e G:437 SG pal.b[2306] e:=get4(s_e,h1!c,arg1,...)
e G:437 SG pal.b[2346] e:=get4(s_e,h1!c,v,...)
e G:437 SG pal.b[2347] e:=get4(s_e,e,arg1,...)
e G:437 SG pal.b[2392] e:=bind(v,arg1,e)
e G:437 SG pal.b[2517] e:=bind(h2!c,arg1,e)
e G:437 SG pal.b[2523] e:=h1!e
e G:437 SG pal.b[2536] e:=get4(s_e,e,arg1,...)
e G:437 SG pal.b[2551] e:=get4(s_e,e,...,...)
e G:437 SG pal.b[2571] e:=get4(s_e,e,...,...)
e G:437 SG pal.b[2578] e:=get4(s_e,e,arg1,...)
e G:437 SG pal.b[2586] e:=get4(s_e,t,v,...)
e G:437 SG pal.b[2587] e:=get4(s_e,e,arg1,...)
e G:437 SG pal.b[2728] e:=get4(s_e,e,zsy,...)
e G:437 SG pal.b[2786] e:=h2!c
e G:437 SG pal.b[2794] e:=h2!c
e G:437 SG pal.b[2801] e:=h2!c
e G:437 SG pal.b[2813] e:=get4(s_e,ze,arg1,...)
e G:437 SG pal.b[2821] e:=get4(s_e,ze,arg1,...)
e G:437 SG pal.b[2828] e:=get4(s_e,ze,arg1,...)
e G:437 SG pal.b[2973] e:=get4(s_e,e,zsy,...)
e G:437 SG pal.b[3769] m,e,j:=-p1,p2,p3
e G:437 SG pal.b[7243] e:=h1!e
e G:437 SG pal.b[7251] e:=h1!e
e G:437 SG pal.b[8219] e:=ze
e G:437 SG pal.b[9208] e:=v
e G:437 SG pal.b[9210] e:=e1
efsy F:5 FN pal.b[3171] LET efsy(a,n)=..
efsy F:5 LF pal.b[3210] efsy(h2!a,n+1)
efsy F:5 LF pal.b[3211] a:=efsy(h3!a,n+1)
efsy F:5 LF pal.b[3487] IF efsy(arg1,-3)>efsy(arg2,-3) DO ..
end F:7 LF pal.b[8988] end(0)
end F:7 LF pal.b[8999] end(4)
end F:7 RT pal.b[9166] LET end(n)BE..
endpoint G:238 DEF palhdr.h[305] endpoint=
endpoint G:238 LG pal.b[1187] mapseg(0,loadpoint,endpoint)
endpoint G:238 LG pal.b[8078] writef("# Ver'f region",loadpoint+4,...,...)
endpoint G:238 SG pal.b[8919] endpoint:=loadpoint+rootnode!rtn_memsize
endread G:232 DEF palhdr.h[299] endread=
endread G:232 LG pal.b[765] endread()
endread G:232 LG pal.b[770] endread()
endread G:60 DEF libhdr.h[75] endread=60
endstream G:62 DEF libhdr.h[77] endstream=62
endstreamch M:-1 DEF libhdr.h[166] endstreamch=-1
endstreamch M:-1 DEF palhdr.h[38] endstreamch=-1
endstreamch M:-1 MAN pal.b[741] ch,rch:=endstreamch,rch0
endstreamch M:-1 MAN pal.b[767] ch:=endstreamch
endstreamch M:-1 MAN pal.b[796] UNLESS c=endstreamch DO ..
endstreamch M:-1 MAN pal.b[9340] TEST ch=endstreamch THEN .. ELSE ..
endstreamch M:-1 MAN pal.b[9392] UNTIL ch=10|ch=endstreamch DO ..
endstreamch M:-1 MAN pal.b[9410] s1:=endstreamch
endstreamch M:-1 MAN pal.b[9422] IF ch=endstreamch DO ..
endstreamch M:-1 MAN pal.b[9428] .. REPEATUNTIL ch=35|ch=endstreamch
endstreamch M:-1 MAN pal.b[9435] s1:=endstreamch
endstreamch M:-1 MAN pal.b[9575] IF ch=32|ch=10|ch=endstreamch DO ..
endstreamch M:-1 MAN pal.b[9657] IF ch=32|ch=10|ch=endstreamch DO ..
endtoinput G:236 DEF palhdr.h[303] endtoinput=
endwrite G:233 DEF palhdr.h[300] endwrite=
endwrite G:233 LG pal.b[779] endwrite()
endwrite G:233 LG pal.b[783] endwrite()
endwrite G:61 DEF libhdr.h[76] endwrite=61
entrymask M:-983041 DEF pal.b[711] entrymask=-983041
entrymask M:-983041 MAN pal.b[989] IF validcode(p)&(...&entrymask)=entryword&getbyte(p,-8)<8 DO ..
entryword M:-1874792448 DEF pal.b[712] entryword=#x9040F000
entryword M:-1874792448 MAN pal.b[989] IF validcode(p)&(...&entrymask)=entryword&getbyte(p,-8)<8 DO ..
entryword M:57311 DEF libhdr.h[185] entryword=57311
eqdd F:24 FN pal.b[884] LET eqdd(p,q)=..
eqdd F:24 LF pal.b[1095] UNLESS eqdd("SYSPRINT",ddname) DO ..
eqdd F:24 LF pal.b[1148] TEST eqdd(s,p+7) THEN .. ELSE ..
eqdd F:24 LF pal.b[1166] IF (p!9&bcplbit)~=0&(s=0|eqdd(s,...)) DO ..
eql G:333 DEF palhdr.h[408] eql=
eql G:333 FN pal.b[4610] LET eql(p,q)=..
eql G:333 LG pal.b[7409] RESULTIS eql(p,q)
eqlv G:523 DEF palhdr.h[628] eqlv=
eqlv G:523 FN pal.b[7341] LET eqlv(p,q)=..
eqlv G:523 LG pal.b[328] IF eqlv(a,b) DO ..
eqlv G:523 LG pal.b[398] IF eqlv(h1!b,!ae) DO ..
eqlv G:523 LG pal.b[399] IF eqlv(h2!b,1!ae) DO ..
eqlv G:523 LG pal.b[407] IF eqlv(h1!b,!ae) DO ..
eqlv G:523 LG pal.b[5178] IF eqlv(a,b) DO ..
eqlv G:523 LG pal.b[5458] IF eqlv(t,a) DO ..
eqlv G:523 LG pal.b[5474] IF eqlv(t,a) DO ..
eqlv G:523 LG pal.b[5491] IF eqlv(t,a) DO ..
eqlv G:523 LG pal.b[6623] IF eqlv(h3!e,n) DO ..
eqlv G:523 LG pal.b[7942] UNLESS eqlv(h1!a,h1!b) DO ..
eqlv G:523 LLG pal.b[8279] a_eq:=dt("=",@eqlv,ap2,...)
eqpoly G:551 DEF palhdr.h[660] eqpoly=
eqpoly G:551 FN pal.b[7913] LET eqpoly(a,b,f)=..
eqpoly G:551 LG pal.b[4706] .. REPEATWHILE eqpoly(h2!u,h2!v,f<ysg)
eqpoly G:551 LG pal.b[5562] eqpoly
eqpoly G:551 LG pal.b[7406] .. REPEATWHILE eqpoly(h2!p,h2!q,f)
eqpoly G:551 LG pal.b[7955] .. REPEATWHILE h3!a=h3!b&eqpoly(h2!a,...,f)
eqpoly G:551 SG pal.b[5563] eqpoly,ddequp:=ddequp|signbit,t|signbit
erlab G:313 DEF palhdr.h[385] erlab=
erlab G:313 LG pal.b[1599] longjump(erlev,erlab)
erlab G:313 LG pal.b[3761] -erlev,-erlab
erlab G:313 SG pal.b[1055] erlev,erlab:=level(),l
erlab G:313 SG pal.b[3764] erlev,erlab:=level(),l
erlab G:313 SG pal.b[3766] erlev,erlab:=-l1,-l2
erlab G:313 SG pal.b[3768] erlev,erlab:=-l1,-l2
erlab G:313 SG pal.b[8954] erlev,erlab:=level(),l
erlev G:312 DEF palhdr.h[384] erlev=
erlev G:312 LG pal.b[1597] backtr(erlev>>2,level()>>2)
erlev G:312 LG pal.b[1599] longjump(erlev,erlab)
erlev G:312 LG pal.b[3761] -erlev,-erlab
erlev G:312 SG pal.b[1055] erlev,erlab:=level(),l
erlev G:312 SG pal.b[3764] erlev,erlab:=level(),l
erlev G:312 SG pal.b[3766] erlev,erlab:=-l1,-l2
erlev G:312 SG pal.b[3768] erlev,erlab:=-l1,-l2
erlev G:312 SG pal.b[8954] erlev,erlab:=level(),l
error G:453 DEF palhdr.h[549] error=
error G:453 FN pal.b[6761] LET error(a)=..
error G:453 LLG pal.b[8081] FOR i=@error TO @g0+maxglob DO..
error G:453 LLG pal.b[8291] set_d("ERROR",@error)
erroreval G:455 DEF palhdr.h[551] erroreval=
erroreval G:455 FN pal.b[3760] LET erroreval(s)=..
erroreval G:455 LLG pal.b[8350] set_v("ERROREVAL",@erroreval)
errormessage G:204 DEF palhdr.h[259] errormessage=
errormessage G:204 RT pal.b[1091] LET errormessage(fault,format,routine,ddname)BE..
errorp G:346 DEF palhdr.h[425] errorp=
errorp G:346 LG pal.b[5336] writef("*n# Ba') -> %E*n",errorp,dd1,...)
errorp G:346 LG pal.b[5407] errorp(a)
errorp G:346 RT pal.b[1644] LET errorp(p)BE..
errorreset G:266 DEF palhdr.h[334] errorreset=
errorreset G:266 LG pal.b[5382] errorreset()
errorset G:454 DEF palhdr.h[550] errorset=
errorset G:454 FN pal.b[6768] LET errorset(s)=..
errorset G:454 LLG pal.b[8349] set_v("ERRORSET",@errorset)
erz G:442 DEF palhdr.h[536] erz=
erz G:442 LG pal.b[1601] TEST erz=z|~paramd THEN .. ELSE ..
erz G:442 LG pal.b[1605] eval(erz)
erz G:442 LG pal.b[8993] UNLESS erz=z DO ..
erz G:442 LG pal.b[8994] arg1:=erz
erz G:442 LLG pal.b[4314] FOR i=@e TO @erz DO..
erz G:442 LLG pal.b[4414] FOR i=@e TO @erz DO..
erz G:442 SG pal.b[5351] erz:=zsy
erz G:442 SG pal.b[6769] erz:=s
erz G:442 SG pal.b[8995] erz:=z
escw F:16 LF pal.b[821] escw(78)
escw F:16 LF pal.b[823] escw(b)
escw F:16 RT pal.b[827] LET escw(c)BE..
eval G:543 DEF palhdr.h[650] eval=
eval G:543 FN pal.b[1699] LET eval(c)=..
eval G:543 LG pal.b[1605] eval(erz)
eval G:543 LG pal.b[1667] IF qq=eval DO ..
eval G:543 LG pal.b[3755] -3!@c1:=eval
eval G:543 LG pal.b[3765] s:=eval(s)
eval G:543 LG pal.b[5348] eval(v)
eval G:543 LG pal.b[6280] TEST !(-2!...>>2)=eval THEN .. ELSE ..
eval G:543 LG pal.b[6282] longjump(flevel(eval),ll_ex)
eval G:543 LG pal.b[6283] eval(a)
eval G:543 LG pal.b[7307] longjump(flevel(eval),ll_ex)
eval G:543 LG pal.b[7329] longjump(flevel(eval),ll_ex)
eval G:543 LG pal.b[8986] eval(u)
eval G:543 LG pal.b[8997] eval(arg1)
eval G:543 LG pal.b[9206] v:=eval(v)
evalpoly G:552 DEF palhdr.h[661] evalpoly=
evalpoly G:552 FN pal.b[7540] LET evalpoly(p)=..
evalpoly G:552 LG pal.b[2155] arg1:=evalpoly(c)
evenstack M:1547756259 DEF pal.b[716] evenstack=#x5C40E2E3
evenstack M:1547756259 MAN pal.b[1115] UNLESS !(stackend-2)=evenstack DO ..
evenstack M:1547756259 MAN pal.b[1120] UNLESS !q=evenstack DO ..
evenstack M:1547756259 MAN pal.b[1127] UNLESS p!0=evenstack DO ..
evenstack M:1547756259 MAN pal.b[1259] IF v=evenstack|v=oddstack DO ..
evsy G:419 DEF palhdr.h[510] evsy=
evsy G:419 FN pal.b[2940] LET evsy(a)=..
evsy G:419 LG pal.b[10003] TEST evsy(a)&evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[10169] TEST evsy(e)&evsy(f2) THEN .. ELSE ..
evsy G:419 LG pal.b[10195] TEST evsy(a) THEN .. ELSE ..
evsy G:419 LG pal.b[10196] TEST evsy(b2)&evsy(c2) THEN .. ELSE ..
evsy G:419 LG pal.b[2951] UNLESS evsy(h2!a) DO ..
evsy G:419 LG pal.b[9794] TEST evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9805] TEST evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9814] IF evsy(h3!a) DO ..
evsy G:419 LG pal.b[9927] TEST evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9935] TEST evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9943] TEST evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9958] TEST evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9968] TEST evsy(a)&evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9982] TEST evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9989] TEST evsy(b) THEN .. ELSE ..
evsy G:419 LG pal.b[9996] TEST evsy(b) THEN .. ELSE ..
fbv F:9 FN pal.b[3574] LET fbv(b)=..
fbv F:9 LF pal.b[3154] TEST fbv(a2) THEN .. ELSE ..
fbv F:9 LF pal.b[3360] TEST fbv(h2!a)&matchbv(h2!a,...,FALSE) THEN .. ELSE ..
fbv F:9 LF pal.b[3581] UNLESS fbv(h2!b) DO ..
ff_a1e G:647 DEF palhdr.h[767] ff_a1e=
ff_a1e G:647 FN pal.b[2990] LET ff_a1e(a)=..
ff_a1e G:647 LG pal.b[9022] fff!s_a1e:=ff_a1e
ff_a1e G:647 LG pal.b[9023] fff!s_aa:=ff_a1e
ff_a2e G:649 DEF palhdr.h[769] ff_a2e=
ff_a2e G:649 FN pal.b[3006] LET ff_a2e(a)=..
ff_a2e G:649 LG pal.b[9026] fff!s_a2e:=ff_a2e
ff_argt F:12 FN pal.b[3048] LET ff_argt(v,a,e)=..
ff_ave G:648 DEF palhdr.h[768] ff_ave=
ff_ave G:648 FN pal.b[2997] LET ff_ave(a)=..
ff_ave G:648 LG pal.b[9024] fff!s_ave:=ff_ave
ff_ave G:648 LG pal.b[9025] fff!s_zz:=ff_ave
ff_clos G:640 DEF palhdr.h[760] ff_clos=
ff_clos G:640 FN pal.b[2969] LET ff_clos(a)=..
ff_clos G:640 LG pal.b[9017] fff!i:=ff_clos
ff_condb G:643 DEF palhdr.h[763] ff_condb=
ff_condb G:643 FN pal.b[3028] LET ff_condb(a)=..
ff_condb G:643 LG pal.b[9019] fff!s_condb:=ff_condb
ff_dash G:645 DEF palhdr.h[765] ff_dash=
ff_dash G:645 FN pal.b[2980] LET ff_dash(a)=..
ff_dash G:645 LG pal.b[9021] fff!s_dash:=ff_dash
ff_e G:646 DEF palhdr.h[766] ff_e=
ff_e G:646 FN pal.b[2987] LET ff_e()=..
ff_e G:646 LG pal.b[9015] fff!s_e:=ff_e
ff_reca G:641 DEF palhdr.h[761] ff_reca=
ff_reca G:641 FN pal.b[2972] LET ff_reca(a)=..
ff_reca G:641 LG pal.b[9018] fff!s_reca:=ff_reca
ff_seqa G:644 DEF palhdr.h[764] ff_seqa=
ff_seqa G:644 FN pal.b[3039] LET ff_seqa(a)=..
ff_seqa G:644 LG pal.b[9020] fff!s_seqa:=ff_seqa
ff_tuple G:642 DEF palhdr.h[762] ff_tuple=
ff_tuple G:642 FN pal.b[3017] LET ff_tuple(a)=..
ff_tuple G:642 LG pal.b[1866] arg1:=ff_tuple(h2!c)
ff_tuple G:642 LG pal.b[9014] fff!s_tuple:=ff_tuple
fff G:418 DEF palhdr.h[509] fff=
fff G:418 LG pal.b[1768] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1776] (fff!!arg1)(arg1)
fff G:418 LG pal.b[1790] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1793] c:=(fff!!c)(c)
fff G:418 LG pal.b[1801] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1827] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1833] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1842] a2:=(fff!!a2)(a2)
fff G:418 LG pal.b[1845] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1859] a2:=(fff!!a2)(a2)
fff G:418 LG pal.b[1862] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1884] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1903] a:=(fff!!a)(a)
fff G:418 LG pal.b[1914] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[1923] arg1:=(fff!!arg1)(arg1)
fff G:418 LG pal.b[2945] IF fff!!a=msg2 DO ..
fff G:418 LG pal.b[2976] b:=(fff!!b)(b)
fff G:418 LG pal.b[2983] b:=(fff!!b)(b)
fff G:418 LG pal.b[2993] b:=(fff!!b)(b)
fff G:418 LG pal.b[3000] b:=(fff!!b)(b)
fff G:418 LG pal.b[3010] b2:=(fff!!b2)(b2)
fff G:418 LG pal.b[3013] b1:=(fff!!b1)(b1)
fff G:418 LG pal.b[3021] b:=(fff!!b)(b)
fff G:418 LG pal.b[3030] a1:=(fff!!a1)(a1)
fff G:418 LG pal.b[3035] a:=(fff!!a)(a)
fff G:418 LG pal.b[3041] (fff!!a1)(a1)
fff G:418 LG pal.b[3044] a:=(fff!!a)(a)
fff G:418 LG pal.b[3054] a2:=(fff!!a2)(a2)
fff G:418 LG pal.b[8441] fff!0:=0
fff G:418 LG pal.b[8443] fff!i:=zsq
fff G:418 LG pal.b[8444] fff!s_loc:=0
fff G:418 LG pal.b[8445] fff!s_name:=0
fff G:418 LG pal.b[8446] fff!s_glz:=0
fff G:418 LG pal.b[8447] fff!s_glo:=0
fff G:418 LG pal.b[8448] fff!s_xtupl:=0
fff G:418 LG pal.b[8449] fff!s_tra:=0
fff G:418 LG pal.b[8450] fff!s_apz:=0
fff G:418 LG pal.b[8452] fff!i:=0
fff G:418 LG pal.b[8472] fff!s_ratl:=0
fff G:418 LG pal.b[8482] fff!i
fff G:418 LG pal.b[8515] fff!s_ratl
fff G:418 LG pal.b[8522] fff!s_ratl:=0
fff G:418 LG pal.b[8525] fff!i
fff G:418 LG pal.b[8686] fff-3+!a
fff G:418 LG pal.b[8777] fff-1+(a0>>24)
fff G:418 LG pal.b[9006] fff!i:=msg2
fff G:418 LG pal.b[9008] fff!i:=iv
fff G:418 LG pal.b[9009] fff!s_glz:=msg3
fff G:418 LG pal.b[9011] fff!i:=sel2
fff G:418 LG pal.b[9013] fff!i:=lookup
fff G:418 LG pal.b[9014] fff!s_tuple:=ff_tuple
fff G:418 LG pal.b[9015] fff!s_e:=ff_e
fff G:418 LG pal.b[9017] fff!i:=ff_clos
fff G:418 LG pal.b[9018] fff!s_reca:=ff_reca
fff G:418 LG pal.b[9019] fff!s_condb:=ff_condb
fff G:418 LG pal.b[9020] fff!s_seqa:=ff_seqa
fff G:418 LG pal.b[9021] fff!s_dash:=ff_dash
fff G:418 LG pal.b[9022] fff!s_a1e:=ff_a1e
fff G:418 LG pal.b[9023] fff!s_aa:=ff_a1e
fff G:418 LG pal.b[9024] fff!s_ave:=ff_ave
fff G:418 LG pal.b[9025] fff!s_zz:=ff_ave
fff G:418 LG pal.b[9026] fff!s_a2e:=ff_a2e
fff G:418 SG pal.b[8942] fff:=TABLE 0,0,0,...
find G:518 DEF palhdr.h[622] find=
find G:518 FN pal.b[6619] LET find(n,e)=..
find G:518 LG pal.b[1429] q:=find(q,e)
find G:518 LLG pal.b[8353] set_c("FIND",@find)
findarg G:104 DEF libhdr.h[120] findarg=104
findinoutput G:50 DEF libhdr.h[65] findinoutput=50
findinput G:48 DEF libhdr.h[63] findinput=48
findinput G:48 DEF palhdr.h[23] findinput=48
findinput G:48 LG pal.b[5597] stream(findinput,s,zero)
findinput G:48 LG pal.b[6580] g_get(findinput,s,zero)
findinput G:48 LG pal.b[6602] s:=stream(findinput,s,zero)
findinput G:48 LG pal.b[8982] u:=findinput("SUPERVIS")
findlibrary G:229 DEF palhdr.h[296] findlibrary=
findlog G:224 DEF palhdr.h[289] findlog=
findlog G:224 LG pal.b[1098] sysout:=findlog()
findlog G:224 LG pal.b[734] findlog()
findoutput G:49 DEF libhdr.h[64] findoutput=49
findoutput G:49 DEF palhdr.h[24] findoutput=49
findoutput G:49 LG pal.b[1096] sysout:=findoutput("SYSPRINT")
findoutput G:49 LG pal.b[5604] stream(findoutput,s,zero)
findparm G:227 DEF palhdr.h[292] findparm=
findstream G:52 DEF libhdr.h[67] findstream=52
findtput G:226 DEF palhdr.h[291] findtput=
findupdate G:51 DEF libhdr.h[66] findupdate=51
findword G:547 DEF palhdr.h[655] findword=
findword G:547 FN pal.b[6316] LET findword(a)=..
findword G:547 LG pal.b[9295] s1:=findword(s0)
findword G:547 LG pal.b[9335] s0:=findword(a)
findword G:547 LG pal.b[9338] s0:=findword(a)
fixap G:606 DEF palhdr.h[718] fixap=
fixap G:606 LG pal.b[7159] fixap(h3!v)
fixap G:606 LG pal.b[7207] fixap(h3!v)
fixap G:606 RT pal.b[9890] LET fixap(a)BE..
fixapf G:636 DEF palhdr.h[755] fixapf=
fixapf G:636 LG pal.b[3137] fixapf(a2,h3!a)
fixapf G:636 RT pal.b[3666] LET fixapf(v,l)BE..
fixc F:5 LF pal.b[8578] fixc(i+2)
fixc F:5 LF pal.b[8578] fixc(i+3)
fixc F:5 RT pal.b[8566] LET fixc(a)BE..
fixv G:490 DEF palhdr.h[591] fixv=
fixv G:490 FN pal.b[7036] LET fixv(p)=..
fixv G:490 LLG pal.b[8344] set_v("FIX",@fixv)
fl_abs M:5 DEF libhdr.h[410] fl_abs=
fl_acos M:20 DEF libhdr.h[414] fl_acos=20
fl_asin M:21 DEF libhdr.h[415] fl_asin=
fl_atan M:22 DEF libhdr.h[416] fl_atan=
fl_atan2 M:23 DEF libhdr.h[417] fl_atan2=
fl_avail M:0 DEF libhdr.h[408] fl_avail=0
fl_ceil M:38 DEF libhdr.h[432] fl_ceil=
fl_cos M:24 DEF libhdr.h[418] fl_cos=
fl_cosh M:27 DEF libhdr.h[421] fl_cosh=
fl_div M:7 DEF libhdr.h[411] fl_div=
fl_eq M:12 DEF libhdr.h[412] fl_eq=
fl_exp M:30 DEF libhdr.h[424] fl_exp=
fl_fix M:4 DEF libhdr.h[410] fl_fix=
fl_float M:3 DEF libhdr.h[410] fl_float=
fl_floor M:39 DEF libhdr.h[433] fl_floor=
fl_fmod M:40 DEF libhdr.h[434] fl_fmod=
fl_frexp M:31 DEF libhdr.h[425] fl_frexp=
fl_ge M:17 DEF libhdr.h[412] fl_ge=
fl_gr M:15 DEF libhdr.h[412] fl_gr=
fl_ldexp M:32 DEF libhdr.h[426] fl_ldexp=
fl_le M:16 DEF libhdr.h[412] fl_le=
fl_log M:33 DEF libhdr.h[427] fl_log=
fl_log10 M:34 DEF libhdr.h[428] fl_log10=
fl_ls M:14 DEF libhdr.h[412] fl_ls=
fl_minus M:9 DEF libhdr.h[411] fl_minus=
fl_mk M:1 DEF libhdr.h[409] fl_mk=
fl_modf M:35 DEF libhdr.h[429] fl_modf=
fl_mult M:6 DEF libhdr.h[411] fl_mult=
fl_ne M:13 DEF libhdr.h[412] fl_ne=
fl_neg M:11 DEF libhdr.h[411] fl_neg=
fl_plus M:8 DEF libhdr.h[411] fl_plus=
fl_pos M:10 DEF libhdr.h[411] fl_pos=
fl_pow M:36 DEF libhdr.h[430] fl_pow=
fl_sin M:25 DEF libhdr.h[419] fl_sin=
fl_sinh M:28 DEF libhdr.h[422] fl_sinh=
fl_sqrt M:37 DEF libhdr.h[431] fl_sqrt=
fl_tan M:26 DEF libhdr.h[420] fl_tan=
fl_tanh M:29 DEF libhdr.h[423] fl_tanh=
fl_unmk M:2 DEF libhdr.h[409] fl_unmk=
flat0 F:6 FN pal.b[3227] LET flat0(a,e)=..
flat0 F:6 LF pal.b[3151] flat0(h3!a,e)
flat1 G:635 DEF palhdr.h[754] flat1=
flat1 G:635 FN pal.b[3244] LET flat1(a,c,e,f,cstac)=..
flat1 G:635 LG pal.b[3230] flat1(a,zc,e,...)
flat1 G:635 LG pal.b[3322] c:=flat1(h2!t,c,e,...)
flat1 G:635 LG pal.b[3344] c:=flat1(h1!a,c,e,...)
flat1 G:635 LG pal.b[3359] c:=flat1(h1!a,c,g,...)
flat1 G:635 LG pal.b[3453] c:=flat1(h2!a,c,e,...)
flat1 G:635 LG pal.b[3509] c:=flat1(arg1,c,e,...)
flat1 G:635 LG pal.b[3527] h2!c0:=flat1(h2!n,c,e,...)
flat1 G:635 LG pal.b[3528] h1!c0:=flat1(h3!n,c,e,...)
flat1 G:635 LG pal.b[3532] c:=flat1(h2!a,c,e,...)
flatbv G:637 DEF palhdr.h[756] flatbv=
flatbv G:637 FN pal.b[3590] LET flatbv(c,b)=..
flatbv G:637 LG pal.b[3159] c:=flatbv(c,a2)
flatbv G:637 LG pal.b[3361] c:=flatbv(c,h2!a)
flatbv G:637 LG pal.b[3607] c:=flatbv(c,h2!b)
flatbv G:637 LG pal.b[3620] c:=flatbv(c,b2)
flatbv G:637 LG pal.b[3623] c:=flatbv(c,h2!b)
flatten G:634 DEF palhdr.h[753] flatten=
flatten G:634 FN pal.b[3121] LET flatten(a)=..
flatten G:634 LG pal.b[3109] longjump(flevel(flatten),l_flatten)
flatten G:634 LG pal.b[3130] flatten(h2!g)
flatten G:634 LG pal.b[3136] flatten(h2!a)
flatten G:634 LG pal.b[3142] lmap(flatten,a)
flatten G:634 LG pal.b[3336] a:=flatten(a)
flatten G:634 LLG pal.b[8234] typ!s_cdx:=set_v("FLATTEN",@flatten)
flevel G:349 DEF palhdr.h[428] flevel=
flevel G:349 FN pal.b[4469] LET flevel(f)=..
flevel G:349 LG pal.b[3109] longjump(flevel(flatten),l_flatten)
flevel G:349 LG pal.b[5361] longjump(flevel(verify),l0)
flevel G:349 LG pal.b[6282] longjump(flevel(eval),ll_ex)
flevel G:349 LG pal.b[7307] longjump(flevel(eval),ll_ex)
flevel G:349 LG pal.b[7329] longjump(flevel(eval),ll_ex)
flevel G:349 LG pal.b[9224] longjump(flevel(rp),ll_sy)
floatv G:491 DEF palhdr.h[592] floatv=
floatv G:491 FN pal.b[7060] LET floatv(p)=..
floatv G:491 LG pal.b[7076] msg1(16,floatv,p)
floatv G:491 LLG pal.b[8343] set_v("FLOAT",@floatv)
fn G:569 DEF palhdr.h[679] fn=
fn G:569 FN pal.b[9787] LET fn(a,b)=..
fn G:569 LG pal.b[10110] e:=fn(z,e)
fn G:569 LG pal.b[10124] f:=fn(i,f)
fn G:569 LG pal.b[10127] f:=fn(b,f)
fn G:569 LG pal.b[10135] f:=fn(i,f)
fn G:569 LG pal.b[10148] f:=fn(i,f)
fn G:569 LG pal.b[9693] n:=fn(d2,h3!d)
fn G:569 LG pal.b[9715] RESULTIS fn(d,n)
fn G:569 LLG pal.b[8253] a_fclos:=du("lambda",s_code2,...,s_fclos)
fr_callbcpl M:3 DEF palhdr.h[227] fr_callbcpl=3
fr_callbcpl M:3 MAN pal.b[6685] (@f+fr_callbcpl)!i:=buffp!i
fr_gc M:12 DEF palhdr.h[228] fr_gc=12
fr_gc M:12 MAN pal.b[4496] @p+fr_gc,3,0,0
fr_gc M:12 MAN pal.b[4497] (fr_gc-1)!@p:=0
fr_s M:64 DEF palhdr.h[229] fr_s=64
fr_s M:64 MAN pal.b[4291] n:=n+@n+fr_s&~3
fr_s M:64 MAN pal.b[4293] IF n>=@n+fr_s DO ..
fr_s M:64 MAN pal.b[4302] stackl:=st1-fr_s
frag G:409 DEF palhdr.h[499] frag=
freeobj G:78 DEF libhdr.h[93] freeobj=78
freevec G:27 DEF libhdr.h[42] freevec=27
function G:541 DEF palhdr.h[647] function=
function G:541 FN pal.b[6807] LET function(a)=..
function G:541 LLG pal.b[8367] set_v("FUNCTION",@function)
fvaru M:1073741824 DEF pal.b[3072] fvaru=signbit>>1
fvaru M:1073741824 MAN pal.b[3152] result2<fvaru
fvaru M:1073741824 MAN pal.b[3289] gseqf:=gseqf|fvaru
g S:8 DEF pal.b[6208] g=0
g S:8 LL pal.b[6210] g:=g-1
g S:8 LL pal.b[6218] TEST g>=y0 THEN .. ELSE ..
g S:8 SL pal.b[6210] g:=g-1
g S:8 SL pal.b[6213] g:=g_posint(n)
g0 G:0 DEF palhdr.h[251] g0=0
g0 G:0 LG pal.b[1196] TEST 80<=g0&g0<=10000 THEN .. ELSE ..
g0 G:0 LG pal.b[1197] writef("%N GL'LOCATED*n",g0)
g0 G:0 LG pal.b[1202] FOR t=1 TO g0 DO..
g0 G:0 LLG pal.b[1195] writef("*nGLOB'TOR(%N) ",@g0)
g0 G:0 LLG pal.b[1202] UNLESS @g0!t=globword+(t<<2) DO ..
g0 G:0 LLG pal.b[1203] writef("%ZG%I4 %A",12,t,...)
g0 G:0 LLG pal.b[5276] sadd(@g0!n)
g0 G:0 LLG pal.b[5280] @g0!n1:=@g0!n2
g0 G:0 LLG pal.b[5281] writef("*n# Gl't to %A*n",n2,...!n2)
g0 G:0 LLG pal.b[6650] @g0!(n-y0)
g0 G:0 LLG pal.b[6662] @g0!(n-y0)
g0 G:0 LLG pal.b[6667] @g0!(n-y0)
g0 G:0 LLG pal.b[6672] @g0!(n-y0)
g0 G:0 LLG pal.b[8081] FOR i=@error TO @g0+maxglob DO..
g0 G:0 LLG pal.b[8085] buffp!buffl:=@g0<<2
g0 G:0 LLG pal.b[9074] (@g0!t)()
g0 G:0 SG pal.b[1198] g0:=400
g3s F:2 FN pal.b[7973] LET g3s(f,g)=..
g3s F:2 LF pal.b[7982] g1:=g3s(g1,g2)
g3s F:2 LF pal.b[7989] g1:=g3s(g1,g2)
g_colist M:8 DEF libhdr.h[191] g_colist=8
g_currco M:7 DEF libhdr.h[190] g_currco=7
g_get F:86 FN pal.b[6586] LET g_get(r,s1,s2)=..
g_get F:86 LF pal.b[6580] g_get(findinput,s,zero)
g_get F:86 LF pal.b[6583] g_get(inputmember,s1,s2)
g_globsize M:0 DEF libhdr.h[188] g_globsize=0
g_load G:389 DEF palhdr.h[475] g_load=
g_load G:389 FN pal.b[9151] LET g_load(s1,s2)=..
g_load G:389 LG pal.b[9069] g_load("PALDD","PALSYS")
g_load G:389 LLG pal.b[8352] set_f("LOAD",@g_load)
g_np G:394 DEF palhdr.h[481] g_np=
g_np G:394 FN pal.b[6411] LET g_np(a,t)=..
g_np G:394 LG pal.b[6620] e:=g_np(e,s_e)
g_np G:394 LG pal.b[6630] UNLESS e>=yloc&g_np(e,s_e)~=z DO ..
g_np G:394 LG pal.b[7536] p:=g_np(p,s_poly)
g_nt G:395 DEF palhdr.h[482] g_nt=
g_nt G:395 FN pal.b[6419] LET g_nt(a,n)=..
g_nt G:395 LG pal.b[2084] arg1:=g_nt(arg1,y3)
g_nt G:395 LG pal.b[2090] arg1:=g_nt(arg1,y0+4)
g_posint G:393 DEF palhdr.h[480] g_posint=
g_posint G:393 FN pal.b[6401] LET g_posint(n)=..
g_posint G:393 LG pal.b[1396] FOR i=y1 TO g_posint(n) DO..
g_posint G:393 LG pal.b[6213] g:=g_posint(n)
g_posint G:393 LG pal.b[7521] n:=g_posint(n)
g_rootnode M:9 DEF libhdr.h[192] g_rootnode=9
g_sys M:3 DEF libhdr.h[189] g_sys=3
g_unload G:390 DEF palhdr.h[476] g_unload=
g_unload G:390 FN pal.b[9159] LET g_unload(s)=..
g_unload G:390 LG pal.b[8980] g_unload("SETUP")
g_unload G:390 LLG pal.b[8356] set_f("UNLOAD",@g_unload)
ga0 S:223 DEF pal.b[5233] ga0=0
ga0 S:223 LL pal.b[5248] IF ga0=1 DO ..
ga0 S:223 LL pal.b[5251] UNLESS (ga0&1)=0 DO ..
ga0 S:223 LL pal.b[5253] IF ga0=1 DO ..
ga0 S:223 LL pal.b[5255] ga0:=ga0>>1
ga0 S:223 SL pal.b[5245] ga0:=y0-b
ga0 S:223 SL pal.b[5247] ga0:=b-y0
ga0 S:223 SL pal.b[5255] ga0:=ga0>>1
ga1 S:1 DEF pal.b[6915] ga1=0
ga1 S:2 DEF pal.b[4736] ga1=0
ga1 S:2 DEF pal.b[78] ga1=0
ga1 S:2 LL pal.b[117] a:=smul(h2!a,.../ga1+y0)
ga1 S:2 LL pal.b[118] u:=(u+ny0)/ga1+y0
ga1 S:2 LL pal.b[124] UNLESS ga1=1 DO ..
ga1 S:2 LL pal.b[126] ga1:=igcd(a+ny0,ga1)
ga1 S:2 LL pal.b[127] a:=(a+ny0)/ga1+y0
ga1 S:2 LL pal.b[128] ga1:=gcd1(a,ga1+y0)
ga1 S:2 LL pal.b[129] a:=longdiv1(a,ga1+y0)
ga1 S:2 LL pal.b[130] v:=(v+ny0)/ga1+y0
ga1 S:2 LL pal.b[244] a:=smul(h2!a,.../ga1+y0)
ga1 S:2 LL pal.b[245] u:=(u+ny0)/ga1+y0
ga1 S:2 LL pal.b[251] UNLESS ga1=1 DO ..
ga1 S:2 LL pal.b[253] ga1:=igcd(a+ny0,ga1)
ga1 S:2 LL pal.b[254] a:=(a+ny0)/ga1+y0
ga1 S:2 LL pal.b[255] ga1:=gcd1(a,ga1+y0)
ga1 S:2 LL pal.b[256] a:=longdiv1(a,ga1+y0)
ga1 S:2 LL pal.b[257] v:=(v+ny0)/ga1+y0
ga1 S:2 LL pal.b[4765] a:=smul(.../ga1+y0,h2!b)
ga1 S:2 LL pal.b[4766] b:=(h1!b+ny0)/ga1+y0
ga1 S:2 LL pal.b[4779] a:=longdiv1(a,ga1+y0)
ga1 S:2 LL pal.b[4783] b:=(h1!b+ny0)/ga1+y0
ga1 S:2 LL pal.b[4798] a:=smul(.../ga1+y0,.../ga2+y0)
ga1 S:2 LL pal.b[4799] b:=smul(.../ga2+y0,.../ga1+y0)
ga1 S:2 LL pal.b[4872] ga3:=ga1MODga2
ga1 S:2 LL pal.b[4874] RESULTIS ga1/ga2+y0
ga1 S:2 LL pal.b[4880] RESULTIS get4(s_ratn,...+y0,...,0)
ga1 S:2 LL pal.b[4892] RESULTIS ga1
ga1 S:2 LL pal.b[4895] ga1:=-ga1
ga1 S:2 LL pal.b[4896] UNLESS ga1=1 DO ..
ga1 S:2 LL pal.b[4897] b:=(b+ny0)/ga1+y0
ga1 S:2 LL pal.b[4898] a:=longdiv1(a,ga1+y0)
ga1 S:2 LL pal.b[4914] ga1:=-ga1
ga1 S:2 LL pal.b[4915] UNLESS ga1=1 DO ..
ga1 S:2 LL pal.b[4916] a:=(a+ny0)/ga1+y0
ga1 S:2 LL pal.b[4917] b:=longdiv1(b,ga1+y0)
ga1 S:2 LL pal.b[4955] ga1:=-ga1
ga1 S:2 LL pal.b[4956] b:=smul(h1!a,.../ga1+y0)
ga1 S:2 LL pal.b[4957] a:=(h2!a+ny0)/ga1+y0
ga1 S:2 LL pal.b[4972] ga1:=-ga1
ga1 S:2 LL pal.b[4973] a:=smul(.../ga1+y0,h1!b)
ga1 S:2 LL pal.b[4974] b:=(h2!b+ny0)/ga1+y0
ga1 S:2 LL pal.b[4991] ga1:=-ga1
ga1 S:2 LL pal.b[4992] b:=longdiv1(b,ga1+y0)
ga1 S:2 LL pal.b[4996] a:=(h2!a+ny0)/ga1+y0
ga1 S:2 LL pal.b[5009] ga1:=-ga1
ga1 S:2 LL pal.b[5010] a:=longdiv1(a,ga1+y0)
ga1 S:2 LL pal.b[5014] b:=(h2!b+ny0)/ga1+y0
ga1 S:2 LL pal.b[5033] ga1:=-ga1
ga1 S:2 LL pal.b[5034] b:=smul(.../ga1+y0,.../ga2+y0)
ga1 S:2 LL pal.b[5035] a:=smul(.../ga2+y0,.../ga1+y0)
ga1 S:2 LL pal.b[5097] RESULTIS ga1
ga1 S:2 SL pal.b[116] ga1:=igcd(u+ny0,v+ny0)
ga1 S:2 SL pal.b[126] ga1:=igcd(a+ny0,ga1)
ga1 S:2 SL pal.b[128] ga1:=gcd1(a,ga1+y0)
ga1 S:2 SL pal.b[243] ga1:=igcd(u+ny0,v+ny0)
ga1 S:2 SL pal.b[253] ga1:=igcd(a+ny0,ga1)
ga1 S:2 SL pal.b[255] ga1:=gcd1(a,ga1+y0)
ga1 S:2 SL pal.b[4764] ga1:=igcd(a+ny0,h1!b+ny0)
ga1 S:2 SL pal.b[4778] ga1:=gcd1(a,h1!b)
ga1 S:2 SL pal.b[4796] ga1:=igcd(h2!a+ny0,h1!b+ny0)
ga1 S:2 SL pal.b[4869] ga1,ga2:=a+ny0,b+ny0
ga1 S:2 SL pal.b[4890] ga1:=longdiv1(a,b)
ga1 S:2 SL pal.b[4893] ga1:=igcd(b+ny0,result2)
ga1 S:2 SL pal.b[4895] ga1:=-ga1
ga1 S:2 SL pal.b[4912] ga1:=gcd1(b,a)
ga1 S:2 SL pal.b[4914] ga1:=-ga1
ga1 S:2 SL pal.b[4953] ga1:=igcd(h2!a+ny0,b+ny0)
ga1 S:2 SL pal.b[4955] ga1:=-ga1
ga1 S:2 SL pal.b[4970] ga1:=igcd(a+ny0,h2!b+ny0)
ga1 S:2 SL pal.b[4972] ga1:=-ga1
ga1 S:2 SL pal.b[4989] ga1:=gcd1(b,h2!a)
ga1 S:2 SL pal.b[4991] ga1:=-ga1
ga1 S:2 SL pal.b[5007] ga1:=gcd1(a,h2!b)
ga1 S:2 SL pal.b[5009] ga1:=-ga1
ga1 S:2 SL pal.b[5030] ga1:=igcd(h2!a+ny0,t+ny0)
ga1 S:2 SL pal.b[5033] ga1:=-ga1
ga1 S:2 SL pal.b[5095] ga1:=divpoly(a,b)
ga1 S:56 DEF pal.b[7415] ga1=0
ga1 S:56 LL pal.b[7438] IF ga1>q DO ..
ga1 S:56 LL pal.b[7440] IF ga1<q DO ..
ga1 S:56 LL pal.b[7442] IF ga1=y0 DO ..
ga1 S:56 LL pal.b[7444] RESULTIS ga1>y0
ga1 S:56 LL pal.b[7446] IF p>ga1 DO ..
ga1 S:56 LL pal.b[7448] IF p<ga1 DO ..
ga1 S:56 LL pal.b[7460] ga1/ga2-ga3/ga4
ga1 S:56 LL pal.b[7465] ga1:=muldiv(ga1,ga4,numba)
ga1 S:56 LL pal.b[7468] IF ga1=ga2 DO ..
ga1 S:56 LL pal.b[7470] RESULTIS ga1>ga2
ga1 S:56 SL pal.b[7437] ga1:=(h2!p-y0)/(h1!p-y0)+y0
ga1 S:56 SL pal.b[7445] ga1:=(h2!q-y0)/(h1!q-y0)+y0
ga1 S:56 SL pal.b[7458] ga1,ga2:=h2!p-y0,h1!p-y0
ga1 S:56 SL pal.b[7465] ga1:=muldiv(ga1,ga4,numba)
ga2 S:2 DEF pal.b[6916] ga2=0
ga2 S:3 DEF pal.b[4737] ga2=0
ga2 S:3 DEF pal.b[79] ga2=0
ga2 S:3 LL pal.b[4798] a:=smul(.../ga1+y0,.../ga2+y0)
ga2 S:3 LL pal.b[4799] b:=smul(.../ga2+y0,.../ga1+y0)
ga2 S:3 LL pal.b[4870] IF ga2=0 DO ..
ga2 S:3 LL pal.b[4872] ga3:=ga1MODga2
ga2 S:3 LL pal.b[4874] RESULTIS ga1/ga2+y0
ga2 S:3 LL pal.b[4877] ga3:=igcd(ga2,ga3)
ga2 S:3 LL pal.b[4878] IF ga2<0 DO ..
ga2 S:3 LL pal.b[4880] RESULTIS get4(s_ratn,...+y0,...,0)
ga2 S:3 LL pal.b[5034] b:=smul(.../ga1+y0,.../ga2+y0)
ga2 S:3 LL pal.b[5035] a:=smul(.../ga2+y0,.../ga1+y0)
ga2 S:3 SL pal.b[4797] ga2:=igcd(t+ny0,h2!b+ny0)
ga2 S:3 SL pal.b[4869] ga1,ga2:=a+ny0,b+ny0
ga2 S:3 SL pal.b[5031] ga2:=igcd(h1!a+ny0,h1!b+ny0)
ga2 S:57 DEF pal.b[7416] ga2=0
ga2 S:57 LL pal.b[7460] ga1/ga2-ga3/ga4
ga2 S:57 LL pal.b[7467] ga2:=muldiv(ga2,ga3,numba)
ga2 S:57 LL pal.b[7468] IF ga1=ga2 DO ..
ga2 S:57 LL pal.b[7470] RESULTIS ga1>ga2
ga2 S:57 SL pal.b[7458] ga1,ga2:=h2!p-y0,h1!p-y0
ga2 S:57 SL pal.b[7467] ga2:=muldiv(ga2,ga3,numba)
ga3 S:3 DEF pal.b[6917] ga3=0
ga3 S:4 DEF pal.b[4738] ga3=0
ga3 S:4 DEF pal.b[80] ga3=0
ga3 S:4 LL pal.b[4873] IF ga3=0 DO ..
ga3 S:4 LL pal.b[4877] ga3:=igcd(ga2,ga3)
ga3 S:4 LL pal.b[4879] ga3:=-ga3
ga3 S:4 LL pal.b[4880] RESULTIS get4(s_ratn,...+y0,...,0)
ga3 S:4 SL pal.b[4872] ga3:=ga1MODga2
ga3 S:4 SL pal.b[4876] ga3:=1
ga3 S:4 SL pal.b[4877] ga3:=igcd(ga2,ga3)
ga3 S:4 SL pal.b[4879] ga3:=-ga3
ga3 S:58 DEF pal.b[7417] ga3=0
ga3 S:58 LL pal.b[7460] ga1/ga2-ga3/ga4
ga3 S:58 LL pal.b[7467] ga2:=muldiv(ga2,ga3,numba)
ga3 S:58 SL pal.b[7459] ga3,ga4:=h2!q-y0,h1!q-y0
ga4 S:4 DEF pal.b[6918] ga4=0
ga4 S:5 DEF pal.b[4739] ga4=0
ga4 S:5 DEF pal.b[81] ga4=0
ga4 S:59 DEF pal.b[7418] ga4=0
ga4 S:59 LL pal.b[7460] ga1/ga2-ga3/ga4
ga4 S:59 LL pal.b[7465] ga1:=muldiv(ga1,ga4,numba)
ga4 S:59 LL pal.b[7469] RESULTIS ga4>result2
ga4 S:59 SL pal.b[7459] ga3,ga4:=h2!q-y0,h1!q-y0
ga4 S:59 SL pal.b[7466] ga4:=result2
gc1 S:1 DEF pal.b[4215] gc1=0
gc1 S:1 LL pal.b[4442] IF gc1<=r&r<st1 DO ..
gc1 S:1 SL pal.b[4329] stackp,w,gc1:=0,0,st1
gcd1 G:631 DEF palhdr.h[749] gcd1=
gcd1 G:631 FN pal.b[7095] LET gcd1(a,n)=..
gcd1 G:631 LG pal.b[128] ga1:=gcd1(a,ga1+y0)
gcd1 G:631 LG pal.b[255] ga1:=gcd1(a,ga1+y0)
gcd1 G:631 LG pal.b[4778] ga1:=gcd1(a,h1!b)
gcd1 G:631 LG pal.b[4912] ga1:=gcd1(b,a)
gcd1 G:631 LG pal.b[4989] ga1:=gcd1(b,h2!a)
gcd1 G:631 LG pal.b[5007] ga1:=gcd1(a,h2!b)
gcd1 G:631 LG pal.b[7022] RESULTIS gcd1(b,a)+y0
gcda G:534 DEF palhdr.h[639] gcda=
gcda G:534 FN pal.b[7017] LET gcda(a,b)=..
gcda G:534 LG pal.b[149] gcda(u,v)
gcda G:534 LG pal.b[161] d:=gcda(a,d)
gcda G:534 LG pal.b[282] gcda(u,v)
gcda G:534 LG pal.b[294] d:=gcda(a,d)
gcda G:534 LLG pal.b[8309] set_c("GCD",@gcda)
genglo G:512 DEF palhdr.h[616] genglo=
genglo G:512 FN pal.b[6896] LET genglo(n,v)=..
genglo G:512 LG pal.b[6898] msg1(16,genglo,n)
genglo G:512 LLG pal.b[8358] set_c("GENGLO",@genglo)
gensym G:513 DEF palhdr.h[617] gensym=
gensym G:513 FN pal.b[6885] LET gensym()=..
gensym G:513 LG pal.b[355] v:=gensym()
gensym G:513 LLG pal.b[8244] typ!s_gensy:=d("GENSYM",s_code0,@gensym)
gensymn G:405 DEF palhdr.h[495] gensymn=
gensymn G:405 LG pal.b[6886] gensymn:=gensymn+1
gensymn G:405 LG pal.b[6887] RESULTIS get4(s_gensy,0,gensymn,0)
gensymn G:405 SG pal.b[6886] gensymn:=gensymn+1
gensymn G:405 SG pal.b[8060] gensymn,algn:=y0,y0
get4 G:544 DEF palhdr.h[651] get4=
get4 G:544 FN pal.b[4370] LET get4(a,b,c,d)=..
get4 G:544 LG pal.b[10008] RESULTIS get4(sg,f,b,...)
get4 G:544 LG pal.b[10021] RESULTIS get4(sg,e,v,f)
get4 G:544 LG pal.b[10160] RESULTIS get4(s_colon,a,b,b1)
get4 G:544 LG pal.b[10172] e:=get4(sg,e,f2,z)
get4 G:544 LG pal.b[10174] e:=get4(s_colon,h1!f,e,...)
get4 G:544 LG pal.b[10200] a:=get4(sg,a,b2,c2)
get4 G:544 LG pal.b[10202] a:=get4(s_colon,h1!b,a,...)
get4 G:544 LG pal.b[10205] a:=get4(s_colon,h1!c,a,...)
get4 G:544 LG pal.b[10216] h2!b:=get4(s_colon,a,...,0)
get4 G:544 LG pal.b[10218] b:=get4(s_colon,a,b,0)
get4 G:544 LG pal.b[10219] b:=get4(s_mb,!gseq,b,0)
get4 G:544 LG pal.b[10232] h2!a:=get4(s_seq,h2!a,b,0)
get4 G:544 LG pal.b[10235] h2!b:=get4(s_seq,a,...,0)
get4 G:544 LG pal.b[10237] a:=get4(s_seq,a,b,0)
get4 G:544 LG pal.b[10238] a:=get4(s_mb,!gseq,a,0)
get4 G:544 LG pal.b[10246] a:=get4(s_seq,z,a,0)
get4 G:544 LG pal.b[10256] h2!a:=get4(s_cond,h2!a,b,c)
get4 G:544 LG pal.b[10264] h2!b:=get4(s_cond,a,...,c)
get4 G:544 LG pal.b[10267] h2!c:=get4(s_cond,a,b,...)
get4 G:544 LG pal.b[10269] a:=get4(s_cond,a,b,c)
get4 G:544 LG pal.b[10270] a:=get4(s_mb,!gseq,a,0)
get4 G:544 LG pal.b[108] RESULTIS get4(sg,h1!b,a,0)
get4 G:544 LG pal.b[113] RESULTIS get4(s_ratl,h1!b,a,0)
get4 G:544 LG pal.b[137] RESULTIS get4(sg,u,a,0)
get4 G:544 LG pal.b[1436] r:=get4(s_poly,zsy,...,...)
get4 G:544 LG pal.b[1439] t:=get4(s_polyj,zsy,...)+(p1&ysg)
get4 G:544 LG pal.b[1458] get4(s_polyj,z,y1,...)
get4 G:544 LG pal.b[1459] t:=get4(s_poly,t,...)+(p1&ysg)
get4 G:544 LG pal.b[146] RESULTIS get4(!b,h1!b,a,...)
get4 G:544 LG pal.b[170] RESULTIS get4(s_ratp,u,a,...)
get4 G:544 LG pal.b[172] RESULTIS get4(sg,u,a,0)
get4 G:544 LG pal.b[1758] arg1:=get4(!c,e,...,...)
get4 G:544 LG pal.b[1761] e:=get4(s_e,e,zsy,...)
get4 G:544 LG pal.b[1762] f,m,c:=get4(m,...)+yfj,s_mmf2r,h1!c
get4 G:544 LG pal.b[1765] e:=get4(s_e,e,zsy,...)
get4 G:544 LG pal.b[1772] f,m,c:=get4(m,...)+yfj,s_mms,h1!c
get4 G:544 LG pal.b[1784] f,m,c:=get4(m,...)+yfj,s_mmal,h1!c
get4 G:544 LG pal.b[1796] f,m,c:=get4(m,...)+yfj,s_mma1,h2!c
get4 G:544 LG pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[1805] e:=get4(s_e,h1!c,arg1,...)
get4 G:544 LG pal.b[1810] f,m,c:=get4(m,...)+yfj,s_mmf1,h2!c
get4 G:544 LG pal.b[1814] f,m,c:=get4(m,...)+yfj,s_mmf1a,h2!c
get4 G:544 LG pal.b[1818] f,m,c:=get4(m,...)+yfj,s_mma2l,h2!h1!c1
get4 G:544 LG pal.b[1822] f,m,c:=get4(m,...)+yfj,s_mmf2l,h2!h1!c1
get4 G:544 LG pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[1850] e:=get4(s_e,h1!c,a2,...)
get4 G:544 LG pal.b[1851] e:=get4(s_e,e,arg1,...)
get4 G:544 LG pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[1874] f,m,c:=get4(m,...)+yfj,s_mmaa,h2!c
get4 G:544 LG pal.b[1876] f,m,c:=get4(m,...)+yfj,s_mmt,h2!c
get4 G:544 LG pal.b[1879] f,m,c:=get4(m,...)+yfj,s_mmaq,h2!c
get4 G:544 LG pal.b[1897] f,m,c:=get4(m,...)+yfj,s_mmcond,h1!c
get4 G:544 LG pal.b[1909] f,m,c:=get4(m,...)+yfj,s_mmlet,h3!c
get4 G:544 LG pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[1926] e:=get4(s_e,e,arg1,...)
get4 G:544 LG pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
get4 G:544 LG pal.b[1934] get4(s_e,ze,zsy,z)
get4 G:544 LG pal.b[1935] get4(s_kclos,e1,j,...)
get4 G:544 LG pal.b[1936] e:=get4(s_e,e,a,...)
get4 G:544 LG pal.b[1942] f,m:=get4(m,...)+yfj,s_mmf2r
get4 G:544 LG pal.b[1982] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2036] e:=get4(s_e,ze,arg1,...)
get4 G:544 LG pal.b[2108] f,m:=get4(m,...)+yfj,s_mmal
get4 G:544 LG pal.b[2138] h1!c:=get4(s_tuple,h1!c,arg1,c31)
get4 G:544 LG pal.b[2191] arg1:=get4(s_jclos,z,c,arg1)
get4 G:544 LG pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2207] e:=get4(s_e,h1!c,arg1,...)
get4 G:544 LG pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[222] RESULTIS get4(sg,h1!a,b,0)
get4 G:544 LG pal.b[2259] arg1:=get4(s_tuple,z,arg1,y1)
get4 G:544 LG pal.b[2260] arg1:=get4(s_tuple,t,arg1,...)
get4 G:544 LG pal.b[2273] arg1:=get4(s_tuple,z,arg1,y1)
get4 G:544 LG pal.b[2274] arg1:=get4(s_tuple,t,arg1,...)
get4 G:544 LG pal.b[2280] f:=get4(!f,...,...)+yfj
get4 G:544 LG pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2306] e:=get4(s_e,h1!c,arg1,...)
get4 G:544 LG pal.b[231] RESULTIS get4(sg,h1!b,a,0)
get4 G:544 LG pal.b[2331] f:=get4(!f,...,...)+yfj
get4 G:544 LG pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[2346] e:=get4(s_e,h1!c,v,...)
get4 G:544 LG pal.b[2347] e:=get4(s_e,e,arg1,...)
get4 G:544 LG pal.b[2358] f:=get4(!f,...,...)+yfj
get4 G:544 LG pal.b[236] RESULTIS get4(s_ratl,h1!a,b,0)
get4 G:544 LG pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
get4 G:544 LG pal.b[240] RESULTIS get4(s_ratl,h1!b,a,0)
get4 G:544 LG pal.b[2420] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2445] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2450] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2455] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2460] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2473] gw0:=get4(s_tuple,h2!f,arg1,...)
get4 G:544 LG pal.b[2476] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2481] gw0:=get4(s_tuple,z,arg1,y1)
get4 G:544 LG pal.b[2482] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2488] arg1:=get4(s_tuple,h2!f,arg1,...)
get4 G:544 LG pal.b[2498] arg1:=get4(s_tuple,z,arg1,y1)
get4 G:544 LG pal.b[2505] arg1:=get4(!arg1,e,...,...)
get4 G:544 LG pal.b[2511] arg1:=get4(!arg1,h1!arg1,e,...)
get4 G:544 LG pal.b[2529] arg1:=get4(s_loc,arg1,...)+yloc
get4 G:544 LG pal.b[2536] e:=get4(s_e,e,arg1,...)
get4 G:544 LG pal.b[2551] e:=get4(s_e,e,...,...)
get4 G:544 LG pal.b[2556] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2571] e:=get4(s_e,e,...,...)
get4 G:544 LG pal.b[2578] e:=get4(s_e,e,arg1,...)
get4 G:544 LG pal.b[2586] e:=get4(s_e,t,v,...)
get4 G:544 LG pal.b[2587] e:=get4(s_e,e,arg1,...)
get4 G:544 LG pal.b[264] RESULTIS get4(sg,u,a,0)
get4 G:544 LG pal.b[2663] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2676] arg1:=get4(s_tuple,z,t,y1)
get4 G:544 LG pal.b[2682] arg1:=get4(s_tuple,arg1,t,...)
get4 G:544 LG pal.b[2698] h2!f:=get4(s_tuple,z,t,y1)
get4 G:544 LG pal.b[2699] s:=get4(s_tuple,z,t,y1)
get4 G:544 LG pal.b[2700] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2707] h2!f:=get4(s_tuple,s,t,...)
get4 G:544 LG pal.b[2708] s:=get4(s_tuple,s,t,...)
get4 G:544 LG pal.b[2709] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2728] e:=get4(s_e,e,zsy,...)
get4 G:544 LG pal.b[2754] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
get4 G:544 LG pal.b[2763] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
get4 G:544 LG pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
get4 G:544 LG pal.b[2781] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
get4 G:544 LG pal.b[2791] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
get4 G:544 LG pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
get4 G:544 LG pal.b[279] RESULTIS get4(!b,h1!b,a,...)
get4 G:544 LG pal.b[2808] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
get4 G:544 LG pal.b[2813] e:=get4(s_e,ze,arg1,...)
get4 G:544 LG pal.b[2818] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
get4 G:544 LG pal.b[2821] e:=get4(s_e,ze,arg1,...)
get4 G:544 LG pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
get4 G:544 LG pal.b[2828] e:=get4(s_e,ze,arg1,...)
get4 G:544 LG pal.b[2835] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
get4 G:544 LG pal.b[2845] f:=get4(s_mmcf,f,...)+yfj
get4 G:544 LG pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
get4 G:544 LG pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
get4 G:544 LG pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
get4 G:544 LG pal.b[2869] f:=get4(s_mmcf,...,...)+yfj
get4 G:544 LG pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
get4 G:544 LG pal.b[2969] get4(!a,e,...,...)
get4 G:544 LG pal.b[2973] e:=get4(s_e,e,zsy,...)
get4 G:544 LG pal.b[3023] p:=get4(s_tuple,p,b,l)
get4 G:544 LG pal.b[303] RESULTIS get4(s_ratp,u,a,...)
get4 G:544 LG pal.b[3049] e:=get4(s_e,e,zsy,...)
get4 G:544 LG pal.b[305] RESULTIS get4(sg,u,a,0)
get4 G:544 LG pal.b[3162] RESULTIS get4(ll,c,a1,a2)
get4 G:544 LG pal.b[3281] c:=get4(s_cd,c,zsy,ll)
get4 G:544 LG pal.b[3282] c:=get4(s_cd,c,...,ll_glz)
get4 G:544 LG pal.b[3320] get4(s_mb,f,zsy,z)
get4 G:544 LG pal.b[3321] c:=get4(s_cd,c,n,l)
get4 G:544 LG pal.b[3325] c:=get4(s_cd,c,n,l)
get4 G:544 LG pal.b[3335] c:=get4(s_cd,c,z,ll_st)
get4 G:544 LG pal.b[3341] c:=get4(s_cd,c,z,ll_st)
get4 G:544 LG pal.b[3342] c:=get4(s_cd,c,...,ll_rec1)
get4 G:544 LG pal.b[3349] c:=get4(s_cd,c,z,ll_st)
get4 G:544 LG pal.b[3350] c:=get4(s_cd,c,...,ll_dash)
get4 G:544 LG pal.b[3356] c:=get4(s_cd,c,z,ll_st)
get4 G:544 LG pal.b[3357] c:=get4(s_cd,c,z,ll_rsc)
get4 G:544 LG pal.b[3362] c:=get4(s_cd,c,...,ll_bind)
get4 G:544 LG pal.b[3363] c:=get4(s_cd,c,z,ll_svc)
get4 G:544 LG pal.b[3392] c:=get4(s_cd,c,v,ll)
get4 G:544 LG pal.b[3403] c:=get4(s_cd,c,v,ll)
get4 G:544 LG pal.b[3438] c:=get4(s_cd,c,v,l)
get4 G:544 LG pal.b[3439] c:=get4(s_cd,c,...,ll)
get4 G:544 LG pal.b[3451] c:=get4(s_cd,c,z,ll)
get4 G:544 LG pal.b[3452] get4(s_mb,f,zsy,z)
get4 G:544 LG pal.b[3459] c:=get4(s_cd,c,z,ll_st)
get4 G:544 LG pal.b[3460] c:=get4(s_cd,c,...,ll_ap1)
get4 G:544 LG pal.b[3465] c:=get4(s_cd,c,z,ll_st)
get4 G:544 LG pal.b[3478] c:=get4(s_cd,c,a3,ll)
get4 G:544 LG pal.b[3507] c:=get4(s_cd,c,a3,ll)
get4 G:544 LG pal.b[3508] get4(s_mb,f,zsy,z)
get4 G:544 LG pal.b[3517] c:=get4(s_cd,c,z,ll_st)
get4 G:544 LG pal.b[3523] get4(!a,h1!a,...,...)
get4 G:544 LG pal.b[3524] get4(s_cd,zsy,zsy,ll_cond)
get4 G:544 LG pal.b[3525] !a,h1!a,h2!a,h3!a:=s_mb,!gseqf,n,get4(...)
get4 G:544 LG pal.b[3546] RESULTIS get4(s_cd,c,a,ll)
get4 G:544 LG pal.b[3558] RESULTIS get4(s_cd,c,z,ll_st)
get4 G:544 LG pal.b[3566] RESULTIS get4(s_cd,t1,t2,ll_cond)
get4 G:544 LG pal.b[3570] RESULTIS get4(s_cd,t1,...,...)
get4 G:544 LG pal.b[3603] c:=get4(s_cd,c,...,ll)
get4 G:544 LG pal.b[3610] c:=get4(s_cd,c,z,ll_bvf1)
get4 G:544 LG pal.b[3615] c:=get4(s_cd,c,z,ll_bvfz)
get4 G:544 LG pal.b[3619] c:=get4(s_cd,c,b2,ll_bvfe)
get4 G:544 LG pal.b[3621] c:=get4(s_cd,c,z,ll_bvf)
get4 G:544 LG pal.b[3624] RESULTIS get4(s_cd,c,z,ll_bvfa)
get4 G:544 LG pal.b[3629] RESULTIS get4(s_cd,c,...,ll)
get4 G:544 LG pal.b[3633] RESULTIS get4(s_cd,c,b,ll_binde)
get4 G:544 LG pal.b[3658] RESULTIS get4(s_mb,e,zsy,v)
get4 G:544 LG pal.b[4772] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[4789] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[4805] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[4811] RESULTIS get4(s_ratl,h1!b,a,0)
get4 G:544 LG pal.b[4822] RESULTIS get4(s_ratl,b,c,0)
get4 G:544 LG pal.b[4836] RESULTIS get4(s_ratp,h1!b,a,...)
get4 G:544 LG pal.b[4847] RESULTIS get4(s_ratp,c,a,...)
get4 G:544 LG pal.b[4880] RESULTIS get4(s_ratn,...+y0,...,0)
get4 G:544 LG pal.b[4889] RESULTIS get4(s_ratl,b,a,0)
get4 G:544 LG pal.b[4904] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[4909] RESULTIS get4(s_ratl,b,a,0)
get4 G:544 LG pal.b[4921] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[4926] RESULTIS get4(s_ratl,b,a,0)
get4 G:544 LG pal.b[4938] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[4961] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[4980] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[5000] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[5020] RESULTIS get4(sg,b,a,0)
get4 G:544 LG pal.b[5041] RESULTIS get4(sg,a,b,0)
get4 G:544 LG pal.b[5054] RESULTIS get4(s_ratl,b,a,0)
get4 G:544 LG pal.b[5066] RESULTIS get4(s_ratl,b,a,0)
get4 G:544 LG pal.b[5080] RESULTIS get4(s_ratl,b,c,0)
get4 G:544 LG pal.b[5107] RESULTIS get4(s_ratp,b,a,...)
get4 G:544 LG pal.b[5112] RESULTIS get4(s_ratp,b,a,...)
get4 G:544 LG pal.b[5128] RESULTIS get4(s_ratp,b,a,...)
get4 G:544 LG pal.b[5130] RESULTIS get4(s_ratp,a1,a,...)
get4 G:544 LG pal.b[5159] RESULTIS get4(s_ratp,b2,b,...)
get4 G:544 LG pal.b[5162] RESULTIS get4(s_ratp,h1!a,b,...)
get4 G:544 LG pal.b[5600] RESULTIS get4(s_rds,0,n,0)
get4 G:544 LG pal.b[5607] RESULTIS get4(s_wrs,0,n,0)
get4 G:544 LG pal.b[6311] a:=get4(-n,a,a2,a3)
get4 G:544 LG pal.b[6312] c0!g:=get4(s_name,z,a,z)
get4 G:544 LG pal.b[6333] c0!g:=get4(s_name,z,b,z)
get4 G:544 LG pal.b[6427] p>=yloc->p,get4(s_loc,...)+yloc
get4 G:544 LG pal.b[6522] RESULTIS get4(s_tuple,z,q,y1)
get4 G:544 LG pal.b[6525] RESULTIS get4(s_tuple,p,q,...)
get4 G:544 LG pal.b[6530] RESULTIS get4(s_tuple,p,q,y1)
get4 G:544 LG pal.b[6565] q,l,p:=get4(s_tuple,q,...),l+1,h1!p
get4 G:544 LG pal.b[6616] get4(s_xtupl,z,p,y0)
get4 G:544 LG pal.b[6633] h1!e:=get4(s_e,h1!e,v,n)
get4 G:544 LG pal.b[6658] RESULTIS get4(s,0,...,...)
get4 G:544 LG pal.b[6663] RESULTIS get4(s_bcplf,0,...,...)
get4 G:544 LG pal.b[6668] RESULTIS get4(s_bcplr,0,...,...)
get4 G:544 LG pal.b[6673] RESULTIS get4(s_bcplv,0,...,...)
get4 G:544 LG pal.b[6887] RESULTIS get4(s_gensy,0,gensymn,0)
get4 G:544 LG pal.b[6890] get4(s_gensy,0,n,0)
get4 G:544 LG pal.b[6899] RESULTIS get4(s_glg,n,v,z)
get4 G:544 LG pal.b[6937] RESULTIS get4(s_ratn,h1!p,...,0)
get4 G:544 LG pal.b[6940] RESULTIS get4(!p,h1!p,t,...)
get4 G:544 LG pal.b[6977] RESULTIS get4(s_ratn,signbit-p,ym,0)
get4 G:544 LG pal.b[6980] RESULTIS get4(s_ratn,p,y1,0)
get4 G:544 LG pal.b[6988] RESULTIS get4(s_ratl,p,y1,0)
get4 G:544 LG pal.b[6989] RESULTIS get4(s_ratl,pXORysg,ym,0)
get4 G:544 LG pal.b[6996] RESULTIS get4(s_ratn,q,p,0)
get4 G:544 LG pal.b[7004] RESULTIS get4(s_ratl,q,p,0)
get4 G:544 LG pal.b[7008] RESULTIS get4(s_ratp,p,q,...)
get4 G:544 LG pal.b[7140] w:=get4(s_clos,e,z,w)
get4 G:544 LG pal.b[7144] w:=get4(s_loc,w,...)+yloc
get4 G:544 LG pal.b[7153] RESULTIS get4(s_e,k,w,v)
get4 G:544 LG pal.b[7184] f:=get4(s_mb,f,...)+yfj
get4 G:544 LG pal.b[7187] w:=get4(s_clos,e,z,w)
get4 G:544 LG pal.b[7191] w:=get4(s_loc,w,...)+yloc
get4 G:544 LG pal.b[7200] k:=get4(s_e,k,w,v)
get4 G:544 LG pal.b[7228] k:=get4(s_e,k,...,...)
get4 G:544 LG pal.b[7280] h3!a:=get4(s_tra,f,...,b)
get4 G:544 LG pal.b[7323] h1!s:=get4(s_mb,s1,b,n)
get4 G:544 LG pal.b[7326] h1!s:=get4(s_mb,z,b,n)
get4 G:544 LG pal.b[7520] get4(s_polyj,z,y1,y1)
get4 G:544 LG pal.b[7522] RESULTIS get4(s_poly,q,p,n)
get4 G:544 LG pal.b[7537] RESULTIS get4(s_poly,...,...)+(p&ysg)
get4 G:544 LG pal.b[7560] get4(s_poly,zsy,...,...)
get4 G:544 LG pal.b[7568] get4(s_polyj,zsy,...)+sg
get4 G:544 LG pal.b[7577] get4(s_polyj,zsy,...)+(q&ysg)
get4 G:544 LG pal.b[7588] f:=get4(s_polyj,zsy,...)+(p&ysg)
get4 G:544 LG pal.b[7616] get4(s_poly,zsy,...,...)
get4 G:544 LG pal.b[7625] h1!r:=get4(s_polyj,p,a,y0)
get4 G:544 LG pal.b[7642] get4(s_poly,zsy,...)+(p&ysg)
get4 G:544 LG pal.b[7646] r:=get4(s_polyj,zsy,...)+(p&ysg)
get4 G:544 LG pal.b[7662] get4(s_poly,zsy,...,...)
get4 G:544 LG pal.b[7684] t:=get4(s_polyj,r1a,t,q3)
get4 G:544 LG pal.b[7732] r:=get4(s_polyj,r,rr,k)
get4 G:544 LG pal.b[7750] u:=get4(s_poly,u,...,...)
get4 G:544 LG pal.b[7753] r:=get4(s_poly,r,...,...)
get4 G:544 LG pal.b[7797] u:=get4(s_poly,u,...,...)
get4 G:544 LG pal.b[7813] q:=get4(s_polyj,q,y0,q3)
get4 G:544 LG pal.b[7818] q:=get4(s_polyj,q,t,q3)
get4 G:544 LG pal.b[7833] q:=get4(s_polyj,q,t,zsy)
get4 G:544 LG pal.b[7863] get4(s_poly,zsy,...)+(a&ysg)
get4 G:544 LG pal.b[7868] s:=get4(s_polyj,zsy,...)+(a&ysg)
get4 G:544 LG pal.b[7871] h1!rr:=get4(s_polyj,z,...)XORrr&ysg
get4 G:544 LG pal.b[7971] get4(s,0,...,...)
get4 G:544 LG pal.b[7973] get4(s_code2,0,...,...)
get4 G:544 LG pal.b[8213] zsy:=get4(s_unset,z,y0,...)
get4 G:544 LG pal.b[8215] zu:=get4(s_mb,0,0,zsy)
get4 G:544 LG pal.b[8216] zsq:=get4(s_mb,zsy+p_tagp,...,...)
get4 G:544 LG pal.b[8217] zc:=get4(s_cd,z,z,ll_zc)
get4 G:544 LG pal.b[8218] ze:=get4(s_e,z,z,z)
get4 G:544 LG pal.b[8220] zj:=get4(s_j,ze,z,z)
get4 G:544 LG pal.b[8221] zs:=get4(s_string,z,0,0)
get4 G:544 LG pal.b[8222] zsc:=get4(s_unset1,0,0,0)
get4 G:544 LG pal.b[9799] RESULTIS get4(sg,b,a,f)
get4 G:544 LG pal.b[9810] RESULTIS get4(sg,c,a,b)
get4 G:544 LG pal.b[9820] get4(s_retu,0,a,0)
get4 G:544 LG pal.b[9823] get4(s_qu,0,a,0)
get4 G:544 LG pal.b[9836] RESULTIS get4(s_dash,a,n,difr)
get4 G:544 LG pal.b[9849] get4(s_aa,0,a,lvv)
get4 G:544 LG pal.b[9852] get4(s_zz,0,a,iv)
get4 G:544 LG pal.b[9909] h3!a:=get4(s_apz,a,b,...)
get4 G:544 LG pal.b[9930] RESULTIS get4(sg,a,b,...)
get4 G:544 LG pal.b[9938] RESULTIS get4(sg,a,b,v)
get4 G:544 LG pal.b[9946] RESULTIS get4(sg,a,b,v)
get4 G:544 LG pal.b[9961] RESULTIS get4(sg,a,b,l)
get4 G:544 LG pal.b[9971] RESULTIS get4(sg,a,b,z)
get4 G:544 LG pal.b[9985] RESULTIS get4(sg,a,b,f)
get4 G:544 LG pal.b[9992] RESULTIS get4(sg,a,b,f)
get4 G:544 LG pal.b[9999] RESULTIS get4(sg,a,b,f)
get_index_record G:73 DEF libhdr.h[88] get_index_record=73
get_record G:71 DEF libhdr.h[86] get_record=71
get_text G:93 DEF libhdr.h[109] get_text=93
get_textblib G:93 DEF libhdr.h[108] get_textblib=93
getbyte G:267 DEF palhdr.h[335] getbyte=
getbyte G:267 FN pal.b[37] LET getbyte(s,i)=..
getbyte G:267 LG pal.b[1329] getbyte(p,0),0
getbyte G:267 LG pal.b[1332] getbyte(p,i)
getbyte G:267 LG pal.b[5736] getbyte(s,i)
getbyte G:267 LG pal.b[5880] wch(getbyte(s0,i))
getbyte G:267 LG pal.b[6138] s0:=getbyte(s,12)&127
getbyte G:267 LG pal.b[6143] prc(h2!c1,getbyte(...)+y0)
getbyte G:267 LG pal.b[6145] prc(h2!h1!c1,getbyte(...)+y0)
getbyte G:267 LG pal.b[6341] getbyte(s1,i)
getbyte G:267 LG pal.b[8084] putbyte(buffp+buffl-2,i,getbyte(...))
getbyte G:267 LG pal.b[8090] putbyte(n,i,getbyte(...))
getbyte G:267 LG pal.b[862] FOR i=1 TO getbyte(s,0) DO..
getbyte G:267 LG pal.b[863] wch(getbyte(s,i))
getbyte G:267 LG pal.b[867] FOR i=0 TO getbyte(s,0) DO..
getbyte G:267 LG pal.b[868] v!i:=getbyte(s,i)
getbyte G:267 LG pal.b[885] FOR i=0 TO getbyte(p,0) DO..
getbyte G:267 LG pal.b[886] UNLESS (getbyte(p,i)&~64)=(getbyte(q,i)&~64) DO ..
getbyte G:267 LG pal.b[895] FOR p=1 TO getbyte(format,0) DO..
getbyte G:267 LG pal.b[896] getbyte(format,p)
getbyte G:267 LG pal.b[902] getbyte(format,p)
getbyte G:267 LG pal.b[9040] getbyte(p,0),0,FALSE
getbyte G:267 LG pal.b[9045] SWITCHON getbyte(p,j) INTO..
getbyte G:267 LG pal.b[9361] lprio,rprio,sym:=getbyte(s1,13)+y0,getbyte(...)+y0,getbyte(s1,15)
getbyte G:267 LG pal.b[947] n:=getbyte(format,p)
getbyte G:267 LG pal.b[989] IF validcode(p)&(...&entrymask)=entryword&getbyte(p,-8)<8 DO ..
getex G:468 DEF palhdr.h[565] getex=
getex G:468 FN pal.b[6601] LET getex(s)=..
getex G:468 LG pal.b[8985] u:=getex("SUPERVIS")
getlogname G:118 DEF libhdr.h[134] getlogname=118
getmv G:387 DEF palhdr.h[472] getmv=
getmv G:387 FN pal.b[6583] LET getmv(s1,s2)=..
getmv G:387 LLG pal.b[8334] set_f("GETM",@getmv)
getremipaddr G:54 DEF libhdr.h[69] getremipaddr=54
getv G:386 DEF palhdr.h[471] getv=
getv G:386 FN pal.b[6580] LET getv(s)=..
getv G:386 LLG pal.b[8321] set_f("GET",@getv)
getvec G:25 DEF libhdr.h[40] getvec=25
getword G:32 DEF libhdr.h[47] getword=32
getx G:545 DEF palhdr.h[652] getx=
getx G:545 FN pal.b[4385] LET getx(a,b,c,d)=..
getx G:545 LG pal.b[180] RESULTIS getx(s_flt,0,...,0)
getx G:545 LG pal.b[321] RESULTIS getx(s_flt,0,...,0)
getx G:545 LG pal.b[3829] RESULTIS getx(s_numj,z,...)+sg
getx G:545 LG pal.b[3846] h1!c0:=getx(s_numj,zsy,gw2,gw1)
getx G:545 LG pal.b[3866] h1!c0:=getx(s_numj,zsy,0,0)
getx G:545 LG pal.b[3869] h1!c0:=getx(s_numj,z,0,1)
getx G:545 LG pal.b[3872] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
getx G:545 LG pal.b[3891] c:=getx(s_numj,c,gw2,gw1)
getx G:545 LG pal.b[3905] h1!s0:=getx(s_numj,zsy,numbb,numbb)
getx G:545 LG pal.b[3914] h1!s0:=getx(s_numj,h1!a,gw2,gw1)
getx G:545 LG pal.b[3953] RESULTIS getx(s_numj,...,...)+sg
getx G:545 LG pal.b[3957] RESULTIS getx(s_numj,...,...)+sg
getx G:545 LG pal.b[3959] getx(s_numj,zsy,0,gw1)
getx G:545 LG pal.b[3970] h1!c0:=getx(s_numj,zsy,0,0)
getx G:545 LG pal.b[3973] h1!c0:=getx(s_numj,z,0,1)
getx G:545 LG pal.b[3976] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
getx G:545 LG pal.b[3981] RESULTIS getx(s_numj,...,...)+sg
getx G:545 LG pal.b[3990] RESULTIS getx(s_numj,a,...)+sg
getx G:545 LG pal.b[3991] getx(s_numj,zsy,numbb,gw1)
getx G:545 LG pal.b[4002] h1!c0:=getx(s_numj,zsy,numbb,numbb)
getx G:545 LG pal.b[4007] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
getx G:545 LG pal.b[4020] RESULTIS getx(s_numj,z,...)+sg
getx G:545 LG pal.b[4051] h1!n0:=getx(s_numj,zsy,gw2,gw3)
getx G:545 LG pal.b[4056] h1!n0:=getx(s_numj,z,0,gl2)
getx G:545 LG pal.b[4062] getx(s_numj,zsy,...)+((aXORb)&ysg)
getx G:545 LG pal.b[4067] c:=getx(s_numj,c,0,0)
getx G:545 LG pal.b[4069] c:=getx(s_numj,c,0,0)
getx G:545 LG pal.b[4170] n:=getx(s_numj,n,...,...)
getx G:545 LG pal.b[4750] RESULTIS getx(s_flt,0,...,0)
getx G:545 LG pal.b[5172] RESULTIS getx(s_flt,0,...,0)
getx G:545 LG pal.b[6752] RESULTIS getx(s_numj,z,...)+v
getx G:545 LG pal.b[6849] v:=getx(s_numj,z,n,m)
getx G:545 LG pal.b[6858] v:=getx(s_numj,v,n,m)
getx G:545 LG pal.b[6869] c1,h1!gg,gg:=str1,getx(s_string,...),h1!gg
getx G:545 LG pal.b[6941] RESULTIS getx(s_flt,0,...,0)
getx G:545 LG pal.b[7011] RESULTIS getx(s_flt,0,...,0)
getx G:545 LG pal.b[7066] RESULTIS getx(s_flt,0,...,0)
getx G:545 LG pal.b[7074] RESULTIS getx(s_flt,0,...,0)
getx G:545 LG pal.b[9322] sym,s0:=s_flt,getx(s_flt,0,...)
getx G:545 LG pal.b[9332] getx(s_string,z,0,0)
getx G:545 LG pal.b[9439] s2,h1!gg,gg:=str1,getx(s_string,...),h1!gg
gg0 F:1 FN pal.b[7971] LET gg0(s,f)=..
gg0 F:1 LF pal.b[7996] f:=gg0(f,g)
gg0 F:1 LF pal.b[8002] f:=gg0(f,g)
gg0 F:1 LF pal.b[8045] gg0(n,f)
gl1 S:3 DEF pal.b[3794] gl1=0
gl1 S:3 LL pal.b[4029] TEST gl1>1 THEN .. ELSE ..
gl1 S:3 LL pal.b[4031] TEST gl1<-1 THEN .. ELSE ..
gl1 S:3 LL pal.b[4032] gl1,sg:=-gl1,a&ysgXORysg
gl1 S:3 LL pal.b[4033] TEST gl1=0 THEN .. ELSE ..
gl1 S:3 LL pal.b[4035] TEST gl1=1 THEN .. ELSE ..
gl1 S:3 LL pal.b[4039] muldiv(h3!a,gl1,numba)
gl1 S:3 LL pal.b[4044] gl2:=muldiv(h2!a,gl1,numba)
gl1 S:3 LL pal.b[4075] gw3:=h3!c1+gl1
gl1 S:3 LL pal.b[4088] gl1:=gl1+1
gl1 S:3 LL pal.b[4092] gl1:=gl1+1
gl1 S:3 LL pal.b[4096] h3!c1:=gl1
gl1 S:3 LL pal.b[4108] gl1:=gl1+1
gl1 S:3 LL pal.b[4112] gl1:=gl1+1
gl1 S:3 LL pal.b[4115] gw3:=h3!c1+gl1
gl1 S:3 LL pal.b[4160] TEST gl1>1 THEN .. ELSE ..
gl1 S:3 LL pal.b[4162] TEST gl1<-1 THEN .. ELSE ..
gl1 S:3 LL pal.b[4163] gl1,sg:=-gl1,a&ysgXORysg
gl1 S:3 LL pal.b[4164] TEST gl1=0 THEN .. ELSE ..
gl1 S:3 LL pal.b[4167] TEST gl1=1 THEN .. ELSE ..
gl1 S:3 LL pal.b[4174] result2:=h2!nMODgl1
gl1 S:3 LL pal.b[4175] h2!n:=h2!n/gl1
gl1 S:3 LL pal.b[4177] result2:=h3!nMODgl1
gl1 S:3 LL pal.b[4178] h3!n:=h3!n/gl1
gl1 S:3 LL pal.b[4182] h2!n:=sdiv(result2,h2!n,gl1)
gl1 S:3 LL pal.b[4183] h3!n:=sdiv(result2,h3!n,gl1)
gl1 S:3 SL pal.b[4028] gl1,n:=n-y0,z
gl1 S:3 SL pal.b[4032] gl1,sg:=-gl1,a&ysgXORysg
gl1 S:3 SL pal.b[4074] gl1,gl3:=0,h3!a
gl1 S:3 SL pal.b[4085] gl1:=muldiv(gl3,h2!b1,numba)
gl1 S:3 SL pal.b[4088] gl1:=gl1+1
gl1 S:3 SL pal.b[4092] gl1:=gl1+1
gl1 S:3 SL pal.b[4105] gl1:=muldiv(gl3,h3!b1,numba)
gl1 S:3 SL pal.b[4108] gl1:=gl1+1
gl1 S:3 SL pal.b[4112] gl1:=gl1+1
gl1 S:3 SL pal.b[4159] gl1,n:=n-y0,zsy
gl1 S:3 SL pal.b[4163] gl1,sg:=-gl1,a&ysgXORysg
gl2 S:4 DEF pal.b[3795] gl2=0
gl2 S:4 LL pal.b[4040] gw3:=gl2+result2
gl2 S:4 LL pal.b[4048] gl2:=gl2+1
gl2 S:4 LL pal.b[4054] TEST gl2=0 THEN .. ELSE ..
gl2 S:4 LL pal.b[4056] h1!n0:=getx(s_numj,z,0,gl2)
gl2 S:4 SL pal.b[4038] gl2:=0
gl2 S:4 SL pal.b[4044] gl2:=muldiv(h2!a,gl1,numba)
gl2 S:4 SL pal.b[4048] gl2:=gl2+1
gl3 S:5 DEF pal.b[3796] gl3=0
gl3 S:5 LL pal.b[4076] gw2:=h2!c1+muldiv(gl3,...,numba)
gl3 S:5 LL pal.b[4085] gl1:=muldiv(gl3,h2!b1,numba)
gl3 S:5 LL pal.b[4098] IF gl3=0 DO ..
gl3 S:5 LL pal.b[4105] gl1:=muldiv(gl3,h3!b1,numba)
gl3 S:5 LL pal.b[4116] gw2:=h2!c1+muldiv(gl3,...,numba)
gl3 S:5 SL pal.b[4074] gl1,gl3:=0,h3!a
gl3 S:5 SL pal.b[4097] gl3,a:=h2!a,h1!a
globa G:610 DEF palhdr.h[723] globa=
globa G:610 FN pal.b[6893] LET globa(a)=..
globa G:610 LLG pal.b[8313] set_v("GLOBAL",@globa)
globcon129 M:-942411260 DEF pal.b[1001] globcon129=globword+4*129
globcon129 M:-942411260 MAN pal.b[1053] UNLESS softerror=globcon129 DO ..
globcon137 M:-942411228 DEF pal.b[1002] globcon137=globword+4*137
globcon137 M:-942411228 MAN pal.b[1065] UNLESS sysout=0|stackb=globcon137|stackl=globcon138 DO ..
globcon138 M:-942411224 DEF pal.b[1003] globcon138=globword+4*138
globcon138 M:-942411224 MAN pal.b[1065] UNLESS sysout=0|stackb=globcon137|stackl=globcon138 DO ..
globcon79 M:-942411460 DEF pal.b[1000] globcon79=globword+4*79
globcon79 M:-942411460 MAN pal.b[1058] UNLESS userpostmortem=globcon79 DO ..
globin G:24 DEF libhdr.h[39] globin=24
globsize G:0 DEF libhdr.h[15] globsize=0
globword M:-1886453760 DEF libhdr.h[181] globword=#x8F8F0000
globword M:-942411776 DEF pal.b[714] globword=#xC7D3F000
globword M:-942411776 MAN pal.b[1000] globcon79=globword+4*79
globword M:-942411776 MAN pal.b[1001] globcon129=globword+4*129
globword M:-942411776 MAN pal.b[1002] globcon137=globword+4*137
globword M:-942411776 MAN pal.b[1003] globcon138=globword+4*138
globword M:-942411776 MAN pal.b[1033] (addr-globword-2&#x00FFFFFF)>>2
globword M:-942411776 MAN pal.b[1202] UNLESS @g0!t=globword+(t<<2) DO ..
gpfn G:331 DEF palhdr.h[405] gpfn=
gpfn G:331 LG pal.b[8081] gpfn(i)
gpfn G:331 RT pal.b[4219] LET gpfn(f)BE..
gseq G:414 DEF palhdr.h[504] gseq=
gseq G:414 LG pal.b[10219] b:=get4(s_mb,!gseq,b,0)
gseq G:414 LG pal.b[10220] !gseq:=b
gseq G:414 LG pal.b[10238] a:=get4(s_mb,!gseq,a,0)
gseq G:414 LG pal.b[10239] !gseq:=a
gseq G:414 LG pal.b[10270] a:=get4(s_mb,!gseq,a,0)
gseq G:414 LG pal.b[10271] !gseq:=a
gseq G:414 LG pal.b[9452] zsy,gseq|signbit
gseq G:414 SG pal.b[8061] gseq,gseqf:=0,0
gseq G:414 SG pal.b[9455] gseq:=@g
gseq G:414 SG pal.b[9466] gseq:=sv
gseqf G:415 DEF palhdr.h[505] gseqf=
gseqf G:415 LG pal.b[3228] zsy,gseqf|signbit
gseqf G:415 LG pal.b[3237] result2:=gseqf&maxint
gseqf G:415 LG pal.b[3289] gseqf:=gseqf|fvaru
gseqf G:415 LG pal.b[3525] !a,h1!a,h2!a,h3!a:=s_mb,!gseqf,n,get4(...)
gseqf G:415 LG pal.b[3526] !gseqf:=a
gseqf G:415 SG pal.b[3229] gseqf:=@g
gseqf G:415 SG pal.b[3238] gseqf:=sv
gseqf G:415 SG pal.b[3289] gseqf:=gseqf|fvaru
gseqf G:415 SG pal.b[8061] gseq,gseqf:=0,0
gtv G:524 DEF palhdr.h[629] gtv=
gtv G:524 FN pal.b[7421] LET gtv(p,q)=..
gtv G:524 LG pal.b[10143] TEST gtv(s,y0) THEN .. ELSE ..
gtv G:524 LG pal.b[6511] UNTIL f->gtv(v,w),gtv(w,v) DO ..
gtv G:524 LLG pal.b[8280] a_gt:=dt(">",@gtv,ap2,...)
gw0 G:373 DEF palhdr.h[456] gw0=
gw0 G:373 LG pal.b[1942] f,m:=get4(m,...)+yfj,s_mmf2r
gw0 G:373 LG pal.b[2064] arg1:=transpal(gw0)
gw0 G:373 LG pal.b[2086] arg1:=(h2!c)(h2!h1!gw0,h2!gw0,h2!arg1)
gw0 G:373 LG pal.b[2092] gw1:=h2!gw0
gw0 G:373 LG pal.b[2093] gw0:=h1!gw0
gw0 G:373 LG pal.b[2095] arg1:=gw2(h2!h1!gw0,h2!gw0,gw1,...)
gw0 G:373 LG pal.b[2369] arg1:=c(arg1,gw0)
gw0 G:373 LG pal.b[2475] h2!f:=gw0
gw0 G:373 LG pal.b[2476] f:=get4(s_mmcf,...,...)+yfj
gw0 G:373 LG pal.b[2482] f:=get4(s_mmcf,f,...)+yfj
gw0 G:373 LG pal.b[2662] h2!f:=gw0
gw0 G:373 LG pal.b[2663] f:=get4(s_mmcf,...,...)+yfj
gw0 G:373 SG pal.b[2063] gw0:=callbcpl(c)
gw0 G:373 SG pal.b[2085] gw0:=h1!arg1
gw0 G:373 SG pal.b[2091] gw0:=h1!arg1
gw0 G:373 SG pal.b[2093] gw0:=h1!gw0
gw0 G:373 SG pal.b[2367] c,gw0:=h2!f,h3!f
gw0 G:373 SG pal.b[2473] gw0:=get4(s_tuple,h2!f,arg1,...)
gw0 G:373 SG pal.b[2481] gw0:=get4(s_tuple,z,arg1,y1)
gw0 G:373 SG pal.b[2657] gw0:=(h2!c)(h2!f,arg1)
gw0 G:373 SG pal.b[2660] gw0:=(h2!c)(arg1,h2!f)
gw0 G:373 SG pal.b[6281] gw0,gw1,gw2:=show1,a,a
gw0 G:373 SG pal.b[7306] gw0,gw1,gw2:=dotrace1,h1!c,h2!c
gw0 G:373 SG pal.b[7328] gw0,gw1,gw2:=dotrap1,b,a
gw1 G:374 DEF palhdr.h[457] gw1=
gw1 G:374 LG pal.b[180] RESULTIS getx(s_flt,0,...,0)
gw1 G:374 LG pal.b[1942] f,m:=get4(m,...)+yfj,s_mmf2r
gw1 G:374 LG pal.b[2095] arg1:=gw2(h2!h1!gw0,h2!gw0,gw1,...)
gw1 G:374 LG pal.b[2160] c,gw1:=h1!c,gw1XORc
gw1 G:374 LG pal.b[2163] TEST gw1<ysg THEN .. ELSE ..
gw1 G:374 LG pal.b[274] a:=minu(h2!a,gw1)
gw1 G:374 LG pal.b[321] RESULTIS getx(s_flt,0,...,0)
gw1 G:374 LG pal.b[3836] TEST gw1>=numba THEN .. ELSE ..
gw1 G:374 LG pal.b[3837] gw1:=gw1-numba
gw1 G:374 LG pal.b[3846] h1!c0:=getx(s_numj,zsy,gw2,gw1)
gw1 G:374 LG pal.b[3858] UNLESS gw1=numba DO ..
gw1 G:374 LG pal.b[3872] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
gw1 G:374 LG pal.b[3881] TEST gw1<0 THEN .. ELSE ..
gw1 G:374 LG pal.b[3882] gw1:=gw1+numba
gw1 G:374 LG pal.b[3891] c:=getx(s_numj,c,gw2,gw1)
gw1 G:374 LG pal.b[3908] TEST gw1=0&0=gw2&h1!a=z THEN .. ELSE ..
gw1 G:374 LG pal.b[3914] h1!s0:=getx(s_numj,h1!a,gw2,gw1)
gw1 G:374 LG pal.b[3951] gw1:=h3!a+gw1
gw1 G:374 LG pal.b[3952] UNLESS gw1>=numba DO ..
gw1 G:374 LG pal.b[3953] RESULTIS getx(s_numj,...,...)+sg
gw1 G:374 LG pal.b[3954] gw1:=gw1-numba
gw1 G:374 LG pal.b[3957] RESULTIS getx(s_numj,...,...)+sg
gw1 G:374 LG pal.b[3959] getx(s_numj,zsy,0,gw1)
gw1 G:374 LG pal.b[3962] UNLESS gw1=numba DO ..
gw1 G:374 LG pal.b[3976] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
gw1 G:374 LG pal.b[3979] gw1:=h3!a-gw1
gw1 G:374 LG pal.b[3980] UNLESS gw1<=0 DO ..
gw1 G:374 LG pal.b[3981] RESULTIS getx(s_numj,...,...)+sg
gw1 G:374 LG pal.b[3982] gw1:=gw1+numba
gw1 G:374 LG pal.b[3988] RESULTIS gw1+y0
gw1 G:374 LG pal.b[3989] RESULTIS y0-gw1
gw1 G:374 LG pal.b[3990] RESULTIS getx(s_numj,a,...)+sg
gw1 G:374 LG pal.b[3991] getx(s_numj,zsy,numbb,gw1)
gw1 G:374 LG pal.b[4005] TEST gw2=0&0=gw1&h1!a=z THEN .. ELSE ..
gw1 G:374 LG pal.b[4007] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
gw1 G:374 LG pal.b[4750] RESULTIS getx(s_flt,0,...,0)
gw1 G:374 LG pal.b[4950] b:=smul(gw1,b)
gw1 G:374 LG pal.b[4967] a:=smul(a,gw1)
gw1 G:374 LG pal.b[4988] b:=longmul1(b,gw1)
gw1 G:374 LG pal.b[5006] a:=longmul1(a,gw1)
gw1 G:374 LG pal.b[5027] b:=smul(h2!a,gw1)
gw1 G:374 LG pal.b[5057] a:=gw1
gw1 G:374 LG pal.b[5071] b:=gw1
gw1 G:374 LG pal.b[5172] RESULTIS getx(s_flt,0,...,0)
gw1 G:374 LG pal.b[7481] RESULTIS gw1#>gw2
gw1 G:374 SG pal.b[2092] gw1:=h2!gw0
gw1 G:374 SG pal.b[2159] gw1:=c
gw1 G:374 SG pal.b[2160] c,gw1:=h1!c,gw1XORc
gw1 G:374 SG pal.b[272] gw1:=mul(h1!a,b)
gw1 G:374 SG pal.b[3835] gw1:=h3!a+h3!b+cy
gw1 G:374 SG pal.b[3837] gw1:=gw1-numba
gw1 G:374 SG pal.b[3857] gw1:=h3!a+1
gw1 G:374 SG pal.b[3863] gw1:=0
gw1 G:374 SG pal.b[3880] gw1:=h3!a-h3!b-cy
gw1 G:374 SG pal.b[3882] gw1:=gw1+numba
gw1 G:374 SG pal.b[3897] gw1:=h3!a-1
gw1 G:374 SG pal.b[3902] gw1:=numbb
gw1 G:374 SG pal.b[3945] gw1:=y0-n
gw1 G:374 SG pal.b[3948] gw1:=n-y0
gw1 G:374 SG pal.b[3951] gw1:=h3!a+gw1
gw1 G:374 SG pal.b[3954] gw1:=gw1-numba
gw1 G:374 SG pal.b[3961] gw1:=h3!a+1
gw1 G:374 SG pal.b[3967] gw1:=0
gw1 G:374 SG pal.b[3979] gw1:=h3!a-gw1
gw1 G:374 SG pal.b[3982] gw1:=gw1+numba
gw1 G:374 SG pal.b[3994] gw1:=h3!a-1
gw1 G:374 SG pal.b[3999] gw1:=numbb
gw1 G:374 SG pal.b[448] gw1:=Op26
gw1 G:374 SG pal.b[4948] gw1,a:=signbit-h1!a,signbit-h2!a
gw1 G:374 SG pal.b[4949] gw1,a:=h1!a,h2!a
gw1 G:374 SG pal.b[4965] gw1,b:=signbit-h1!b,signbit-h2!b
gw1 G:374 SG pal.b[4966] gw1,b:=h1!b,h2!b
gw1 G:374 SG pal.b[4986] gw1,a:=signbit-h1!a,signbit-h2!a
gw1 G:374 SG pal.b[4987] gw1,a:=h1!a,h2!a
gw1 G:374 SG pal.b[5004] gw1,b:=signbit-h1!b,signbit-h2!b
gw1 G:374 SG pal.b[5005] gw1,b:=h1!b,h2!b
gw1 G:374 SG pal.b[5025] t,gw1:=signbit-t,signbit-h1!b
gw1 G:374 SG pal.b[5026] gw1:=h1!b
gw1 G:374 SG pal.b[5055] gw1:=div(h2!a,b)
gw1 G:374 SG pal.b[5069] gw1:=div(h2!b,a)
gw1 G:374 SG pal.b[516] gw1:=(Op26)#/(Op26)
gw1 G:374 SG pal.b[6281] gw0,gw1,gw2:=show1,a,a
gw1 G:374 SG pal.b[635] gw1:=h2!p
gw1 G:374 SG pal.b[7306] gw0,gw1,gw2:=dotrace1,h1!c,h2!c
gw1 G:374 SG pal.b[7328] gw0,gw1,gw2:=dotrap1,b,a
gw2 G:375 DEF palhdr.h[458] gw2=
gw2 G:375 LG pal.b[180] RESULTIS getx(s_flt,0,...,0)
gw2 G:375 LG pal.b[1941] c:=gw2
gw2 G:375 LG pal.b[2095] arg1:=gw2(h2!h1!gw0,h2!gw0,gw1,...)
gw2 G:375 LG pal.b[321] RESULTIS getx(s_flt,0,...,0)
gw2 G:375 LG pal.b[3841] TEST gw2>=numba THEN .. ELSE ..
gw2 G:375 LG pal.b[3842] gw2:=gw2-numba
gw2 G:375 LG pal.b[3846] h1!c0:=getx(s_numj,zsy,gw2,gw1)
gw2 G:375 LG pal.b[3862] UNLESS gw2=numba DO ..
gw2 G:375 LG pal.b[3872] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
gw2 G:375 LG pal.b[3886] TEST gw2<0 THEN .. ELSE ..
gw2 G:375 LG pal.b[3887] gw2:=gw2+numba
gw2 G:375 LG pal.b[3891] c:=getx(s_numj,c,gw2,gw1)
gw2 G:375 LG pal.b[3908] TEST gw1=0&0=gw2&h1!a=z THEN .. ELSE ..
gw2 G:375 LG pal.b[3914] h1!s0:=getx(s_numj,h1!a,gw2,gw1)
gw2 G:375 LG pal.b[3956] UNLESS gw2=numba DO ..
gw2 G:375 LG pal.b[3957] RESULTIS getx(s_numj,...,...)+sg
gw2 G:375 LG pal.b[3966] UNLESS gw2=numba DO ..
gw2 G:375 LG pal.b[3976] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
gw2 G:375 LG pal.b[3985] UNLESS gw2<0 DO ..
gw2 G:375 LG pal.b[3986] IF gw2=0&a=z DO ..
gw2 G:375 LG pal.b[3990] RESULTIS getx(s_numj,a,...)+sg
gw2 G:375 LG pal.b[4005] TEST gw2=0&0=gw1&h1!a=z THEN .. ELSE ..
gw2 G:375 LG pal.b[4007] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
gw2 G:375 LG pal.b[4046] IF gw2>=numba DO ..
gw2 G:375 LG pal.b[4047] gw2:=gw2-numba
gw2 G:375 LG pal.b[4051] h1!n0:=getx(s_numj,zsy,gw2,gw3)
gw2 G:375 LG pal.b[4079] gw2:=gw2+1
gw2 G:375 LG pal.b[4083] gw2:=gw2+1
gw2 G:375 LG pal.b[4086] IF gw2>=numba DO ..
gw2 G:375 LG pal.b[4087] gw2:=gw2-numba
gw2 G:375 LG pal.b[4089] gw2:=gw2+result2
gw2 G:375 LG pal.b[4090] IF gw2>=numba DO ..
gw2 G:375 LG pal.b[4091] gw2:=gw2-numba
gw2 G:375 LG pal.b[4093] h2!c1:=gw2
gw2 G:375 LG pal.b[4106] IF gw2>=numba DO ..
gw2 G:375 LG pal.b[4107] gw2:=gw2-numba
gw2 G:375 LG pal.b[4109] gw2:=gw2+result2
gw2 G:375 LG pal.b[4110] IF gw2>=numba DO ..
gw2 G:375 LG pal.b[4111] gw2:=gw2-numba
gw2 G:375 LG pal.b[4113] h2!c1:=gw2
gw2 G:375 LG pal.b[4119] gw2:=gw2+1
gw2 G:375 LG pal.b[4123] gw2:=gw2+1
gw2 G:375 LG pal.b[4127] h2!c1:=gw2
gw2 G:375 LG pal.b[4750] RESULTIS getx(s_flt,0,...,0)
gw2 G:375 LG pal.b[5170] IF gw2#=#0e0 DO ..
gw2 G:375 LG pal.b[5172] RESULTIS getx(s_flt,0,...,0)
gw2 G:375 LG pal.b[7481] RESULTIS gw1#>gw2
gw2 G:375 SG pal.b[2094] gw2:=h2!c
gw2 G:375 SG pal.b[3840] gw2:=h2!a+h2!b+cy
gw2 G:375 SG pal.b[3842] gw2:=gw2-numba
gw2 G:375 SG pal.b[3859] gw2:=h2!a
gw2 G:375 SG pal.b[3861] gw2:=h2!a+1
gw2 G:375 SG pal.b[3885] gw2:=h2!a-h2!b-cy
gw2 G:375 SG pal.b[3887] gw2:=gw2+numba
gw2 G:375 SG pal.b[3898] gw2:=h2!a
gw2 G:375 SG pal.b[3901] gw2:=h2!a-1
gw2 G:375 SG pal.b[3955] gw2:=h2!a+1
gw2 G:375 SG pal.b[3963] gw2:=h2!a
gw2 G:375 SG pal.b[3965] gw2:=h2!a+1
gw2 G:375 SG pal.b[3983] gw2:=h2!a-1
gw2 G:375 SG pal.b[3995] gw2:=h2!a
gw2 G:375 SG pal.b[3998] gw2:=h2!a-1
gw2 G:375 SG pal.b[4045] gw2:=t+result2
gw2 G:375 SG pal.b[4047] gw2:=gw2-numba
gw2 G:375 SG pal.b[4076] gw2:=h2!c1+muldiv(gl3,...,numba)
gw2 G:375 SG pal.b[4079] gw2:=gw2+1
gw2 G:375 SG pal.b[4083] gw2:=gw2+1
gw2 G:375 SG pal.b[4087] gw2:=gw2-numba
gw2 G:375 SG pal.b[4089] gw2:=gw2+result2
gw2 G:375 SG pal.b[4091] gw2:=gw2-numba
gw2 G:375 SG pal.b[4104] gw2:=h2!c1
gw2 G:375 SG pal.b[4107] gw2:=gw2-numba
gw2 G:375 SG pal.b[4109] gw2:=gw2+result2
gw2 G:375 SG pal.b[4111] gw2:=gw2-numba
gw2 G:375 SG pal.b[4116] gw2:=h2!c1+muldiv(gl3,...,numba)
gw2 G:375 SG pal.b[4119] gw2:=gw2+1
gw2 G:375 SG pal.b[4123] gw2:=gw2+1
gw2 G:375 SG pal.b[449] gw2:=h2!q
gw2 G:375 SG pal.b[517] gw2:=h2!q
gw2 G:375 SG pal.b[6281] gw0,gw1,gw2:=show1,a,a
gw2 G:375 SG pal.b[639] gw2:=Op26
gw2 G:375 SG pal.b[641] gw2:=#0e0
gw2 G:375 SG pal.b[642] gw2:=#1e0
gw2 G:375 SG pal.b[648] gw2:=(Op26)#/(Op26)
gw2 G:375 SG pal.b[650] gw2:=h2!q
gw2 G:375 SG pal.b[7306] gw0,gw1,gw2:=dotrace1,h1!c,h2!c
gw2 G:375 SG pal.b[7328] gw0,gw1,gw2:=dotrap1,b,a
gw3 G:376 DEF palhdr.h[459] gw3=
gw3 G:376 LG pal.b[4041] IF gw3>=numba DO ..
gw3 G:376 LG pal.b[4042] gw3:=gw3-numba
gw3 G:376 LG pal.b[4051] h1!n0:=getx(s_numj,zsy,gw2,gw3)
gw3 G:376 LG pal.b[4077] IF gw3>=numba DO ..
gw3 G:376 LG pal.b[4078] gw3:=gw3-numba
gw3 G:376 LG pal.b[4080] gw3:=gw3+result2
gw3 G:376 LG pal.b[4081] IF gw3>=numba DO ..
gw3 G:376 LG pal.b[4082] gw3:=gw3-numba
gw3 G:376 LG pal.b[4084] h3!c1:=gw3
gw3 G:376 LG pal.b[4117] IF gw3>=numba DO ..
gw3 G:376 LG pal.b[4118] gw3:=gw3-numba
gw3 G:376 LG pal.b[4120] gw3:=gw3+result2
gw3 G:376 LG pal.b[4121] IF gw3>=numba DO ..
gw3 G:376 LG pal.b[4122] gw3:=gw3-numba
gw3 G:376 LG pal.b[4124] h3!c1:=gw3
gw3 G:376 SG pal.b[4040] gw3:=gl2+result2
gw3 G:376 SG pal.b[4042] gw3:=gw3-numba
gw3 G:376 SG pal.b[4075] gw3:=h3!c1+gl1
gw3 G:376 SG pal.b[4078] gw3:=gw3-numba
gw3 G:376 SG pal.b[4080] gw3:=gw3+result2
gw3 G:376 SG pal.b[4082] gw3:=gw3-numba
gw3 G:376 SG pal.b[4115] gw3:=h3!c1+gl1
gw3 G:376 SG pal.b[4118] gw3:=gw3-numba
gw3 G:376 SG pal.b[4120] gw3:=gw3+result2
gw3 G:376 SG pal.b[4122] gw3:=gw3-numba
gw4 G:377 DEF palhdr.h[460] gw4=
h0 M:0 DEF palhdr.h[53] h0=0
h1 M:1 DEF palhdr.h[54] h1=1
h1 M:1 MAN pal.b[10174] e:=get4(s_colon,h1!f,e,...)
h1 M:1 MAN pal.b[101] a:=smul(a,h1!b)
h1 M:1 MAN pal.b[10202] a:=get4(s_colon,h1!b,a,...)
h1 M:1 MAN pal.b[10205] a:=get4(s_colon,h1!c,a,...)
h1 M:1 MAN pal.b[10284] a,x:=h1!a,FALSE
h1 M:1 MAN pal.b[10291] a,x:=h1!a,TRUE
h1 M:1 MAN pal.b[10295] RESULTIS mcolon(h1!a,e)
h1 M:1 MAN pal.b[108] RESULTIS get4(sg,h1!b,a,0)
h1 M:1 MAN pal.b[111] a:=longmul1(a,h1!b)
h1 M:1 MAN pal.b[113] RESULTIS get4(s_ratl,h1!b,a,0)
h1 M:1 MAN pal.b[115] h1!a,h1!b
h1 M:1 MAN pal.b[1408] p:=h1!p
h1 M:1 MAN pal.b[1418] s1:=mul(s1,h1!p)
h1 M:1 MAN pal.b[1419] difr1(h1!p)
h1 M:1 MAN pal.b[1424] p:=mul(h1!p,h1!p)
h1 M:1 MAN pal.b[1433] h1!pXORp&ysg
h1 M:1 MAN pal.b[1435] p1:=h1!p1XORp1&ysg
h1 M:1 MAN pal.b[1440] h1!r0,r0:=t,t
h1 M:1 MAN pal.b[1442] p1:=h1!p1
h1 M:1 MAN pal.b[1447] h1!r0:=z
h1 M:1 MAN pal.b[144] a:=mul(a,h1!b)
h1 M:1 MAN pal.b[1452] h1!pXORp&ysg
h1 M:1 MAN pal.b[1462] p1:=h1!p1XORp1&ysg
h1 M:1 MAN pal.b[146] RESULTIS get4(!b,h1!b,a,...)
h1 M:1 MAN pal.b[148] h1!a,h1!b
h1 M:1 MAN pal.b[1715] c:=h1!c
h1 M:1 MAN pal.b[1733] g:=h1!g
h1 M:1 MAN pal.b[1762] f,m,c:=get4(m,...)+yfj,s_mmf2r,h1!c
h1 M:1 MAN pal.b[1766] arg1:=h1!c
h1 M:1 MAN pal.b[1772] f,m,c:=get4(m,...)+yfj,s_mms,h1!c
h1 M:1 MAN pal.b[1775] arg1:=h1!c
h1 M:1 MAN pal.b[1780] msg1(17,h1!c)
h1 M:1 MAN pal.b[1784] f,m,c:=get4(m,...)+yfj,s_mmal,h1!c
h1 M:1 MAN pal.b[1791] c:=h1!c
h1 M:1 MAN pal.b[1805] e:=get4(s_e,h1!c,arg1,...)
h1 M:1 MAN pal.b[1818] f,m,c:=get4(m,...)+yfj,s_mma2l,h2!h1!c1
h1 M:1 MAN pal.b[1822] f,m,c:=get4(m,...)+yfj,s_mmf2l,h2!h1!c1
h1 M:1 MAN pal.b[1835] arg1:=h1!arg1
h1 M:1 MAN pal.b[1840] h2!h1!arg1
h1 M:1 MAN pal.b[1850] e:=get4(s_e,h1!c,a2,...)
h1 M:1 MAN pal.b[1851] e:=get4(s_e,e,arg1,...)
h1 M:1 MAN pal.b[1857] h2!h1!arg1
h1 M:1 MAN pal.b[1870] e:=binda(h2!c,arg1,h1!c)
h1 M:1 MAN pal.b[1876] f,m,c:=get4(m,...)+yfj,s_mmt,h2!c
h1 M:1 MAN pal.b[1879] f,m,c:=get4(m,...)+yfj,s_mmaq,h2!c
h1 M:1 MAN pal.b[1886] c:=h2!h1!c
h1 M:1 MAN pal.b[1897] f,m,c:=get4(m,...)+yfj,s_mmcond,h1!c
h1 M:1 MAN pal.b[1902] h1!c
h1 M:1 MAN pal.b[1904] IF a=z|a>=yloc&h1!a=z DO ..
h1 M:1 MAN pal.b[1909] f,m,c:=get4(m,...)+yfj,s_mmlet,h3!c
h1 M:1 MAN pal.b[1918] c:=h1!c
h1 M:1 MAN pal.b[1927] c:=h1!c
h1 M:1 MAN pal.b[1936] e:=get4(s_e,e,a,...)
h1 M:1 MAN pal.b[1938] h1!e1,h2!e1,h3!e1:=h1!e,h2!e,h3!e
h1 M:1 MAN pal.b[1959] e,f,j:=h1!j,h3!j,h2!j
h1 M:1 MAN pal.b[1967] e,c,j:=h1!j,h3!j,h2!j
h1 M:1 MAN pal.b[1975] e,f,j:=h1!j,h3!j,h2!j
h1 M:1 MAN pal.b[1980] e,f,j:=h1!j,h3!j,h2!j
h1 M:1 MAN pal.b[1982] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[1987] e,f,j:=h1!j,h3!j,h2!j
h1 M:1 MAN pal.b[2006] f:=h1!f
h1 M:1 MAN pal.b[2019] c:=h1!c
h1 M:1 MAN pal.b[2025] c:=h1!c
h1 M:1 MAN pal.b[2031] c:=h1!c
h1 M:1 MAN pal.b[2037] c:=h1!c
h1 M:1 MAN pal.b[2069] arg1:=h1!arg1
h1 M:1 MAN pal.b[2078] arg1:=h1!arg1
h1 M:1 MAN pal.b[2080] arg1:=(h2!c)(h2!h1!arg1,h2!arg1)
h1 M:1 MAN pal.b[2085] gw0:=h1!arg1
h1 M:1 MAN pal.b[2086] arg1:=(h2!c)(h2!h1!gw0,h2!gw0,h2!arg1)
h1 M:1 MAN pal.b[2091] gw0:=h1!arg1
h1 M:1 MAN pal.b[2093] gw0:=h1!gw0
h1 M:1 MAN pal.b[2095] arg1:=gw2(h2!h1!gw0,h2!gw0,gw1,...)
h1 M:1 MAN pal.b[2101] arg1:=h1!arg1
h1 M:1 MAN pal.b[2107] mqu(h1!arg1)
h1 M:1 MAN pal.b[2116] c:=h1!c
h1 M:1 MAN pal.b[2123] arg1:=h1!arg1
h1 M:1 MAN pal.b[2131] c:=h1!c
h1 M:1 MAN pal.b[2138] h1!c:=get4(s_tuple,h1!c,arg1,c31)
h1 M:1 MAN pal.b[2153] arg1:=h1!arg1
h1 M:1 MAN pal.b[215] b:=smul(h1!a,b)
h1 M:1 MAN pal.b[2160] c,gw1:=h1!c,gw1XORc
h1 M:1 MAN pal.b[2188] h1!c
h1 M:1 MAN pal.b[2201] e,c:=h1!c,h3!c
h1 M:1 MAN pal.b[2207] e:=get4(s_e,h1!c,arg1,...)
h1 M:1 MAN pal.b[2218] arg1:=h1!arg1
h1 M:1 MAN pal.b[2220] e:=binda(c2,arg1,h1!c)
h1 M:1 MAN pal.b[2227] e:=bind(h2!c,arg1,h1!c)
h1 M:1 MAN pal.b[222] RESULTIS get4(sg,h1!a,b,0)
h1 M:1 MAN pal.b[2240] e,j:=h1!c,h2!c
h1 M:1 MAN pal.b[224] a:=smul(a,h1!b)
h1 M:1 MAN pal.b[2254] f:=h1!f
h1 M:1 MAN pal.b[2265] f:=h1!f
h1 M:1 MAN pal.b[2267] h2!f,h3!f:=h1!c,arg1
h1 M:1 MAN pal.b[2278] f:=h1!f
h1 M:1 MAN pal.b[2280] f:=get4(!f,...,...)+yfj
h1 M:1 MAN pal.b[2290] f:=h1!f
h1 M:1 MAN pal.b[2293] e:=binda(h2!c,arg1,h1!c)
h1 M:1 MAN pal.b[2303] f:=h1!f
h1 M:1 MAN pal.b[2306] e:=get4(s_e,h1!c,arg1,...)
h1 M:1 MAN pal.b[2311] arg1:=h1!arg1
h1 M:1 MAN pal.b[2316] arg1:=h1!arg1
h1 M:1 MAN pal.b[231] RESULTIS get4(sg,h1!b,a,0)
h1 M:1 MAN pal.b[2320] f:=h1!f
h1 M:1 MAN pal.b[2331] f:=get4(!f,...,...)+yfj
h1 M:1 MAN pal.b[2342] f:=h1!f
h1 M:1 MAN pal.b[2346] e:=get4(s_e,h1!c,v,...)
h1 M:1 MAN pal.b[2347] e:=get4(s_e,e,arg1,...)
h1 M:1 MAN pal.b[234] b:=longmul1(bXORysg,h1!a)
h1 M:1 MAN pal.b[2358] f:=get4(!f,...,...)+yfj
h1 M:1 MAN pal.b[2368] f:=h1!f
h1 M:1 MAN pal.b[236] RESULTIS get4(s_ratl,h1!a,b,0)
h1 M:1 MAN pal.b[2379] f:=h1!f
h1 M:1 MAN pal.b[2389] f:=h1!f
h1 M:1 MAN pal.b[238] a:=longmul1(a,h1!b)
h1 M:1 MAN pal.b[2401] TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
h1 M:1 MAN pal.b[2404] f:=h1!f
h1 M:1 MAN pal.b[240] RESULTIS get4(s_ratl,h1!b,a,0)
h1 M:1 MAN pal.b[2416] c:=h1!c
h1 M:1 MAN pal.b[2421] c:=h1!c
h1 M:1 MAN pal.b[2424] arg1:=h1!h1!e
h1 M:1 MAN pal.b[2426] arg1:=h1!arg1
h1 M:1 MAN pal.b[2428] c:=h1!c
h1 M:1 MAN pal.b[242] h1!a,h1!b
h1 M:1 MAN pal.b[2433] c:=h1!c
h1 M:1 MAN pal.b[2437] arg1:=h2!h1!e
h1 M:1 MAN pal.b[2438] c:=h1!c
h1 M:1 MAN pal.b[2442] arg1:=h1!h1!e
h1 M:1 MAN pal.b[2444] arg1:=h1!arg1
h1 M:1 MAN pal.b[2446] c:=h1!c
h1 M:1 MAN pal.b[2451] c:=h1!c
h1 M:1 MAN pal.b[2455] f:=get4(s_mmcf,f,...)+yfj
h1 M:1 MAN pal.b[2456] c:=h1!c
h1 M:1 MAN pal.b[2461] c:=h1!c
h1 M:1 MAN pal.b[2467] f:=h1!f
h1 M:1 MAN pal.b[2468] c:=h1!c
h1 M:1 MAN pal.b[2476] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2477] c:=h1!c
h1 M:1 MAN pal.b[2483] c:=h1!c
h1 M:1 MAN pal.b[2489] f:=h1!f
h1 M:1 MAN pal.b[2491] f:=h1!f
h1 M:1 MAN pal.b[2492] !t,h1!t,h2!t,h3!t:=s_tuple,h2!t,arg1,h2!c
h1 M:1 MAN pal.b[2494] c:=h1!c
h1 M:1 MAN pal.b[2499] c:=h1!c
h1 M:1 MAN pal.b[2506] c:=h1!c
h1 M:1 MAN pal.b[2511] arg1:=get4(!arg1,h1!arg1,e,...)
h1 M:1 MAN pal.b[2512] c:=h1!c
h1 M:1 MAN pal.b[2518] c:=h1!c
h1 M:1 MAN pal.b[2523] e:=h1!e
h1 M:1 MAN pal.b[2524] c:=h1!c
h1 M:1 MAN pal.b[2533] arg1:=h1!arg1
h1 M:1 MAN pal.b[2537] c:=h1!c
h1 M:1 MAN pal.b[2543] h2!f:=h1!arg1
h1 M:1 MAN pal.b[2545] c:=h1!c
h1 M:1 MAN pal.b[2550] h2!f:=h1!arg1
h1 M:1 MAN pal.b[2552] c:=h1!c
h1 M:1 MAN pal.b[2556] f:=get4(s_mmcf,f,...)+yfj
h1 M:1 MAN pal.b[2560] c:=h1!c
h1 M:1 MAN pal.b[2566] f:=h1!f
h1 M:1 MAN pal.b[2567] c:=h1!c
h1 M:1 MAN pal.b[2572] arg1:=h1!arg1
h1 M:1 MAN pal.b[2573] c:=h1!c
h1 M:1 MAN pal.b[2579] c:=h1!c
h1 M:1 MAN pal.b[2585] c:=h1!c
h1 M:1 MAN pal.b[2588] c:=h1!c
h1 M:1 MAN pal.b[2594] arg1:=h1!arg1
h1 M:1 MAN pal.b[2598] c:=h1!c
h1 M:1 MAN pal.b[2603] arg1:=h1!arg1
h1 M:1 MAN pal.b[2607] c:=h1!c
h1 M:1 MAN pal.b[2612] arg1:=h1!arg1
h1 M:1 MAN pal.b[2616] c:=h1!c
h1 M:1 MAN pal.b[2621] arg1:=h1!arg1
h1 M:1 MAN pal.b[2623] arg1:=h1!arg1
h1 M:1 MAN pal.b[2625] c:=h1!c
h1 M:1 MAN pal.b[2630] arg1:=h1!arg1
h1 M:1 MAN pal.b[2632] c:=h1!c
h1 M:1 MAN pal.b[2637] arg1:=h1!arg1
h1 M:1 MAN pal.b[2641] c:=h1!c
h1 M:1 MAN pal.b[2652] f:=h1!f
h1 M:1 MAN pal.b[2653] c:=h1!c
h1 M:1 MAN pal.b[2663] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2664] c:=h1!c
h1 M:1 MAN pal.b[2679] arg1:=h1!arg1
h1 M:1 MAN pal.b[2686] f:=h1!f
h1 M:1 MAN pal.b[2687] c:=h1!c
h1 M:1 MAN pal.b[2700] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2703] s:=h1!s
h1 M:1 MAN pal.b[2709] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2711] c:=h1!c
h1 M:1 MAN pal.b[2716] c:=h1!c
h1 M:1 MAN pal.b[2723] c:=h1!c
h1 M:1 MAN pal.b[2729] c:=h1!c
h1 M:1 MAN pal.b[272] gw1:=mul(h1!a,b)
h1 M:1 MAN pal.b[2734] c:=h1!c
h1 M:1 MAN pal.b[2739] c:=h1!c
h1 M:1 MAN pal.b[2743] TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
h1 M:1 MAN pal.b[2744] c:=h1!c
h1 M:1 MAN pal.b[2752] f:=h1!f
h1 M:1 MAN pal.b[2754] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2755] h3!f:=h1!c
h1 M:1 MAN pal.b[2763] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2765] h3!f:=h1!c
h1 M:1 MAN pal.b[276] a:=mul(a,h1!b)
h1 M:1 MAN pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
h1 M:1 MAN pal.b[2781] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2783] h3!f:=h1!c
h1 M:1 MAN pal.b[2787] c:=h1!c
h1 M:1 MAN pal.b[2791] f:=get4(s_mmcf,f,...)+yfj
h1 M:1 MAN pal.b[2795] c:=h1!c
h1 M:1 MAN pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
h1 M:1 MAN pal.b[279] RESULTIS get4(!b,h1!b,a,...)
h1 M:1 MAN pal.b[2802] c:=h1!c
h1 M:1 MAN pal.b[2808] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2810] h3!f:=h1!c
h1 M:1 MAN pal.b[2814] c:=h1!c
h1 M:1 MAN pal.b[2818] f:=get4(s_mmcf,f,...)+yfj
h1 M:1 MAN pal.b[281] h1!a,h1!b
h1 M:1 MAN pal.b[2822] c:=h1!c
h1 M:1 MAN pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
h1 M:1 MAN pal.b[2829] c:=h1!c
h1 M:1 MAN pal.b[2833] c:=h1!c
h1 M:1 MAN pal.b[2835] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2837] h3!f:=h1!c
h1 M:1 MAN pal.b[2844] c:=h1!c
h1 M:1 MAN pal.b[2845] f:=get4(s_mmcf,f,...)+yfj
h1 M:1 MAN pal.b[2852] c:=h1!c
h1 M:1 MAN pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
h1 M:1 MAN pal.b[2858] c:=h1!c
h1 M:1 MAN pal.b[2865] c:=h1!c
h1 M:1 MAN pal.b[2869] f:=get4(s_mmcf,...,...)+yfj
h1 M:1 MAN pal.b[2873] c:=h1!c
h1 M:1 MAN pal.b[2953] a:=h1!a
h1 M:1 MAN pal.b[2958] a:=h1!a
h1 M:1 MAN pal.b[2974] h1!a
h1 M:1 MAN pal.b[2981] h1!a
h1 M:1 MAN pal.b[3002] b:=h1!b
h1 M:1 MAN pal.b[3008] h2!h1!b1
h1 M:1 MAN pal.b[3024] a:=h1!a
h1 M:1 MAN pal.b[3029] h1!a
h1 M:1 MAN pal.b[3031] TEST a1=z|a1>=yloc&h1!a1=z THEN .. ELSE ..
h1 M:1 MAN pal.b[3040] h1!a
h1 M:1 MAN pal.b[3050] v:=h1!v
h1 M:1 MAN pal.b[3056] a:=h1!a
h1 M:1 MAN pal.b[3059] v:=h1!v
h1 M:1 MAN pal.b[3115] h1!c
h1 M:1 MAN pal.b[3116] h1!c:=d
h1 M:1 MAN pal.b[3125] a:=h1!a
h1 M:1 MAN pal.b[3133] g:=h1!g
h1 M:1 MAN pal.b[3149] h1!a,h2!a
h1 M:1 MAN pal.b[3192] a:=h1!a
h1 M:1 MAN pal.b[3232] h1!g,h2!g
h1 M:1 MAN pal.b[3235] !g,h1!g,h2!g,h3!g:=!n,h1!n,h2!n,h3!n
h1 M:1 MAN pal.b[3268] a:=h1!a
h1 M:1 MAN pal.b[3306] n,g:=n+1,h1!g
h1 M:1 MAN pal.b[3323] .. REPEATUNTIL h1!t=z
h1 M:1 MAN pal.b[3323] n,l,t:=n-1,ll_tup,h1!t
h1 M:1 MAN pal.b[3344] c:=flat1(h1!a,c,e,...)
h1 M:1 MAN pal.b[3351] a,cstac:=h1!a,FALSE
h1 M:1 MAN pal.b[3359] c:=flat1(h1!a,c,g,...)
h1 M:1 MAN pal.b[3375] h1!a
h1 M:1 MAN pal.b[3386] c,v,ll:=h1!v,h2!v,ll_entz
h1 M:1 MAN pal.b[3397] c,v,ll:=h1!v,h2!v,ll_enty
h1 M:1 MAN pal.b[3485] h2!h1!arg1
h1 M:1 MAN pal.b[3523] get4(!a,h1!a,...,...)
h1 M:1 MAN pal.b[3525] !a,h1!a,h2!a,h3!a:=s_mb,!gseqf,n,get4(...)
h1 M:1 MAN pal.b[3528] h1!c0:=flat1(h3!n,c,e,...)
h1 M:1 MAN pal.b[3529] a,c,cstac:=h1!n,c0,FALSE
h1 M:1 MAN pal.b[3533] a,cstac:=h1!a,FALSE
h1 M:1 MAN pal.b[3540] c,a,cstac:=h1!a3,h1!a,FALSE
h1 M:1 MAN pal.b[3555] RESULTIS loadn(h1!c,n,m)
h1 M:1 MAN pal.b[3557] c:=loadn(h1!c,n,m)
h1 M:1 MAN pal.b[3562] loadn(h1!c,n,m)
h1 M:1 MAN pal.b[3564] IF t1=h1!c&t2=h2!c DO ..
h1 M:1 MAN pal.b[3567] loadn(h1!c,n,m-1)
h1 M:1 MAN pal.b[3568] IF t1=h1!c DO ..
h1 M:1 MAN pal.b[3578] b:=h1!b
h1 M:1 MAN pal.b[3583] b:=h1!b
h1 M:1 MAN pal.b[3596] b:=h1!b
h1 M:1 MAN pal.b[3605] b:=h1!b
h1 M:1 MAN pal.b[3608] b:=h1!b
h1 M:1 MAN pal.b[3616] UNTIL h1!b=z DO ..
h1 M:1 MAN pal.b[3622] b:=h1!b
h1 M:1 MAN pal.b[3646] v:=h1!v
h1 M:1 MAN pal.b[3650] v:=h1!v
h1 M:1 MAN pal.b[3670] h1!l
h1 M:1 MAN pal.b[3671] h1!l,h2!l,h3!l:=h1!l1,v,h3!l1
h1 M:1 MAN pal.b[3674] h1!l,h2!l,h3!l:=h1!v,h2!v,ll_entz
h1 M:1 MAN pal.b[3684] h1!l,h2!l,h3!l:=h1!h1!l,v,ll
h1 M:1 MAN pal.b[3687] h1!l,h2!l,h3!l:=h1!v,h2!v,ll_enty
h1 M:1 MAN pal.b[3697] h1!l,h2!l,h3!l:=h1!h1!l,v,ll
h1 M:1 MAN pal.b[3712] h1!f
h1 M:1 MAN pal.b[3741] h1!g
h1 M:1 MAN pal.b[3744] h1!g:=g1&p_addr
h1 M:1 MAN pal.b[375] !ae,1!ae,2!ae:=h1!p,h2!p,h2!p
h1 M:1 MAN pal.b[380] !ae,1!ae:=h1!p,h2!p
h1 M:1 MAN pal.b[3812] a,b:=h1!a,h1!b
h1 M:1 MAN pal.b[3845] a,b:=h1!a,h1!b
h1 M:1 MAN pal.b[3846] h1!c0:=getx(s_numj,zsy,gw2,gw1)
h1 M:1 MAN pal.b[3847] c0:=h1!c0
h1 M:1 MAN pal.b[3849] h1!c0:=b
h1 M:1 MAN pal.b[3856] h1!c0:=a
h1 M:1 MAN pal.b[3865] a:=h1!a
h1 M:1 MAN pal.b[3866] h1!c0:=getx(s_numj,zsy,0,0)
h1 M:1 MAN pal.b[3867] c0:=h1!c0
h1 M:1 MAN pal.b[3869] h1!c0:=getx(s_numj,z,0,1)
h1 M:1 MAN pal.b[3872] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
h1 M:1 MAN pal.b[3890] a,b:=h1!a,h1!b
h1 M:1 MAN pal.b[3904] a:=h1!a
h1 M:1 MAN pal.b[3905] h1!s0:=getx(s_numj,zsy,numbb,numbb)
h1 M:1 MAN pal.b[3906] s0:=h1!s0
h1 M:1 MAN pal.b[3908] TEST gw1=0&0=gw2&h1!a=z THEN .. ELSE ..
h1 M:1 MAN pal.b[3912] h1!s0:=z
h1 M:1 MAN pal.b[3914] h1!s0:=getx(s_numj,h1!a,gw2,gw1)
h1 M:1 MAN pal.b[3920] c:=h1!c
h1 M:1 MAN pal.b[3922] IF h1!c=zsy DO ..
h1 M:1 MAN pal.b[3928] h1!c
h1 M:1 MAN pal.b[3929] h1!c:=s
h1 M:1 MAN pal.b[3953] RESULTIS getx(s_numj,...,...)+sg
h1 M:1 MAN pal.b[3957] RESULTIS getx(s_numj,...,...)+sg
h1 M:1 MAN pal.b[3958] a:=h1!a
h1 M:1 MAN pal.b[3969] a:=h1!a
h1 M:1 MAN pal.b[3970] h1!c0:=getx(s_numj,zsy,0,0)
h1 M:1 MAN pal.b[3971] c0:=h1!c0
h1 M:1 MAN pal.b[3973] h1!c0:=getx(s_numj,z,0,1)
h1 M:1 MAN pal.b[3976] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
h1 M:1 MAN pal.b[3981] RESULTIS getx(s_numj,...,...)+sg
h1 M:1 MAN pal.b[3984] a:=h1!a
h1 M:1 MAN pal.b[398] IF eqlv(h1!b,!ae) DO ..
h1 M:1 MAN pal.b[4001] a:=h1!a
h1 M:1 MAN pal.b[4002] h1!c0:=getx(s_numj,zsy,numbb,numbb)
h1 M:1 MAN pal.b[4003] c0:=h1!c0
h1 M:1 MAN pal.b[4005] TEST gw2=0&0=gw1&h1!a=z THEN .. ELSE ..
h1 M:1 MAN pal.b[4006] h1!c0:=z
h1 M:1 MAN pal.b[4007] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
h1 M:1 MAN pal.b[4050] a:=h1!a
h1 M:1 MAN pal.b[4051] h1!n0:=getx(s_numj,zsy,gw2,gw3)
h1 M:1 MAN pal.b[4052] n0:=h1!n0
h1 M:1 MAN pal.b[4055] h1!n0:=z
h1 M:1 MAN pal.b[4056] h1!n0:=getx(s_numj,z,0,gl2)
h1 M:1 MAN pal.b[4065] h1!a,b
h1 M:1 MAN pal.b[4068] a1:=h1!a1
h1 M:1 MAN pal.b[4070] b1:=h1!b1
h1 M:1 MAN pal.b[407] IF eqlv(h1!b,!ae) DO ..
h1 M:1 MAN pal.b[4094] b1,c1:=h1!b1,h1!c1
h1 M:1 MAN pal.b[4097] gl3,a:=h2!a,h1!a
h1 M:1 MAN pal.b[4101] c0:=h1!c0
h1 M:1 MAN pal.b[4114] c1:=h1!c1
h1 M:1 MAN pal.b[4125] b1:=h1!b1
h1 M:1 MAN pal.b[4128] c0:=h1!c0
h1 M:1 MAN pal.b[4132] UNTIL h1!c0=cc DO ..
h1 M:1 MAN pal.b[4133] c0:=h1!c0
h1 M:1 MAN pal.b[4134] h1!c0:=z
h1 M:1 MAN pal.b[4135] h1!cc:=z
h1 M:1 MAN pal.b[4171] a:=h1!a
h1 M:1 MAN pal.b[4180] a:=h1!a
h1 M:1 MAN pal.b[4181] n:=h1!n
h1 M:1 MAN pal.b[4184] n:=h1!n
h1 M:1 MAN pal.b[4187] IF h1!a=zsy&h2!a=0 DO ..
h1 M:1 MAN pal.b[4192] h1!a
h1 M:1 MAN pal.b[4193] h1!a:=b
h1 M:1 MAN pal.b[4232] h1!a
h1 M:1 MAN pal.b[4347] !p,h1!p,h2!p,h3!p:=-!st1,h1!st1,h2!st1,h3!st1
h1 M:1 MAN pal.b[446] 1!a:=h1!q
h1 M:1 MAN pal.b[4488] p:=h1!p
h1 M:1 MAN pal.b[4518] t:=h1!t
h1 M:1 MAN pal.b[4526] h3!t>0->3,h2!t>0->2,...>0->1,0
h1 M:1 MAN pal.b[4573] t:=h1!t
h1 M:1 MAN pal.b[4581] h3!t>0->3,h2!t>0->2,...>0->1,0
h1 M:1 MAN pal.b[463] !a:=h1!p
h1 M:1 MAN pal.b[4668] UNLESS h1!u=h1!v DO ..
h1 M:1 MAN pal.b[4688] u,v:=h1!u,h1!v
h1 M:1 MAN pal.b[4697] u,v:=h1!u,h1!v
h1 M:1 MAN pal.b[4761] b:=h1!b
h1 M:1 MAN pal.b[4764] ga1:=igcd(a+ny0,h1!b+ny0)
h1 M:1 MAN pal.b[4766] b:=(h1!b+ny0)/ga1+y0
h1 M:1 MAN pal.b[4777] b:=h1!b
h1 M:1 MAN pal.b[4778] ga1:=gcd1(a,h1!b)
h1 M:1 MAN pal.b[4783] b:=(h1!b+ny0)/ga1+y0
h1 M:1 MAN pal.b[478] 1!a:=h1!q
h1 M:1 MAN pal.b[4793] b:=smul(h1!a,h1!b)
h1 M:1 MAN pal.b[4795] h1!a
h1 M:1 MAN pal.b[4796] ga1:=igcd(h2!a+ny0,h1!b+ny0)
h1 M:1 MAN pal.b[4799] b:=smul(.../ga2+y0,.../ga1+y0)
h1 M:1 MAN pal.b[4811] RESULTIS get4(s_ratl,h1!b,a,0)
h1 M:1 MAN pal.b[4814] a:=div(a,h1!b)
h1 M:1 MAN pal.b[4821] b:=mul(h1!a,h1!b)
h1 M:1 MAN pal.b[4823] div(h2!b,h1!a)
h1 M:1 MAN pal.b[4824] a:=div(h2!a,h1!b)
h1 M:1 MAN pal.b[4836] RESULTIS get4(s_ratp,h1!b,a,...)
h1 M:1 MAN pal.b[4839] a:=div(a,h1!b)
h1 M:1 MAN pal.b[4845] mul(h1!a,h1!b)
h1 M:1 MAN pal.b[4848] div(h2!b,h1!a)
h1 M:1 MAN pal.b[4849] a:=div(h2!a,h1!b)
h1 M:1 MAN pal.b[4948] gw1,a:=signbit-h1!a,signbit-h2!a
h1 M:1 MAN pal.b[4949] gw1,a:=h1!a,h2!a
h1 M:1 MAN pal.b[4956] b:=smul(h1!a,.../ga1+y0)
h1 M:1 MAN pal.b[4965] gw1,b:=signbit-h1!b,signbit-h2!b
h1 M:1 MAN pal.b[4966] gw1,b:=h1!b,h2!b
h1 M:1 MAN pal.b[4973] a:=smul(.../ga1+y0,h1!b)
h1 M:1 MAN pal.b[4986] gw1,a:=signbit-h1!a,signbit-h2!a
h1 M:1 MAN pal.b[4987] gw1,a:=h1!a,h2!a
h1 M:1 MAN pal.b[4994] b:=smul(b,h1!a)
h1 M:1 MAN pal.b[4995] b:=longmul1(b,h1!a)
h1 M:1 MAN pal.b[5004] gw1,b:=signbit-h1!b,signbit-h2!b
h1 M:1 MAN pal.b[5005] gw1,b:=h1!b,h2!b
h1 M:1 MAN pal.b[5012] a:=smul(a,h1!b)
h1 M:1 MAN pal.b[5013] a:=longmul1(a,h1!b)
h1 M:1 MAN pal.b[5025] t,gw1:=signbit-t,signbit-h1!b
h1 M:1 MAN pal.b[5026] gw1:=h1!b
h1 M:1 MAN pal.b[5028] a:=smul(h1!a,t)
h1 M:1 MAN pal.b[5031] ga2:=igcd(h1!a+ny0,h1!b+ny0)
h1 M:1 MAN pal.b[5034] b:=smul(.../ga1+y0,.../ga2+y0)
h1 M:1 MAN pal.b[5035] a:=smul(.../ga2+y0,.../ga1+y0)
h1 M:1 MAN pal.b[504] 1!a:=h1!q
h1 M:1 MAN pal.b[5050] b:=mul(h1!a,b)
h1 M:1 MAN pal.b[5056] b:=h1!a
h1 M:1 MAN pal.b[5062] a:=mul(a,h1!b)
h1 M:1 MAN pal.b[5070] a:=h1!b
h1 M:1 MAN pal.b[5076] mul(h2!a,h1!b)
h1 M:1 MAN pal.b[5077] b:=mul(h1!a,h2!b)
h1 M:1 MAN pal.b[5082] b:=div(h1!a,h1!b)
h1 M:1 MAN pal.b[5121] h1!a
h1 M:1 MAN pal.b[5133] b:=h1!a
h1 M:1 MAN pal.b[5139] a:=mul(a,h1!b)
h1 M:1 MAN pal.b[5145] a:=h1!b
h1 M:1 MAN pal.b[5155] b:=h1!b
h1 M:1 MAN pal.b[5156] b:=div(h1!b,lcoef)
h1 M:1 MAN pal.b[5157] b2:=mul(h1!a,b2)
h1 M:1 MAN pal.b[5161] b:=mul(b2,h1!b)
h1 M:1 MAN pal.b[5162] RESULTIS get4(s_ratp,h1!a,b,...)
h1 M:1 MAN pal.b[5165] b:=div(h1!a,h1!b)
h1 M:1 MAN pal.b[516] gw1:=(Op26)#/(Op26)
h1 M:1 MAN pal.b[5323] !s,h1!s:=0,t|signbit
h1 M:1 MAN pal.b[5331] !s,s:=h1!s&p_addr,!s
h1 M:1 MAN pal.b[535] 1!a:=h1!q
h1 M:1 MAN pal.b[5411] chpoly(h1!a)
h1 M:1 MAN pal.b[5415] h1!a
h1 M:1 MAN pal.b[5419] p:=h1!p
h1 M:1 MAN pal.b[5646] x:=h1!x
h1 M:1 MAN pal.b[564] 1!a:=h1!q
h1 M:1 MAN pal.b[5702] x:=h1!x
h1 M:1 MAN pal.b[5740] s:=h1!s
h1 M:1 MAN pal.b[5762] h1!p
h1 M:1 MAN pal.b[5765] h1!p:=q
h1 M:1 MAN pal.b[5772] h1!q
h1 M:1 MAN pal.b[5773] h1!q:=p
h1 M:1 MAN pal.b[5796] prinpoly(h1!p,FALSE,TRUE,FALSE)
h1 M:1 MAN pal.b[5800] p:=h1!p
h1 M:1 MAN pal.b[5801] TEST h1!p=z THEN .. ELSE ..
h1 M:1 MAN pal.b[5822] TEST h1!h1!p2=z THEN .. ELSE ..
h1 M:1 MAN pal.b[5835] p:=h1!p
h1 M:1 MAN pal.b[5888] a:=h1!a
h1 M:1 MAN pal.b[5916] p:=h1!p
h1 M:1 MAN pal.b[5920] l:=h1!l
h1 M:1 MAN pal.b[5940] q,p:=p,h1!p
h1 M:1 MAN pal.b[5958] a:=h1!a
h1 M:1 MAN pal.b[5991] prc(h1!c,y0)
h1 M:1 MAN pal.b[5998] !zu,h1!zu,h2!zu:=s_poly,c,zj
h1 M:1 MAN pal.b[6000] h1!zu:=z
h1 M:1 MAN pal.b[6006] apply(h1!c,h2!c)
h1 M:1 MAN pal.b[6011] c:=h1!c
h1 M:1 MAN pal.b[6017] c:=h1!c
h1 M:1 MAN pal.b[6024] c:=h1!c
h1 M:1 MAN pal.b[6028] prin(h1!c)
h1 M:1 MAN pal.b[6040] c:=h1!c
h1 M:1 MAN pal.b[6061] c:=h1!c
h1 M:1 MAN pal.b[606] 1!a:=h1!q
h1 M:1 MAN pal.b[6083] UNLESS h1!c=ze DO ..
h1 M:1 MAN pal.b[6084] prc(h1!c,y1)
h1 M:1 MAN pal.b[6092] prc(h1!c,10+y0)
h1 M:1 MAN pal.b[6109] prc(h1!c,p+1)
h1 M:1 MAN pal.b[6121] prins(h1!tyv(c))
h1 M:1 MAN pal.b[6130] prins(h1!tyv(c))
h1 M:1 MAN pal.b[6136] h2!c,h1!c
h1 M:1 MAN pal.b[6144] (b1->prins1,prins)(h1!s,32)
h1 M:1 MAN pal.b[6145] prc(h2!h1!c1,getbyte(...)+y0)
h1 M:1 MAN pal.b[6154] prc(h2!h1!c1,11+y0)
h1 M:1 MAN pal.b[6172] prc(h1!c,38+y0)
h1 M:1 MAN pal.b[6179] prc(h1!c,36+y0)
h1 M:1 MAN pal.b[6238] e:=h1!e
h1 M:1 MAN pal.b[6253] prine(h1!j)
h1 M:1 MAN pal.b[6273] f:=h1!f
h1 M:1 MAN pal.b[6308] g,c0:=c0!g,compl(a,...)+2
h1 M:1 MAN pal.b[6320] g,c0:=c0!g,compl(a,...)+2
h1 M:1 MAN pal.b[6327] h1!b,@root|signbit
h1 M:1 MAN pal.b[6330] g,c0:=c0!g,compl(a,...)+2
h1 M:1 MAN pal.b[6348] s1:=h1!s1
h1 M:1 MAN pal.b[6362] a1:=h1!a1
h1 M:1 MAN pal.b[6377] a,b:=h1!a,h1!b
h1 M:1 MAN pal.b[6395] h1!a
h1 M:1 MAN pal.b[6407] n:=h1!n
h1 M:1 MAN pal.b[6414] a:=h1!a
h1 M:1 MAN pal.b[6422] a:=h1!a
h1 M:1 MAN pal.b[6430] p>=yloc->h1!p,p
h1 M:1 MAN pal.b[6455] RESULTIS h1!p
h1 M:1 MAN pal.b[646] 1!a:=h1!q
h1 M:1 MAN pal.b[6478] a:=h1!a
h1 M:1 MAN pal.b[6487] a:=h1!a
h1 M:1 MAN pal.b[648] gw2:=(Op26)#/(Op26)
h1 M:1 MAN pal.b[6505] v:=h1!v
h1 M:1 MAN pal.b[6509] v:=h2!h1!v
h1 M:1 MAN pal.b[6527] p:=h1!p
h1 M:1 MAN pal.b[6541] q:=h1!q
h1 M:1 MAN pal.b[6543] h1!p:=q
h1 M:1 MAN pal.b[6551] t:=h1!t
h1 M:1 MAN pal.b[6555] p,q:=h1!p,h1!q
h1 M:1 MAN pal.b[6565] q,l,p:=get4(s_tuple,q,...),l+1,h1!p
h1 M:1 MAN pal.b[6572] h1!p
h1 M:1 MAN pal.b[6573] h1!p,h3!p:=q,l
h1 M:1 MAN pal.b[6622] n:=h1!n
h1 M:1 MAN pal.b[6625] e:=h1!e
h1 M:1 MAN pal.b[6633] h1!e:=get4(s_e,h1!e,v,n)
h1 M:1 MAN pal.b[6698] a:=h1!a
h1 M:1 MAN pal.b[6714] IF h1!a=z DO ..
h1 M:1 MAN pal.b[6737] a:=h1!a
h1 M:1 MAN pal.b[674] 1!a:=h1!q
h1 M:1 MAN pal.b[6791] a:=h1!a
h1 M:1 MAN pal.b[6869] c1,h1!gg,gg:=str1,getx(s_string,...),h1!gg
h1 M:1 MAN pal.b[6873] h1!gg:=z
h1 M:1 MAN pal.b[6932] p:=h1!p
h1 M:1 MAN pal.b[6937] RESULTIS get4(s_ratn,h1!p,...,0)
h1 M:1 MAN pal.b[693] q:=h1!q
h1 M:1 MAN pal.b[6940] RESULTIS get4(!p,h1!p,t,...)
h1 M:1 MAN pal.b[6952] p:=h1!p
h1 M:1 MAN pal.b[6984] p:=h1!p
h1 M:1 MAN pal.b[6992] p:=h1!p
h1 M:1 MAN pal.b[6993] q,p:=signbit-q,signbit-h1!p
h1 M:1 MAN pal.b[6999] p:=h1!p
h1 M:1 MAN pal.b[7001] p:=neg(h1!p)
h1 M:1 MAN pal.b[7005] RESULTIS div(h1!p,h2!p)
h1 M:1 MAN pal.b[7045] p:=h1!p
h1 M:1 MAN pal.b[7049] RESULTIS (h2!p+ny0)/(h1!p+ny0)+y0
h1 M:1 MAN pal.b[7050] longdiv,h1!p
h1 M:1 MAN pal.b[7054] RESULTIS divpoly(h2!p,h1!p)
h1 M:1 MAN pal.b[7069] p:=h1!p
h1 M:1 MAN pal.b[7074] RESULTIS getx(s_flt,0,...,0)
h1 M:1 MAN pal.b[7114] ee:=h1!ee
h1 M:1 MAN pal.b[7123] v:=h1!v
h1 M:1 MAN pal.b[7128] w:=h1!w
h1 M:1 MAN pal.b[7136] v:=h1!v
h1 M:1 MAN pal.b[7139] w:=h1!w
h1 M:1 MAN pal.b[7148] w:=h1!w
h1 M:1 MAN pal.b[7174] v:=h1!v
h1 M:1 MAN pal.b[7179] w:=h1!w
h1 M:1 MAN pal.b[7184] f:=get4(s_mb,f,...)+yfj
h1 M:1 MAN pal.b[7195] w:=h1!w
h1 M:1 MAN pal.b[7219] v,w,h2!f,h3!f:=h2!f2,h2!f3,h1!f2,h1!f3
h1 M:1 MAN pal.b[7222] f:=h1!f
h1 M:1 MAN pal.b[7229] v:=h1!v
h1 M:1 MAN pal.b[7232] w:=h1!w
h1 M:1 MAN pal.b[7243] e:=h1!e
h1 M:1 MAN pal.b[7245] h1!e1,h2!e1,h3!e1:=h1!e2,h2!e2,h3!e2
h1 M:1 MAN pal.b[7251] e:=h1!e
h1 M:1 MAN pal.b[7301] writef("*n# Ar' %P: %E*n",h1!c,print,a)
h1 M:1 MAN pal.b[7306] gw0,gw1,gw2:=dotrace1,h1!c,h2!c
h1 M:1 MAN pal.b[7318] h1!s
h1 M:1 MAN pal.b[7323] h1!s:=get4(s_mb,s1,b,n)
h1 M:1 MAN pal.b[7326] h1!s:=get4(s_mb,z,b,n)
h1 M:1 MAN pal.b[7347] RESULTIS p=h1!q
h1 M:1 MAN pal.b[7351] RESULTIS h1!p=q
h1 M:1 MAN pal.b[7354] p:=h1!p
h1 M:1 MAN pal.b[7356] q:=h1!q
h1 M:1 MAN pal.b[7360] p,q:=h1!p,h1!q
h1 M:1 MAN pal.b[7373] UNLESS h1!p=h1!q DO ..
h1 M:1 MAN pal.b[7390] p,q:=h1!p,h1!q
h1 M:1 MAN pal.b[7396] p,q:=h1!p,h1!q
h1 M:1 MAN pal.b[7437] ga1:=(h2!p-y0)/(h1!p-y0)+y0
h1 M:1 MAN pal.b[7445] ga1:=(h2!q-y0)/(h1!q-y0)+y0
h1 M:1 MAN pal.b[7458] ga1,ga2:=h2!p-y0,h1!p-y0
h1 M:1 MAN pal.b[7459] ga3,ga4:=h2!q-y0,h1!q-y0
h1 M:1 MAN pal.b[7473] q,p:=mul(h1!p,q),h2!p
h1 M:1 MAN pal.b[7474] p,q:=mul(p,h1!q),h2!q
h1 M:1 MAN pal.b[7475] mul(h2!p,h1!q)
h1 M:1 MAN pal.b[7476] q:=mul(h1!p,h2!q)
h1 M:1 MAN pal.b[7537] RESULTIS get4(s_poly,...,...)+(p&ysg)
h1 M:1 MAN pal.b[7544] p:=h1!pXORp&ysg
h1 M:1 MAN pal.b[7550] p:=h1!pXORp&ysg
h1 M:1 MAN pal.b[7564] p,q:=h1!pXORp&ysg,h1!qXORq&ysg
h1 M:1 MAN pal.b[7569] h1!r1,r1:=tXORr1&ysg,t
h1 M:1 MAN pal.b[7570] p:=h1!p
h1 M:1 MAN pal.b[7572] h1!r1:=qXORr1&ysg
h1 M:1 MAN pal.b[7578] h1!r1,r1:=tXORr1&ysg,t
h1 M:1 MAN pal.b[7579] q:=h1!qXORq&ysg
h1 M:1 MAN pal.b[7581] h1!r1:=pXORr1&ysg
h1 M:1 MAN pal.b[7589] h1!r1,r1:=fXORr1&ysg,f
h1 M:1 MAN pal.b[7590] p,q:=h1!pXORp&ysg,h1!qXORq&ysg
h1 M:1 MAN pal.b[7599] h1!r1:=z
h1 M:1 MAN pal.b[7600] h1!r1:=qXORr1&ysg
h1 M:1 MAN pal.b[7604] h1!r1:=pXORr1&ysg
h1 M:1 MAN pal.b[7617] p:=h1!pXORp&ysg
h1 M:1 MAN pal.b[7621] p:=h1!pXORp&ysg
h1 M:1 MAN pal.b[7623] h1!r:=p
h1 M:1 MAN pal.b[7625] h1!r:=get4(s_polyj,p,a,y0)
h1 M:1 MAN pal.b[7644] p:=h1!p
h1 M:1 MAN pal.b[7647] h1!qq,qq:=r,r
h1 M:1 MAN pal.b[7648] p:=h1!p
h1 M:1 MAN pal.b[7649] h1!qq:=z
h1 M:1 MAN pal.b[7668] p,q:=h1!p,h1!q
h1 M:1 MAN pal.b[7675] h1!r0
h1 M:1 MAN pal.b[7678] r1a:=h1!r1a
h1 M:1 MAN pal.b[7685] h1!r1,r1:=t,t
h1 M:1 MAN pal.b[7689] r1a:=h1!r1a
h1 M:1 MAN pal.b[7690] h1!r1:=r1a
h1 M:1 MAN pal.b[7693] r1a:=h1!r1a
h1 M:1 MAN pal.b[7696] q1:=h1!q1XORq1&ysg
h1 M:1 MAN pal.b[7704] r1a:=h1!r1a
h1 M:1 MAN pal.b[7707] p:=h1!pXORp&ysg
h1 M:1 MAN pal.b[7709] h1!r1:=z
h1 M:1 MAN pal.b[7722] copyu(h1!pXORp&ysg)
h1 M:1 MAN pal.b[7723] copyv(h1!qXORq&ysg)
h1 M:1 MAN pal.b[7730] u:=h1!u
h1 M:1 MAN pal.b[7734] h1!v
h1 M:1 MAN pal.b[7737] uu:=h1!uu
h1 M:1 MAN pal.b[7740] uu,vv:=h1!uu,h1!vv
h1 M:1 MAN pal.b[7748] TEST h3!u=y0&h1!u=z THEN .. ELSE ..
h1 M:1 MAN pal.b[7751] TEST h3!r=y0&h1!r=z THEN .. ELSE ..
h1 M:1 MAN pal.b[7763] copyu(h1!pXORp&ysg)
h1 M:1 MAN pal.b[7765] copyv(h1!qXORq&ysg)
h1 M:1 MAN pal.b[7772] u:=h1!u
h1 M:1 MAN pal.b[7774] h1!v
h1 M:1 MAN pal.b[7778] uu:=h1!uu
h1 M:1 MAN pal.b[7782] uu,vv:=h1!uu,h1!vv
h1 M:1 MAN pal.b[7786] uu:=h1!uu
h1 M:1 MAN pal.b[7795] TEST h3!u=y0&h1!u=z THEN .. ELSE ..
h1 M:1 MAN pal.b[7820] p:=h1!pXORp&ysg
h1 M:1 MAN pal.b[7835] p:=h1!pXORp&ysg
h1 M:1 MAN pal.b[7843] h1!p
h1 M:1 MAN pal.b[7845] h1!p:=q
h1 M:1 MAN pal.b[7852] h1!aXORa&ysg
h1 M:1 MAN pal.b[7853] UNTIL h1!q=z DO ..
h1 M:1 MAN pal.b[7854] q:=h1!qXORq&ysg
h1 M:1 MAN pal.b[7865] a:=h1!a
h1 M:1 MAN pal.b[7869] h1!rr,rr:=s,sXORrr&ysg
h1 M:1 MAN pal.b[7870] a:=h1!a
h1 M:1 MAN pal.b[7871] h1!rr:=get4(s_polyj,z,...)XORrr&ysg
h1 M:1 MAN pal.b[7881] 0,h1!p
h1 M:1 MAN pal.b[7883] UNTIL h1!d1=z DO ..
h1 M:1 MAN pal.b[7884] d1:=h1!d1
h1 M:1 MAN pal.b[7936] UNLESS h1!a=h1!b DO ..
h1 M:1 MAN pal.b[7942] UNLESS eqlv(h1!a,h1!b) DO ..
h1 M:1 MAN pal.b[7948] a,b:=h1!a,h1!b
h1 M:1 MAN pal.b[8465] h1!s,!s:=t,0
h1 M:1 MAN pal.b[8474] IF h1!i<0 DO ..
h1 M:1 MAN pal.b[8517] s:=h1!s
h1 M:1 MAN pal.b[8519] h1!s
h1 M:1 MAN pal.b[8520] h1!s,h3!s:=h3!s,0
h1 M:1 MAN pal.b[8529] s:=h1!s
h1 M:1 MAN pal.b[8531] h1!s
h1 M:1 MAN pal.b[8532] h1!s:=0
h1 M:1 MAN pal.b[8543] h1!i,stackp:=stackp,i
h1 M:1 MAN pal.b[8549] h1!s
h1 M:1 MAN pal.b[8582] h1!p
h1 M:1 MAN pal.b[8583] h1!p:=i+(t&p_tag)
h1 M:1 MAN pal.b[8599] b0:=h1!b0
h1 M:1 MAN pal.b[8603] b0:=h1!b0
h1 M:1 MAN pal.b[8609] b0:=h1!b0
h1 M:1 MAN pal.b[8613] h1!a0&p_tag
h1 M:1 MAN pal.b[8614] WHILE (h1!b0&p_tag)<a1 DO ..
h1 M:1 MAN pal.b[8616] b0:=h1!b0
h1 M:1 MAN pal.b[8619] IF (h1!b0&p_tag)=a1 DO ..
h1 M:1 MAN pal.b[8622] a0:=h1!a0
h1 M:1 MAN pal.b[8631] a0:=h1!a0
h1 M:1 MAN pal.b[8632] h1!a:=(b0&p_addr)+(a0&p_tag)
h1 M:1 MAN pal.b[8634] h1!b,b:=t,t
h1 M:1 MAN pal.b[8685] h1!a,h2!a,h3!a
h1 M:1 MAN pal.b[8696] IF h1!s2<=a1 DO ..
h1 M:1 MAN pal.b[8697] IF h1!s2<a1 DO ..
h1 M:1 MAN pal.b[8717] IF h1!s2<a1 DO ..
h1 M:1 MAN pal.b[8735] UNTIL h1!t2>=a1 DO ..
h1 M:1 MAN pal.b[8738] IF h1!t2=a1&h2!t2<=a2 DO ..
h1 M:1 MAN pal.b[8742] IF h1!t2>a1 DO ..
h1 M:1 MAN pal.b[8750] IF h2!t2>a2|h1!t2>a1 DO ..
h1 M:1 MAN pal.b[8776] !a&p_tagp,h1!a,h2!a,h3!a
h1 M:1 MAN pal.b[8778] h1!s1
h1 M:1 MAN pal.b[8786] h3!a,h1!a:=a1,0
h1 M:1 MAN pal.b[8796] t2:=h1!t1
h1 M:1 MAN pal.b[8801] t2:=h1!t1
h1 M:1 MAN pal.b[8808] s2:=h1!s2
h1 M:1 MAN pal.b[8813] s2:=h1!s2
h1 M:1 MAN pal.b[8820] t2:=h1!t2
h1 M:1 MAN pal.b[8824] t2:=h1!t2
h1 M:1 MAN pal.b[8832] h1!a:=s2
h1 M:1 MAN pal.b[8833] h1!s1:=(a&p_addr)+signbit
h1 M:1 MAN pal.b[8838] h1!a:=t2
h1 M:1 MAN pal.b[8839] h1!t1:=a&p_addr
h1 M:1 MAN pal.b[8850] h1!a:=a1t+zsq
h1 M:1 MAN pal.b[8857] b:=h1!b
h1 M:1 MAN pal.b[8861] b:=h1!b
h1 M:1 MAN pal.b[8869] b:=h1!b
h1 M:1 MAN pal.b[8874] IF (h1!b&p_tag)<=a1t DO ..
h1 M:1 MAN pal.b[8875] IF (h1!b&p_tag)<a1t DO ..
h1 M:1 MAN pal.b[8877] b:=h1!b
h1 M:1 MAN pal.b[8879] .. REPEATWHILE (h1!b&p_tag)<a1t
h1 M:1 MAN pal.b[8880] IF (h1!b&p_tag)>a1t DO ..
h1 M:1 MAN pal.b[8891] h1!a:=(b&p_addr)+a1t
h1 M:1 MAN pal.b[8892] h1!a1:=(a&p_addr)+(b&p_tag)
h1 M:1 MAN pal.b[9287] IF alphc&h1!s0=z DO ..
h1 M:1 MAN pal.b[9439] s2,h1!gg,gg:=str1,getx(s_string,...),h1!gg
h1 M:1 MAN pal.b[9446] h1!gg:=z
h1 M:1 MAN pal.b[9459] g:=h1!g
h1 M:1 MAN pal.b[9465] !g0,h1!g0,h2!g0,h3!g0:=!a,h1!a,h2!a,h3!a
h1 M:1 MAN pal.b[9486] h1!e1:=mlet(zsy,zsy,zsy)
h1 M:1 MAN pal.b[9487] e1:=h1!e1
h1 M:1 MAN pal.b[9491] h1!e1:=rexp(y1)
h1 M:1 MAN pal.b[9493] h1!e1:=ze
h1 M:1 MAN pal.b[9595] h1!e2:=e
h1 M:1 MAN pal.b[9783] a:=h1!a
h1 M:1 MAN pal.b[9835] a:=h1!a
h1 M:1 MAN pal.b[9861] d:=h1!d
h1 M:1 MAN pal.b[9866] d:=h1!d
h1 M:1 MAN pal.b[9872] c:=h1!c
h1 M:1 MAN pal.b[9879] c,d:=h1!c,h1!d
h1 M:1 MAN pal.b[9893] ap1(h1!a,h2!a)
h1 M:1 MAN pal.b[9896] !a,h1!a,h2!a,h3!a:=!s,h1!s,h2!s,h3!s
h1 M:1 MAN pal.b[9926] RESULTIS v3(h2!b,h2!...,a)
h1 M:1 MAN pal.b[9963] IF t=a_fclos&h1!a=ze DO ..
h2 M:2 DEF palhdr.h[55] h2=2
h2 M:2 MAN pal.b[10008] RESULTIS get4(sg,f,b,...)
h2 M:2 MAN pal.b[10157] b1:=h2!b1
h2 M:2 MAN pal.b[10168] f2:=h2!f2
h2 M:2 MAN pal.b[10175] f:=h2!f
h2 M:2 MAN pal.b[10185] a:=h2!a
h2 M:2 MAN pal.b[10188] b2:=h2!b2
h2 M:2 MAN pal.b[10190] c2:=h2!c2
h2 M:2 MAN pal.b[10203] b:=h2!b
h2 M:2 MAN pal.b[10206] c:=h2!c
h2 M:2 MAN pal.b[10216] h2!b:=get4(s_colon,a,...,0)
h2 M:2 MAN pal.b[10230] b:=h2!b
h2 M:2 MAN pal.b[10231] h2!b0:=0
h2 M:2 MAN pal.b[10232] h2!a:=get4(s_seq,h2!a,b,0)
h2 M:2 MAN pal.b[10235] h2!b:=get4(s_seq,a,...,0)
h2 M:2 MAN pal.b[10250] b:=h2!b
h2 M:2 MAN pal.b[10251] h2!b0:=0
h2 M:2 MAN pal.b[10254] c:=h2!c
h2 M:2 MAN pal.b[10255] h2!c0:=0
h2 M:2 MAN pal.b[10256] h2!a:=get4(s_cond,h2!a,b,c)
h2 M:2 MAN pal.b[10262] c:=h2!c
h2 M:2 MAN pal.b[10263] h2!c0:=0
h2 M:2 MAN pal.b[10264] h2!b:=get4(s_cond,a,...,c)
h2 M:2 MAN pal.b[10267] h2!c:=get4(s_cond,a,b,...)
h2 M:2 MAN pal.b[10283] e:=linseq(h2!a,e,f,x)
h2 M:2 MAN pal.b[10290] e:=linseq(h2!a,e,f,x)
h2 M:2 MAN pal.b[10294] e:=linseq(h2!a,e,f,x)
h2 M:2 MAN pal.b[103] a:=sadd(a+h2!b+signbit)
h2 M:2 MAN pal.b[104] a:=longas1(a,h2!b,TRUE)
h2 M:2 MAN pal.b[112] a:=longas1(a,h2!b,TRUE)
h2 M:2 MAN pal.b[117] a:=smul(h2!a,.../ga1+y0)
h2 M:2 MAN pal.b[119] b:=smul(h2!b,u)
h2 M:2 MAN pal.b[1417] difr1(h2!p)
h2 M:2 MAN pal.b[1420] s2:=mul(s2,h2!p)
h2 M:2 MAN pal.b[1428] mdash(h2!p)
h2 M:2 MAN pal.b[1436] r:=get4(s_poly,zsy,...,...)
h2 M:2 MAN pal.b[1438] mul(h2!p1,h3!p1)
h2 M:2 MAN pal.b[1445] r:=h2!r0
h2 M:2 MAN pal.b[1446] r:=neg(h2!r0)
h2 M:2 MAN pal.b[1453] difr1(h2!p1)
h2 M:2 MAN pal.b[1459] t:=get4(s_poly,t,...)+(p1&ysg)
h2 M:2 MAN pal.b[145] a:=add(a,h2!b)
h2 M:2 MAN pal.b[151] a:=mul(h2!a,v)
h2 M:2 MAN pal.b[154] a:=mul(h2!a,t)
h2 M:2 MAN pal.b[157] b:=mul(h2!b,u)
h2 M:2 MAN pal.b[1726] arg1:=h2!c
h2 M:2 MAN pal.b[1732] arg1:=h2!g
h2 M:2 MAN pal.b[1758] arg1:=get4(!c,e,...,...)
h2 M:2 MAN pal.b[1761] e:=get4(s_e,e,zsy,...)
h2 M:2 MAN pal.b[1762] f,m,c:=get4(m,...)+yfj,s_mmf2r,h1!c
h2 M:2 MAN pal.b[1765] e:=get4(s_e,e,zsy,...)
h2 M:2 MAN pal.b[1769] arg1:=(h3!c)(arg1,h2!c)
h2 M:2 MAN pal.b[1772] f,m,c:=get4(m,...)+yfj,s_mms,h1!c
h2 M:2 MAN pal.b[1777] c:=h2!c
h2 M:2 MAN pal.b[1784] f,m,c:=get4(m,...)+yfj,s_mmal,h1!c
h2 M:2 MAN pal.b[1788] arg1:=h2!c
h2 M:2 MAN pal.b[1796] f,m,c:=get4(m,...)+yfj,s_mma1,h2!c
h2 M:2 MAN pal.b[1799] arg1:=h2!c
h2 M:2 MAN pal.b[1805] e:=get4(s_e,h1!c,arg1,...)
h2 M:2 MAN pal.b[1810] f,m,c:=get4(m,...)+yfj,s_mmf1,h2!c
h2 M:2 MAN pal.b[1814] f,m,c:=get4(m,...)+yfj,s_mmf1a,h2!c
h2 M:2 MAN pal.b[1817] h2!c
h2 M:2 MAN pal.b[1818] f,m,c:=get4(m,...)+yfj,s_mma2l,h2!h1!c1
h2 M:2 MAN pal.b[1821] h2!c
h2 M:2 MAN pal.b[1822] f,m,c:=get4(m,...)+yfj,s_mmf2l,h2!h1!c1
h2 M:2 MAN pal.b[1825] arg1:=h2!c
h2 M:2 MAN pal.b[1831] arg1:=h2!c
h2 M:2 MAN pal.b[1839] arg1:=h2!c
h2 M:2 MAN pal.b[1840] h2!h1!arg1
h2 M:2 MAN pal.b[1843] arg1:=h2!arg1
h2 M:2 MAN pal.b[1849] h2!c
h2 M:2 MAN pal.b[1850] e:=get4(s_e,h1!c,a2,...)
h2 M:2 MAN pal.b[1851] e:=get4(s_e,e,arg1,...)
h2 M:2 MAN pal.b[1856] arg1:=h2!c
h2 M:2 MAN pal.b[1857] h2!h1!arg1
h2 M:2 MAN pal.b[1860] arg1:=h2!arg1
h2 M:2 MAN pal.b[1866] arg1:=ff_tuple(h2!c)
h2 M:2 MAN pal.b[1870] e:=binda(h2!c,arg1,h1!c)
h2 M:2 MAN pal.b[1874] f,m,c:=get4(m,...)+yfj,s_mmaa,h2!c
h2 M:2 MAN pal.b[1876] f,m,c:=get4(m,...)+yfj,s_mmt,h2!c
h2 M:2 MAN pal.b[1879] f,m,c:=get4(m,...)+yfj,s_mmaq,h2!c
h2 M:2 MAN pal.b[1882] arg1:=h2!c
h2 M:2 MAN pal.b[1886] c:=h2!h1!c
h2 M:2 MAN pal.b[1889] f,c:=z,h2!c
h2 M:2 MAN pal.b[1897] f,m,c:=get4(m,...)+yfj,s_mmcond,h1!c
h2 M:2 MAN pal.b[1906] c:=h2!c
h2 M:2 MAN pal.b[1909] f,m,c:=get4(m,...)+yfj,s_mmlet,h3!c
h2 M:2 MAN pal.b[1917] e:=bind(h2!c,arg1,e)
h2 M:2 MAN pal.b[1926] e:=get4(s_e,e,arg1,...)
h2 M:2 MAN pal.b[1937] c:=h2!c
h2 M:2 MAN pal.b[1938] h1!e1,h2!e1,h3!e1:=h1!e,h2!e,h3!e
h2 M:2 MAN pal.b[1959] e,f,j:=h1!j,h3!j,h2!j
h2 M:2 MAN pal.b[1967] e,c,j:=h1!j,h3!j,h2!j
h2 M:2 MAN pal.b[1975] e,f,j:=h1!j,h3!j,h2!j
h2 M:2 MAN pal.b[1980] e,f,j:=h1!j,h3!j,h2!j
h2 M:2 MAN pal.b[1987] e,f,j:=h1!j,h3!j,h2!j
h2 M:2 MAN pal.b[1988] h2!f:=arg1
h2 M:2 MAN pal.b[1996] c:=h2!f
h2 M:2 MAN pal.b[2024] e:=bind(h3!c,arg1,h2!c)
h2 M:2 MAN pal.b[2030] e:=h2!c
h2 M:2 MAN pal.b[2036] e:=get4(s_e,ze,arg1,...)
h2 M:2 MAN pal.b[2045] q_selinput(h2!c-y0)
h2 M:2 MAN pal.b[2049] q_seloutput(h2!c-y0)
h2 M:2 MAN pal.b[2072] arg1:=(h2!c)(arg1)
h2 M:2 MAN pal.b[2080] arg1:=(h2!c)(h2!h1!arg1,h2!arg1)
h2 M:2 MAN pal.b[2086] arg1:=(h2!c)(h2!h1!gw0,h2!gw0,h2!arg1)
h2 M:2 MAN pal.b[2092] gw1:=h2!gw0
h2 M:2 MAN pal.b[2094] gw2:=h2!c
h2 M:2 MAN pal.b[2095] arg1:=gw2(h2!h1!gw0,h2!gw0,gw1,...)
h2 M:2 MAN pal.b[2109] arg1:=h2!arg1
h2 M:2 MAN pal.b[2117] arg1:=h2!c
h2 M:2 MAN pal.b[2132] arg1:=h2!c
h2 M:2 MAN pal.b[2134] h2!c,arg1
h2 M:2 MAN pal.b[2164] arg1:=h2!c
h2 M:2 MAN pal.b[2165] arg1:=neg(h2!c)
h2 M:2 MAN pal.b[217] b:=sadd(h2!a-b)
h2 M:2 MAN pal.b[218] b:=longas1(bXORysg,h2!a,TRUE)
h2 M:2 MAN pal.b[2207] e:=get4(s_e,h1!c,arg1,...)
h2 M:2 MAN pal.b[2215] h2!c
h2 M:2 MAN pal.b[2227] e:=bind(h2!c,arg1,h1!c)
h2 M:2 MAN pal.b[2232] j:=h2!c
h2 M:2 MAN pal.b[2240] e,j:=h1!c,h2!c
h2 M:2 MAN pal.b[2253] c:=h2!f
h2 M:2 MAN pal.b[2261] c:=h2!f
h2 M:2 MAN pal.b[2267] h2!f,h3!f:=h1!c,arg1
h2 M:2 MAN pal.b[2268] m,c:=s_mmt,h2!c
h2 M:2 MAN pal.b[226] a:=sadd(a-h2!b)
h2 M:2 MAN pal.b[2275] c:=h2!f
h2 M:2 MAN pal.b[227] a:=longas1(a,h2!b,FALSE)
h2 M:2 MAN pal.b[2281] m,c:=s_mmt,h2!c
h2 M:2 MAN pal.b[2289] c:=h2!f
h2 M:2 MAN pal.b[2293] e:=binda(h2!c,arg1,h1!c)
h2 M:2 MAN pal.b[2302] c:=h2!f
h2 M:2 MAN pal.b[2306] e:=get4(s_e,h1!c,arg1,...)
h2 M:2 MAN pal.b[2319] c:=h2!f
h2 M:2 MAN pal.b[2331] f:=get4(!f,...,...)+yfj
h2 M:2 MAN pal.b[2340] c:=h2!f
h2 M:2 MAN pal.b[2345] h2!c
h2 M:2 MAN pal.b[2346] e:=get4(s_e,h1!c,v,...)
h2 M:2 MAN pal.b[2347] e:=get4(s_e,e,arg1,...)
h2 M:2 MAN pal.b[2358] f:=get4(!f,...,...)+yfj
h2 M:2 MAN pal.b[235] b:=longas1(b,h2!a,TRUE)
h2 M:2 MAN pal.b[2367] c,gw0:=h2!f,h3!f
h2 M:2 MAN pal.b[2377] c:=h2!f
h2 M:2 MAN pal.b[2387] c:=h2!f
h2 M:2 MAN pal.b[239] a:=longas1(a,h2!b,FALSE)
h2 M:2 MAN pal.b[2403] c:=h2!f
h2 M:2 MAN pal.b[2415] arg1:=h2!c
h2 M:2 MAN pal.b[2420] f:=get4(s_mmcf,f,...)+yfj
h2 M:2 MAN pal.b[2425] FOR i=4+y0 TO h2!c DO..
h2 M:2 MAN pal.b[2427] arg1:=h2!arg1
h2 M:2 MAN pal.b[2432] arg1:=h2!e
h2 M:2 MAN pal.b[2437] arg1:=h2!h1!e
h2 M:2 MAN pal.b[2443] FOR i=4+y0 TO h2!c DO..
h2 M:2 MAN pal.b[2445] f:=get4(s_mmcf,f,...)+yfj
h2 M:2 MAN pal.b[244] a:=smul(h2!a,.../ga1+y0)
h2 M:2 MAN pal.b[2450] f:=get4(s_mmcf,f,...)+yfj
h2 M:2 MAN pal.b[2455] f:=get4(s_mmcf,f,...)+yfj
h2 M:2 MAN pal.b[2466] arg1:=h2!f
h2 M:2 MAN pal.b[246] b:=smul(h2!b,u)
h2 M:2 MAN pal.b[2473] gw0:=get4(s_tuple,h2!f,arg1,...)
h2 M:2 MAN pal.b[2475] h2!f:=gw0
h2 M:2 MAN pal.b[2488] arg1:=get4(s_tuple,h2!f,arg1,...)
h2 M:2 MAN pal.b[2492] !t,h1!t,h2!t,h3!t:=s_tuple,h2!t,arg1,h2!c
h2 M:2 MAN pal.b[2504] arg1:=h2!c
h2 M:2 MAN pal.b[2505] arg1:=get4(!arg1,e,...,...)
h2 M:2 MAN pal.b[2510] arg1:=h2!c
h2 M:2 MAN pal.b[2517] e:=bind(h2!c,arg1,e)
h2 M:2 MAN pal.b[2522] FOR i=y1 TO h2!c DO..
h2 M:2 MAN pal.b[2536] e:=get4(s_e,e,arg1,...)
h2 M:2 MAN pal.b[2542] arg1:=h2!f
h2 M:2 MAN pal.b[2543] h2!f:=h1!arg1
h2 M:2 MAN pal.b[2544] arg1:=h2!arg1
h2 M:2 MAN pal.b[2549] arg1:=h2!f
h2 M:2 MAN pal.b[2550] h2!f:=h1!arg1
h2 M:2 MAN pal.b[2551] e:=get4(s_e,e,...,...)
h2 M:2 MAN pal.b[2559] arg1:=h2!arg1
h2 M:2 MAN pal.b[2564] arg1:=h2!h2!f
h2 M:2 MAN pal.b[2571] e:=get4(s_e,e,...,...)
h2 M:2 MAN pal.b[2577] arg1:=h2!arg1
h2 M:2 MAN pal.b[2578] e:=get4(s_e,e,arg1,...)
h2 M:2 MAN pal.b[2584] h2!c
h2 M:2 MAN pal.b[2587] e:=get4(s_e,e,arg1,...)
h2 M:2 MAN pal.b[2597] arg1:=(h2!c)(arg1)
h2 M:2 MAN pal.b[2605] arg1:=h2!arg1
h2 M:2 MAN pal.b[2646] arg1:=(h2!c)(h2!f,arg1)
h2 M:2 MAN pal.b[2649] arg1:=(h2!c)(arg1,h2!f)
h2 M:2 MAN pal.b[2657] gw0:=(h2!c)(h2!f,arg1)
h2 M:2 MAN pal.b[2660] gw0:=(h2!c)(arg1,h2!f)
h2 M:2 MAN pal.b[2662] h2!f:=gw0
h2 M:2 MAN pal.b[2670] arg1:=h2!f
h2 M:2 MAN pal.b[2672] t:=h2!f
h2 M:2 MAN pal.b[2691] h2!f,arg1
h2 M:2 MAN pal.b[2693] s,t:=arg1,h2!f
h2 M:2 MAN pal.b[2698] h2!f:=get4(s_tuple,z,t,y1)
h2 M:2 MAN pal.b[2707] h2!f:=get4(s_tuple,s,t,...)
h2 M:2 MAN pal.b[2728] e:=get4(s_e,e,zsy,...)
h2 M:2 MAN pal.b[2733] arg1:=(h2!c)(arg1,h3!e)
h2 M:2 MAN pal.b[2738] arg1:=difr(arg1,h2!c)
h2 M:2 MAN pal.b[2745] c:=h2!c
h2 M:2 MAN pal.b[274] a:=minu(h2!a,gw1)
h2 M:2 MAN pal.b[2751] h2!f
h2 M:2 MAN pal.b[2754] f:=get4(s_mmcf,...,...)+yfj
h2 M:2 MAN pal.b[2762] h2!f
h2 M:2 MAN pal.b[2766] c:=h2!f
h2 M:2 MAN pal.b[2773] c:=h2!f
h2 M:2 MAN pal.b[277] a:=minu(a,h2!b)
h2 M:2 MAN pal.b[2781] f:=get4(s_mmcf,...,...)+yfj
h2 M:2 MAN pal.b[2785] c:=h2!c
h2 M:2 MAN pal.b[2786] e:=h2!c
h2 M:2 MAN pal.b[2793] c:=h2!c
h2 M:2 MAN pal.b[2794] e:=h2!c
h2 M:2 MAN pal.b[2800] c:=h2!c
h2 M:2 MAN pal.b[2801] e:=h2!c
h2 M:2 MAN pal.b[2808] f:=get4(s_mmcf,...,...)+yfj
h2 M:2 MAN pal.b[2812] c:=h2!c
h2 M:2 MAN pal.b[2813] e:=get4(s_e,ze,arg1,...)
h2 M:2 MAN pal.b[2820] c:=h2!c
h2 M:2 MAN pal.b[2821] e:=get4(s_e,ze,arg1,...)
h2 M:2 MAN pal.b[2827] c:=h2!c
h2 M:2 MAN pal.b[2828] e:=get4(s_e,ze,arg1,...)
h2 M:2 MAN pal.b[2835] f:=get4(s_mmcf,...,...)+yfj
h2 M:2 MAN pal.b[2840] c:=h2!c
h2 M:2 MAN pal.b[2848] c:=h2!c
h2 M:2 MAN pal.b[284] a:=mul(h2!a,v)
h2 M:2 MAN pal.b[2855] c:=h2!c
h2 M:2 MAN pal.b[2860] c:=h2!c
h2 M:2 MAN pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
h2 M:2 MAN pal.b[2869] f:=get4(s_mmcf,...,...)+yfj
h2 M:2 MAN pal.b[2871] h3!f:=h2!c
h2 M:2 MAN pal.b[287] a:=mul(h2!a,t)
h2 M:2 MAN pal.b[290] b:=mul(h2!b,u)
h2 M:2 MAN pal.b[2951] UNLESS evsy(h2!a) DO ..
h2 M:2 MAN pal.b[2956] a:=h2!a
h2 M:2 MAN pal.b[2969] get4(!a,e,...,...)
h2 M:2 MAN pal.b[2973] e:=get4(s_e,e,zsy,...)
h2 M:2 MAN pal.b[2977] RESULTIS (h3!a)(b,h2!a)
h2 M:2 MAN pal.b[2984] RESULTIS difr(b,h2!a)
h2 M:2 MAN pal.b[2991] h2!a
h2 M:2 MAN pal.b[2998] h2!a
h2 M:2 MAN pal.b[3007] h2!a
h2 M:2 MAN pal.b[3008] h2!h1!b1
h2 M:2 MAN pal.b[3011] b1:=h2!b1
h2 M:2 MAN pal.b[3019] h2!a
h2 M:2 MAN pal.b[3033] a:=h2!a
h2 M:2 MAN pal.b[3042] a:=h2!a
h2 M:2 MAN pal.b[3049] e:=get4(s_e,e,zsy,...)
h2 M:2 MAN pal.b[3052] h2!a
h2 M:2 MAN pal.b[3055] h2!v:=a2
h2 M:2 MAN pal.b[3130] flatten(h2!g)
h2 M:2 MAN pal.b[3131] h2!g:=t
h2 M:2 MAN pal.b[3136] flatten(h2!a)
h2 M:2 MAN pal.b[3138] h3!a:=h2!a
h2 M:2 MAN pal.b[3139] h2!a:=a2
h2 M:2 MAN pal.b[3149] h1!a,h2!a
h2 M:2 MAN pal.b[3210] efsy(h2!a,n+1)
h2 M:2 MAN pal.b[3216] a,n:=h2!a,n+1
h2 M:2 MAN pal.b[3232] h1!g,h2!g
h2 M:2 MAN pal.b[3234] n:=h2!n
h2 M:2 MAN pal.b[3235] !g,h1!g,h2!g,h3!g:=!n,h1!n,h2!n,h3!n
h2 M:2 MAN pal.b[3256] a:=h2!a
h2 M:2 MAN pal.b[3322] c:=flat1(h2!t,c,e,...)
h2 M:2 MAN pal.b[3326] a,cstac:=h2!t,FALSE
h2 M:2 MAN pal.b[3343] e:=simenv(e,h2!a)
h2 M:2 MAN pal.b[3346] a:=h2!a
h2 M:2 MAN pal.b[3350] c:=get4(s_cd,c,...,ll_dash)
h2 M:2 MAN pal.b[3358] simenv(e,h2!a)
h2 M:2 MAN pal.b[3360] TEST fbv(h2!a)&matchbv(h2!a,...,FALSE) THEN .. ELSE ..
h2 M:2 MAN pal.b[3361] c:=flatbv(c,h2!a)
h2 M:2 MAN pal.b[3362] c:=get4(s_cd,c,...,ll_bind)
h2 M:2 MAN pal.b[3377] ll_ap,h2!a1
h2 M:2 MAN pal.b[3386] c,v,ll:=h1!v,h2!v,ll_entz
h2 M:2 MAN pal.b[3393] a,cstac:=h2!a,FALSE
h2 M:2 MAN pal.b[3395] IF matchbv(h3!v,h2!a,FALSE) DO ..
h2 M:2 MAN pal.b[3397] c,v,ll:=h1!v,h2!v,ll_enty
h2 M:2 MAN pal.b[3404] a,cstac:=h2!a,FALSE
h2 M:2 MAN pal.b[3418] TEST matchbv(h2!v,h2!a,FALSE) THEN .. ELSE ..
h2 M:2 MAN pal.b[3441] a,cstac:=h2!a,FALSE
h2 M:2 MAN pal.b[3453] c:=flat1(h2!a,c,e,...)
h2 M:2 MAN pal.b[3461] a,cstac:=h2!a,FALSE
h2 M:2 MAN pal.b[3479] a,cstac:=h2!a,FALSE
h2 M:2 MAN pal.b[3484] h2!a
h2 M:2 MAN pal.b[3485] h2!h1!arg1
h2 M:2 MAN pal.b[3486] arg1:=h2!arg1
h2 M:2 MAN pal.b[3523] get4(!a,h1!a,...,...)
h2 M:2 MAN pal.b[3525] !a,h1!a,h2!a,h3!a:=s_mb,!gseqf,n,get4(...)
h2 M:2 MAN pal.b[3527] h2!c0:=flat1(h2!n,c,e,...)
h2 M:2 MAN pal.b[3532] c:=flat1(h2!a,c,e,...)
h2 M:2 MAN pal.b[3536] a:=h2!a
h2 M:2 MAN pal.b[3537] IF h2!a3=c DO ..
h2 M:2 MAN pal.b[3554] IF n=y1&...=ll_na1|n=y2&...=ll_na2|n=h2!c&h3!c=ll_na DO ..
h2 M:2 MAN pal.b[3556] IF n=y1&...=ll_na1f|n=y2&...=ll_na2f|n=h2!c&h3!c=ll_naf DO ..
h2 M:2 MAN pal.b[3563] loadn(h2!c,n,m)
h2 M:2 MAN pal.b[3564] IF t1=h1!c&t2=h2!c DO ..
h2 M:2 MAN pal.b[3570] RESULTIS get4(s_cd,t1,...,...)
h2 M:2 MAN pal.b[3581] UNLESS fbv(h2!b) DO ..
h2 M:2 MAN pal.b[3603] c:=get4(s_cd,c,...,ll)
h2 M:2 MAN pal.b[3607] c:=flatbv(c,h2!b)
h2 M:2 MAN pal.b[360] f:=(h3!h2!f)(p,q,f)
h2 M:2 MAN pal.b[3617] h2!b
h2 M:2 MAN pal.b[3623] c:=flatbv(c,h2!b)
h2 M:2 MAN pal.b[3629] RESULTIS get4(s_cd,c,...,ll)
h2 M:2 MAN pal.b[3649] e:=simenv(e,h2!v)
h2 M:2 MAN pal.b[3654] v:=h2!v
h2 M:2 MAN pal.b[3668] h2!l,h3!l
h2 M:2 MAN pal.b[3671] h1!l,h2!l,h3!l:=h1!l1,v,h3!l1
h2 M:2 MAN pal.b[3674] h1!l,h2!l,h3!l:=h1!v,h2!v,ll_entz
h2 M:2 MAN pal.b[3684] h1!l,h2!l,h3!l:=h1!h1!l,v,ll
h2 M:2 MAN pal.b[3687] h1!l,h2!l,h3!l:=h1!v,h2!v,ll_enty
h2 M:2 MAN pal.b[3697] h1!l,h2!l,h3!l:=h1!h1!l,v,ll
h2 M:2 MAN pal.b[3728] h2!k
h2 M:2 MAN pal.b[3731] h2!k:=k2&p_addr
h2 M:2 MAN pal.b[375] !ae,1!ae,2!ae:=h1!p,h2!p,h2!p
h2 M:2 MAN pal.b[3808] TEST h2!a>h2!b THEN .. ELSE ..
h2 M:2 MAN pal.b[380] !ae,1!ae:=h1!p,h2!p
h2 M:2 MAN pal.b[3810] UNLESS h2!a=h2!b DO ..
h2 M:2 MAN pal.b[381] 2!ae:=rev(h2!p)
h2 M:2 MAN pal.b[3840] gw2:=h2!a+h2!b+cy
h2 M:2 MAN pal.b[3859] gw2:=h2!a
h2 M:2 MAN pal.b[3861] gw2:=h2!a+1
h2 M:2 MAN pal.b[3885] gw2:=h2!a-h2!b-cy
h2 M:2 MAN pal.b[3898] gw2:=h2!a
h2 M:2 MAN pal.b[3900] UNLESS h2!a=0 DO ..
h2 M:2 MAN pal.b[3901] gw2:=h2!a-1
h2 M:2 MAN pal.b[3918] WHILE h2!c=0 DO ..
h2 M:2 MAN pal.b[3953] RESULTIS getx(s_numj,...,...)+sg
h2 M:2 MAN pal.b[3955] gw2:=h2!a+1
h2 M:2 MAN pal.b[3963] gw2:=h2!a
h2 M:2 MAN pal.b[3965] gw2:=h2!a+1
h2 M:2 MAN pal.b[3981] RESULTIS getx(s_numj,...,...)+sg
h2 M:2 MAN pal.b[3983] gw2:=h2!a-1
h2 M:2 MAN pal.b[3995] gw2:=h2!a
h2 M:2 MAN pal.b[3997] UNLESS h2!a=0 DO ..
h2 M:2 MAN pal.b[3998] gw2:=h2!a-1
h2 M:2 MAN pal.b[399] IF eqlv(h2!b,1!ae) DO ..
h2 M:2 MAN pal.b[401] RESULTIS mlet(h2!b,2!ae,h3!b)
h2 M:2 MAN pal.b[4044] gl2:=muldiv(h2!a,gl1,numba)
h2 M:2 MAN pal.b[4076] gw2:=h2!c1+muldiv(gl3,...,numba)
h2 M:2 MAN pal.b[4085] gl1:=muldiv(gl3,h2!b1,numba)
h2 M:2 MAN pal.b[4093] h2!c1:=gw2
h2 M:2 MAN pal.b[4097] gl3,a:=h2!a,h1!a
h2 M:2 MAN pal.b[4104] gw2:=h2!c1
h2 M:2 MAN pal.b[4113] h2!c1:=gw2
h2 M:2 MAN pal.b[4116] gw2:=h2!c1+muldiv(gl3,...,numba)
h2 M:2 MAN pal.b[4127] h2!c1:=gw2
h2 M:2 MAN pal.b[4130] TEST h2!cc=0&0=h3!cc THEN .. ELSE ..
h2 M:2 MAN pal.b[4170] n:=getx(s_numj,n,...,...)
h2 M:2 MAN pal.b[4173] UNLESS h2!n=0 DO ..
h2 M:2 MAN pal.b[4174] result2:=h2!nMODgl1
h2 M:2 MAN pal.b[4175] h2!n:=h2!n/gl1
h2 M:2 MAN pal.b[4182] h2!n:=sdiv(result2,h2!n,gl1)
h2 M:2 MAN pal.b[4187] IF h1!a=zsy&h2!a=0 DO ..
h2 M:2 MAN pal.b[4347] !p,h1!p,h2!p,h3!p:=-!st1,h1!st1,h2!st1,h3!st1
h2 M:2 MAN pal.b[449] gw2:=h2!q
h2 M:2 MAN pal.b[4526] h3!t>0->3,h2!t>0->2,...>0->1,0
h2 M:2 MAN pal.b[4581] h3!t>0->3,h2!t>0->2,...>0->1,0
h2 M:2 MAN pal.b[4662] UNLESS h2!u#=h2!v DO ..
h2 M:2 MAN pal.b[4681] UNLESS h2!u=h2!v DO ..
h2 M:2 MAN pal.b[4687] UNLESS h2!u=h2!v&h3!u=h3!v DO ..
h2 M:2 MAN pal.b[4706] .. REPEATWHILE eqpoly(h2!u,h2!v,f<ysg)
h2 M:2 MAN pal.b[4760] a:=smul(a,h2!b)
h2 M:2 MAN pal.b[4765] a:=smul(.../ga1+y0,h2!b)
h2 M:2 MAN pal.b[4776] a:=longmul1(a,h2!b)
h2 M:2 MAN pal.b[4781] a:=smul(a,h2!b)
h2 M:2 MAN pal.b[4782] a:=longmul1(a,h2!b)
h2 M:2 MAN pal.b[4792] smul(h2!a,h2!b)
h2 M:2 MAN pal.b[4796] ga1:=igcd(h2!a+ny0,h1!b+ny0)
h2 M:2 MAN pal.b[4797] ga2:=igcd(t+ny0,h2!b+ny0)
h2 M:2 MAN pal.b[4798] a:=smul(.../ga1+y0,.../ga2+y0)
h2 M:2 MAN pal.b[4810] a:=mul(a,h2!b)
h2 M:2 MAN pal.b[4815] b:=h2!b
h2 M:2 MAN pal.b[4820] mul(h2!a,h2!b)
h2 M:2 MAN pal.b[4823] div(h2!b,h1!a)
h2 M:2 MAN pal.b[4824] a:=div(h2!a,h1!b)
h2 M:2 MAN pal.b[4835] a:=mul(a,h2!b)
h2 M:2 MAN pal.b[4841] b:=h2!b
h2 M:2 MAN pal.b[4846] a:=mul(h2!a,h2!b)
h2 M:2 MAN pal.b[4848] div(h2!b,h1!a)
h2 M:2 MAN pal.b[4849] a:=div(h2!a,h1!b)
h2 M:2 MAN pal.b[4948] gw1,a:=signbit-h1!a,signbit-h2!a
h2 M:2 MAN pal.b[4949] gw1,a:=h1!a,h2!a
h2 M:2 MAN pal.b[4953] ga1:=igcd(h2!a+ny0,b+ny0)
h2 M:2 MAN pal.b[4957] a:=(h2!a+ny0)/ga1+y0
h2 M:2 MAN pal.b[4964] TEST h2!b<y0 THEN .. ELSE ..
h2 M:2 MAN pal.b[4965] gw1,b:=signbit-h1!b,signbit-h2!b
h2 M:2 MAN pal.b[4966] gw1,b:=h1!b,h2!b
h2 M:2 MAN pal.b[4970] ga1:=igcd(a+ny0,h2!b+ny0)
h2 M:2 MAN pal.b[4971] IF h2!b<y0 DO ..
h2 M:2 MAN pal.b[4974] b:=(h2!b+ny0)/ga1+y0
h2 M:2 MAN pal.b[4986] gw1,a:=signbit-h1!a,signbit-h2!a
h2 M:2 MAN pal.b[4987] gw1,a:=h1!a,h2!a
h2 M:2 MAN pal.b[4989] ga1:=gcd1(b,h2!a)
h2 M:2 MAN pal.b[4996] a:=(h2!a+ny0)/ga1+y0
h2 M:2 MAN pal.b[5003] TEST h2!b<y0 THEN .. ELSE ..
h2 M:2 MAN pal.b[5004] gw1,b:=signbit-h1!b,signbit-h2!b
h2 M:2 MAN pal.b[5005] gw1,b:=h1!b,h2!b
h2 M:2 MAN pal.b[5007] ga1:=gcd1(a,h2!b)
h2 M:2 MAN pal.b[5008] IF h2!b<y0 DO ..
h2 M:2 MAN pal.b[5014] b:=(h2!b+ny0)/ga1+y0
h2 M:2 MAN pal.b[5023] h2!b
h2 M:2 MAN pal.b[5027] b:=smul(h2!a,gw1)
h2 M:2 MAN pal.b[5029] h2!b
h2 M:2 MAN pal.b[5030] ga1:=igcd(h2!a+ny0,t+ny0)
h2 M:2 MAN pal.b[5034] b:=smul(.../ga1+y0,.../ga2+y0)
h2 M:2 MAN pal.b[5051] a:=h2!a
h2 M:2 MAN pal.b[5055] gw1:=div(h2!a,b)
h2 M:2 MAN pal.b[5063] b:=h2!b
h2 M:2 MAN pal.b[5069] gw1:=div(h2!b,a)
h2 M:2 MAN pal.b[5076] mul(h2!a,h1!b)
h2 M:2 MAN pal.b[5077] b:=mul(h1!a,h2!b)
h2 M:2 MAN pal.b[5081] div(h2!a,h2!b)
h2 M:2 MAN pal.b[5125] a:=h2!a
h2 M:2 MAN pal.b[5126] a:=div(h2!a,lcoef)
h2 M:2 MAN pal.b[5129] a:=div(h2!a,b)
h2 M:2 MAN pal.b[5132] div(h2!a,b)
h2 M:2 MAN pal.b[5140] b:=h2!b
h2 M:2 MAN pal.b[5144] div(h2!b,a)
h2 M:2 MAN pal.b[5151] h2!b
h2 M:2 MAN pal.b[5158] b:=mul(h2!a,b)
h2 M:2 MAN pal.b[5160] b2:=div(h2!a,b2)
h2 M:2 MAN pal.b[5164] div(h2!a,h2!b)
h2 M:2 MAN pal.b[516] gw1:=(Op26)#/(Op26)
h2 M:2 MAN pal.b[517] gw2:=h2!q
h2 M:2 MAN pal.b[5340] writeargp(h2!dd3,TRUE)
h2 M:2 MAN pal.b[5409] IF h2!a=y0 DO ..
h2 M:2 MAN pal.b[5412] chpoly(h2!a)
h2 M:2 MAN pal.b[5417] IF (p&p_addr)=zsy|h2!p=y0 DO ..
h2 M:2 MAN pal.b[5644] x:=h2!x
h2 M:2 MAN pal.b[5652] wrflt(h2!x)
h2 M:2 MAN pal.b[5676] s0,s1:="%A",h2!x
h2 M:2 MAN pal.b[5695] s1:=h2!x
h2 M:2 MAN pal.b[5697] x:=h2!x
h2 M:2 MAN pal.b[5707] s0,s1:="#G%N",h2!x-y0
h2 M:2 MAN pal.b[5767] UNLESS h2!p=0 DO ..
h2 M:2 MAN pal.b[5768] writen(h2!p)
h2 M:2 MAN pal.b[5775] writel(h2!p,numwi)
h2 M:2 MAN pal.b[5781] h2!n,h3!n
h2 M:2 MAN pal.b[5794] prinpoly(h2!p,f,TRUE,FALSE)
h2 M:2 MAN pal.b[5798] h2!p,zero,"- "|signbit
h2 M:2 MAN pal.b[5805] h2!p,h3!p>y0
h2 M:2 MAN pal.b[5860] !a,h2!a,h3!a
h2 M:2 MAN pal.b[5895] prinbv(h2!a)
h2 M:2 MAN pal.b[5915] prinl(h2!p)
h2 M:2 MAN pal.b[5942] f(h2!q)
h2 M:2 MAN pal.b[5989] prc(h2!c,y0)
h2 M:2 MAN pal.b[5998] !zu,h1!zu,h2!zu:=s_poly,c,zj
h2 M:2 MAN pal.b[6006] apply(h1!c,h2!c)
h2 M:2 MAN pal.b[6010] prc(h2!c,48+y0)
h2 M:2 MAN pal.b[6016] prc(h2!c,9+y0)
h2 M:2 MAN pal.b[6022] c:=h2!c
h2 M:2 MAN pal.b[6032] c:=h2!c
h2 M:2 MAN pal.b[6034] writef("*n#codez %P",h2!c)
h2 M:2 MAN pal.b[6060] prinbv(h2!c)
h2 M:2 MAN pal.b[6064] prinbv(h2!c)
h2 M:2 MAN pal.b[6075] prinbv(h2!c)
h2 M:2 MAN pal.b[6079] prinbv(h2!c3)
h2 M:2 MAN pal.b[6094] prc(h2!c,10+y0)
h2 M:2 MAN pal.b[6111] prc(h2!c,p)
h2 M:2 MAN pal.b[6123] prc(h2!c,35+y0)
h2 M:2 MAN pal.b[6131] prc(h2!c,35+y0)
h2 M:2 MAN pal.b[6136] h2!c,h1!c
h2 M:2 MAN pal.b[6143] prc(h2!c1,getbyte(...)+y0)
h2 M:2 MAN pal.b[6145] prc(h2!h1!c1,getbyte(...)+y0)
h2 M:2 MAN pal.b[6150] prc(h2!c1,11+y0)
h2 M:2 MAN pal.b[6154] prc(h2!h1!c1,11+y0)
h2 M:2 MAN pal.b[6174] prc(h2!c,41+y0)
h2 M:2 MAN pal.b[6180] FOR i=y1 TO h2!c DO..
h2 M:2 MAN pal.b[6237] f(h2!e)
h2 M:2 MAN pal.b[6257] j:=h2!j
h2 M:2 MAN pal.b[6272] writef("*n cel'%Zand %E",g,...,...)
h2 M:2 MAN pal.b[6308] g,c0:=c0!g,compl(a,...)+2
h2 M:2 MAN pal.b[6320] g,c0:=c0!g,compl(a,...)+2
h2 M:2 MAN pal.b[6330] g,c0:=c0!g,compl(a,...)+2
h2 M:2 MAN pal.b[635] gw1:=h2!p
h2 M:2 MAN pal.b[6362] v!i:=rvv(h2!a1)
h2 M:2 MAN pal.b[6369] TEST h2!a<h2!b THEN .. ELSE ..
h2 M:2 MAN pal.b[6371] UNLESS h2!a=h2!b DO ..
h2 M:2 MAN pal.b[6398] h2!a
h2 M:2 MAN pal.b[6443] RESULTIS h2!p
h2 M:2 MAN pal.b[6477] f(h2!a)
h2 M:2 MAN pal.b[6485] f(h2!a)
h2 M:2 MAN pal.b[648] gw2:=(Op26)#/(Op26)
h2 M:2 MAN pal.b[6503] y1,h2!v
h2 M:2 MAN pal.b[6506] i:=h2!v
h2 M:2 MAN pal.b[6509] v:=h2!h1!v
h2 M:2 MAN pal.b[650] gw2:=h2!q
h2 M:2 MAN pal.b[6550] h3!t:=rvv(h2!t)
h2 M:2 MAN pal.b[6553] assg(h2!p,h3!q)
h2 M:2 MAN pal.b[6565] q,l,p:=get4(s_tuple,q,...),l+1,h1!p
h2 M:2 MAN pal.b[6624] RESULTIS h2!e
h2 M:2 MAN pal.b[6679] f:=h2!f
h2 M:2 MAN pal.b[6680] f:=h2!f&p_addr
h2 M:2 MAN pal.b[6702] RESULTIS h2!a-y0
h2 M:2 MAN pal.b[6713] RESULTIS h2!a
h2 M:2 MAN pal.b[6715] h2!a*numba
h2 M:2 MAN pal.b[6716] IF t/numba=h2!a DO ..
h2 M:2 MAN pal.b[6736] u!i:=transbcpl(h2!a,n)
h2 M:2 MAN pal.b[6792] RESULTIS h2!a
h2 M:2 MAN pal.b[6893] h2!name(a)
h2 M:2 MAN pal.b[6937] RESULTIS get4(s_ratn,h1!p,...,0)
h2 M:2 MAN pal.b[6939] neg(h2!p)
h2 M:2 MAN pal.b[6941] RESULTIS getx(s_flt,0,...,0)
h2 M:2 MAN pal.b[6955] RESULTIS h2!p>=y0
h2 M:2 MAN pal.b[6957] p:=h2!p
h2 M:2 MAN pal.b[6959] RESULTIS h2!p#>=#0e0
h2 M:2 MAN pal.b[6990] h2!p
h2 M:2 MAN pal.b[6997] h2!p
h2 M:2 MAN pal.b[7005] RESULTIS div(h1!p,h2!p)
h2 M:2 MAN pal.b[7009] IF h2!p#=#0e0 DO ..
h2 M:2 MAN pal.b[7011] RESULTIS getx(s_flt,0,...,0)
h2 M:2 MAN pal.b[7047] RESULTIS sadd(Op27)
h2 M:2 MAN pal.b[7049] RESULTIS (h2!p+ny0)/(h1!p+ny0)+y0
h2 M:2 MAN pal.b[7053] RESULTIS f(h2!p,q)
h2 M:2 MAN pal.b[7054] RESULTIS divpoly(h2!p,h1!p)
h2 M:2 MAN pal.b[7074] RESULTIS getx(s_flt,0,...,0)
h2 M:2 MAN pal.b[7113] RESULTIS h2!ee
h2 M:2 MAN pal.b[7135] k:=bind(h2!v,h2!w,k)
h2 M:2 MAN pal.b[7141] v:=h2!v
h2 M:2 MAN pal.b[7145] v:=h2!v
h2 M:2 MAN pal.b[7149] v:=h2!v
h2 M:2 MAN pal.b[7155] h2!v:=w
h2 M:2 MAN pal.b[7158] h2!v:=w
h2 M:2 MAN pal.b[7185] v,w:=h2!v,h2!w
h2 M:2 MAN pal.b[7188] v:=h2!v
h2 M:2 MAN pal.b[7192] v:=h2!v
h2 M:2 MAN pal.b[7196] v:=h2!v
h2 M:2 MAN pal.b[7203] h2!v:=w
h2 M:2 MAN pal.b[7206] h2!v:=w
h2 M:2 MAN pal.b[7216] h2!f
h2 M:2 MAN pal.b[7219] v,w,h2!f,h3!f:=h2!f2,h2!f3,h1!f2,h1!f3
h2 M:2 MAN pal.b[7228] k:=get4(s_e,k,...,...)
h2 M:2 MAN pal.b[7245] h1!e1,h2!e1,h3!e1:=h1!e2,h2!e2,h3!e2
h2 M:2 MAN pal.b[7250] h2!e:=a
h2 M:2 MAN pal.b[7273] a:=h2!a
h2 M:2 MAN pal.b[7292] h3!a:=h2!a3
h2 M:2 MAN pal.b[7306] gw0,gw1,gw2:=dotrace1,h1!c,h2!c
h2 M:2 MAN pal.b[7371] RESULTIS h2!p#=h2!q
h2 M:2 MAN pal.b[7386] RESULTIS h2!p=h2!q
h2 M:2 MAN pal.b[7388] UNLESS h2!p=h2!q&h3!p=h3!q DO ..
h2 M:2 MAN pal.b[7406] .. REPEATWHILE eqpoly(h2!p,h2!q,f)
h2 M:2 MAN pal.b[7437] ga1:=(h2!p-y0)/(h1!p-y0)+y0
h2 M:2 MAN pal.b[7443] RESULTIS h2!p>y0
h2 M:2 MAN pal.b[7445] ga1:=(h2!q-y0)/(h1!q-y0)+y0
h2 M:2 MAN pal.b[7451] RESULTIS h2!q<y0
h2 M:2 MAN pal.b[7458] ga1,ga2:=h2!p-y0,h1!p-y0
h2 M:2 MAN pal.b[7459] ga3,ga4:=h2!q-y0,h1!q-y0
h2 M:2 MAN pal.b[7473] q,p:=mul(h1!p,q),h2!p
h2 M:2 MAN pal.b[7474] p,q:=mul(p,h1!q),h2!q
h2 M:2 MAN pal.b[7475] mul(h2!p,h1!q)
h2 M:2 MAN pal.b[7476] q:=mul(h1!p,h2!q)
h2 M:2 MAN pal.b[7541] h2!p
h2 M:2 MAN pal.b[7548] mul(h2!p,aa)
h2 M:2 MAN pal.b[7560] get4(s_poly,zsy,...,...)
h2 M:2 MAN pal.b[7568] get4(s_polyj,zsy,...)+sg
h2 M:2 MAN pal.b[7577] get4(s_polyj,zsy,...)+(q&ysg)
h2 M:2 MAN pal.b[7586] f:=f(h2!p,h2!q)
h2 M:2 MAN pal.b[7597] RESULTIS h2!r1
h2 M:2 MAN pal.b[7598] RESULTIS neg(h2!r1)
h2 M:2 MAN pal.b[7616] get4(s_poly,zsy,...,...)
h2 M:2 MAN pal.b[7620] a:=f(a,h2!p)
h2 M:2 MAN pal.b[7642] get4(s_poly,zsy,...)+(p&ysg)
h2 M:2 MAN pal.b[7645] f(h2!p,a)
h2 M:2 MAN pal.b[7662] get4(s_poly,zsy,...,...)
h2 M:2 MAN pal.b[7669] qXORp&ysg,h2!p
h2 M:2 MAN pal.b[7680] mul(p2,h2!q1)
h2 M:2 MAN pal.b[7687] t:=f(h2!r1a,t)
h2 M:2 MAN pal.b[7691] h2!r1a:=t
h2 M:2 MAN pal.b[7725] q:=h2!v
h2 M:2 MAN pal.b[7729] f(h2!u,q)
h2 M:2 MAN pal.b[7738] mul(rr,h2!vv)
h2 M:2 MAN pal.b[7739] h2!uu:=minu(h2!uu,t)
h2 M:2 MAN pal.b[7749] u:=h2!u
h2 M:2 MAN pal.b[7750] u:=get4(s_poly,u,...,...)
h2 M:2 MAN pal.b[7752] r:=h2!r
h2 M:2 MAN pal.b[7753] r:=get4(s_poly,r,...,...)
h2 M:2 MAN pal.b[7767] q:=h2!v
h2 M:2 MAN pal.b[7771] h2!u
h2 M:2 MAN pal.b[7777] h2!uu:=f(h2!uu,q)
h2 M:2 MAN pal.b[7779] mul(rr,h2!vv)
h2 M:2 MAN pal.b[7780] f(h2!uu,q)
h2 M:2 MAN pal.b[7781] h2!uu:=minu(s,t)
h2 M:2 MAN pal.b[7785] h2!uu:=f(h2!uu,q)
h2 M:2 MAN pal.b[7796] u:=h2!u
h2 M:2 MAN pal.b[7797] u:=get4(s_poly,u,...,...)
h2 M:2 MAN pal.b[7815] h2!p
h2 M:2 MAN pal.b[7828] h2!p
h2 M:2 MAN pal.b[7844] UNLESS h2!p=y0 DO ..
h2 M:2 MAN pal.b[7855] h2!q
h2 M:2 MAN pal.b[7863] get4(s_poly,zsy,...)+(a&ysg)
h2 M:2 MAN pal.b[7867] div(h2!a,t)
h2 M:2 MAN pal.b[7930] RESULTIS h2!a#=h2!b
h2 M:2 MAN pal.b[7931] RESULTIS h2!a#=#-h2!b
h2 M:2 MAN pal.b[7938] a,b:=h2!a,h2!b
h2 M:2 MAN pal.b[7944] a,b:=h2!a,h2!b
h2 M:2 MAN pal.b[7955] .. REPEATWHILE h3!a=h3!b&eqpoly(h2!a,...,f)
h2 M:2 MAN pal.b[7984] RESULTIS h2!linkword(s_glo,s,...)
h2 M:2 MAN pal.b[7991] RESULTIS h2!linkword(s_glo,s,...)
h2 M:2 MAN pal.b[7997] RESULTIS h2!linkword(s_glo,s,...)
h2 M:2 MAN pal.b[8004] RESULTIS h2!linkword(s_glo,s,...)
h2 M:2 MAN pal.b[8009] RESULTIS h2!linkword(s_glo,s,...)
h2 M:2 MAN pal.b[8014] RESULTIS h2!linkword(s_glo,a,...)
h2 M:2 MAN pal.b[8019] RESULTIS h2!linkword(s_glo,a,...)
h2 M:2 MAN pal.b[8046] RESULTIS h2!linkword(s_glo,a,...)
h2 M:2 MAN pal.b[8051] RESULTIS h2!linkword(n,s,...)
h2 M:2 MAN pal.b[8247] set_z(!a_qu,"qu",...,...)
h2 M:2 MAN pal.b[8255] set_z(!a_fclos,"fn",...,...)
h2 M:2 MAN pal.b[8265] set_z(!typ!s_seq,"<>",...,...)
h2 M:2 MAN pal.b[8596] !a0&p_tagp,h2!a0,h3!a0
h2 M:2 MAN pal.b[8597] WHILE h2!b0<a2 DO ..
h2 M:2 MAN pal.b[8600] IF h2!b0=a2 DO ..
h2 M:2 MAN pal.b[8604] IF h2!b0>a2 DO ..
h2 M:2 MAN pal.b[8610] IF h2!b0>a2|h3!b0>a3 DO ..
h2 M:2 MAN pal.b[8617] IF h2!b0>a2|h3!b0>a3|(!b0&p_tagp)>ay DO ..
h2 M:2 MAN pal.b[8685] h1!a,h2!a,h3!a
h2 M:2 MAN pal.b[8701] IF h2!s2<=a2 DO ..
h2 M:2 MAN pal.b[8702] IF h2!s2<a2 DO ..
h2 M:2 MAN pal.b[8738] IF h1!t2=a1&h2!t2<=a2 DO ..
h2 M:2 MAN pal.b[8739] IF h2!t2<a2 DO ..
h2 M:2 MAN pal.b[8743] .. REPEATWHILE h2!t2<a2
h2 M:2 MAN pal.b[8744] IF h2!t2>a2 DO ..
h2 M:2 MAN pal.b[8750] IF h2!t2>a2|h1!t2>a1 DO ..
h2 M:2 MAN pal.b[8776] !a&p_tagp,h1!a,h2!a,h3!a
h2 M:2 MAN pal.b[8793] IF h2!s2<=a2 DO ..
h2 M:2 MAN pal.b[8794] IF h2!s2<a2 DO ..
h2 M:2 MAN pal.b[8818] UNTIL h2!t2>=a2 DO ..
h2 M:2 MAN pal.b[8821] IF h2!t2=a2&h3!t2<=a3 DO ..
h2 M:2 MAN pal.b[8825] IF h2!t2>a2 DO ..
h2 M:2 MAN pal.b[8855] UNTIL h2!b>=a2 DO ..
h2 M:2 MAN pal.b[8858] IF h2!b=a2&h3!b<=a3 DO ..
h2 M:2 MAN pal.b[8862] IF h2!b>a2 DO ..
h2 M:2 MAN pal.b[8870] IF h3!b>a3|h2!b>a2 DO ..
h2 M:2 MAN pal.b[8878] IF (...&p_tagp)>a0|h3!b>a3|h2!b>a2 DO ..
h2 M:2 MAN pal.b[9293] k2,k3:=h2!s0,h3!s0
h2 M:2 MAN pal.b[9294] h2!s0,h3!s0:=k2&lwc,k3&lwc
h2 M:2 MAN pal.b[9296] IF s1~=0&h3!h2!s1<0 DO ..
h2 M:2 MAN pal.b[9299] h2!s0,h3!s0:=k2,k3
h2 M:2 MAN pal.b[9348] s1:=h2!s0
h2 M:2 MAN pal.b[9355] mfn:=h2!s1
h2 M:2 MAN pal.b[9360] mfn:=h2!mfn
h2 M:2 MAN pal.b[9386] s0:=h2!s1
h2 M:2 MAN pal.b[9458] g,h2!g
h2 M:2 MAN pal.b[9465] !g0,h1!g0,h2!g0,h3!g0:=!a,h1!a,h2!a,h3!a
h2 M:2 MAN pal.b[9680] h2!d:=rbvlist(s_relop+y0)
h2 M:2 MAN pal.b[9684] h3!d:=rec(h2!d,h3!d)
h2 M:2 MAN pal.b[9691] h2!d,h3!d
h2 M:2 MAN pal.b[9698] aug(z,h2!d)
h2 M:2 MAN pal.b[9701] d2:=aug(d2,h2!d)
h2 M:2 MAN pal.b[9703] h2!d,h3!d:=d2,revd(d3)
h2 M:2 MAN pal.b[9781] UNLESS simname(h2!a) DO ..
h2 M:2 MAN pal.b[9815] TEST simname(h2!a) THEN .. ELSE ..
h2 M:2 MAN pal.b[9834] n:=h2!a+1
h2 M:2 MAN pal.b[9863] d:=h2!d
h2 M:2 MAN pal.b[9877] UNLESS matchbv(h2!c,h2!d,f) DO ..
h2 M:2 MAN pal.b[9883] RESULTIS simname(h2!c)
h2 M:2 MAN pal.b[9893] ap1(h1!a,h2!a)
h2 M:2 MAN pal.b[9896] !a,h1!a,h2!a,h3!a:=!s,h1!s,h2!s,h3!s
h2 M:2 MAN pal.b[9903] ll_ap,h2!a
h2 M:2 MAN pal.b[9919] RESULTIS mk_a1v(a,b,h2!v)
h2 M:2 MAN pal.b[9921] RESULTIS mk_a1(a,b,h2!v)
h2 M:2 MAN pal.b[9926] RESULTIS v3(h2!b,h2!...,a)
h2 M:2 MAN pal.b[9930] RESULTIS get4(sg,a,b,...)
h2 M:2 MAN pal.b[9942] IF b>0&!b=s_tuple&h3!b=h3!h2!v DO ..
h2 M:2 MAN pal.b[9964] RESULTIS mlet(h2!a,b,h3!a)
h3 M:3 DEF palhdr.h[56] h3=3
h3 M:3 MAN pal.b[10017] TEST h3!v=y2 THEN .. ELSE ..
h3 M:3 MAN pal.b[10174] e:=get4(s_colon,h1!f,e,...)
h3 M:3 MAN pal.b[10182] WHILE a>0&h3!a=null&(!a=s_apv|!a=s_ave) DO ..
h3 M:3 MAN pal.b[10202] a:=get4(s_colon,h1!b,a,...)
h3 M:3 MAN pal.b[10205] a:=get4(s_colon,h1!c,a,...)
h3 M:3 MAN pal.b[10289] f:=linseq(h3!a,e,f,x)
h3 M:3 MAN pal.b[1434] IF h3!p1=y0 DO ..
h3 M:3 MAN pal.b[1436] r:=get4(s_poly,zsy,...,...)
h3 M:3 MAN pal.b[1438] mul(h2!p1,h3!p1)
h3 M:3 MAN pal.b[1439] t:=get4(s_polyj,zsy,...)+(p1&ysg)
h3 M:3 MAN pal.b[1443] TEST h3!r0=y0 THEN .. ELSE ..
h3 M:3 MAN pal.b[1455] TEST h3!p1=y0 THEN .. ELSE ..
h3 M:3 MAN pal.b[1458] get4(s_polyj,z,y1,...)
h3 M:3 MAN pal.b[1459] t:=get4(s_poly,t,...)+(p1&ysg)
h3 M:3 MAN pal.b[146] RESULTIS get4(!b,h1!b,a,...)
h3 M:3 MAN pal.b[170] RESULTIS get4(s_ratp,u,a,...)
h3 M:3 MAN pal.b[1718] GOTO h3!c
h3 M:3 MAN pal.b[1731] IF c=h3!g DO ..
h3 M:3 MAN pal.b[1758] arg1:=get4(!c,e,...,...)
h3 M:3 MAN pal.b[1762] f,m,c:=get4(m,...)+yfj,s_mmf2r,h1!c
h3 M:3 MAN pal.b[1769] arg1:=(h3!c)(arg1,h2!c)
h3 M:3 MAN pal.b[1796] f,m,c:=get4(m,...)+yfj,s_mma1,h2!c
h3 M:3 MAN pal.b[1802] c:=h3!c
h3 M:3 MAN pal.b[1806] c:=h3!c
h3 M:3 MAN pal.b[1810] f,m,c:=get4(m,...)+yfj,s_mmf1,h2!c
h3 M:3 MAN pal.b[1814] f,m,c:=get4(m,...)+yfj,s_mmf1a,h2!c
h3 M:3 MAN pal.b[1818] f,m,c:=get4(m,...)+yfj,s_mma2l,h2!h1!c1
h3 M:3 MAN pal.b[1822] f,m,c:=get4(m,...)+yfj,s_mmf2l,h2!h1!c1
h3 M:3 MAN pal.b[1828] arg1:=(h3!c)(arg1)
h3 M:3 MAN pal.b[1836] arg1:=(h3!c)(arg1)
h3 M:3 MAN pal.b[1846] c:=h3!c
h3 M:3 MAN pal.b[1853] c:=h3!c
h3 M:3 MAN pal.b[1863] arg1:=(h3!c)(arg1,a2)
h3 M:3 MAN pal.b[1869] c:=h3!c
h3 M:3 MAN pal.b[1871] c:=h3!c
h3 M:3 MAN pal.b[1874] f,m,c:=get4(m,...)+yfj,s_mmaa,h2!c
h3 M:3 MAN pal.b[1879] f,m,c:=get4(m,...)+yfj,s_mmaq,h2!c
h3 M:3 MAN pal.b[1885] h3!c
h3 M:3 MAN pal.b[1897] f,m,c:=get4(m,...)+yfj,s_mmcond,h1!c
h3 M:3 MAN pal.b[1905] c:=h3!c
h3 M:3 MAN pal.b[1909] f,m,c:=get4(m,...)+yfj,s_mmlet,h3!c
h3 M:3 MAN pal.b[1912] arg1:=h3!c
h3 M:3 MAN pal.b[1921] arg1:=h3!c
h3 M:3 MAN pal.b[1935] get4(s_kclos,e1,j,...)
h3 M:3 MAN pal.b[1938] h1!e1,h2!e1,h3!e1:=h1!e,h2!e,h3!e
h3 M:3 MAN pal.b[1959] e,f,j:=h1!j,h3!j,h2!j
h3 M:3 MAN pal.b[1967] e,c,j:=h1!j,h3!j,h2!j
h3 M:3 MAN pal.b[1968] GOTO h3!c
h3 M:3 MAN pal.b[1975] e,f,j:=h1!j,h3!j,h2!j
h3 M:3 MAN pal.b[1976] c:=h3!f
h3 M:3 MAN pal.b[1977] GOTO h3!c
h3 M:3 MAN pal.b[1980] e,f,j:=h1!j,h3!j,h2!j
h3 M:3 MAN pal.b[1981] c:=h3!f
h3 M:3 MAN pal.b[1983] GOTO h3!c
h3 M:3 MAN pal.b[1987] e,f,j:=h1!j,h3!j,h2!j
h3 M:3 MAN pal.b[1989] c:=h3!f
h3 M:3 MAN pal.b[1990] GOTO h3!c
h3 M:3 MAN pal.b[1995] h3!f:=arg1
h3 M:3 MAN pal.b[2005] c:=h3!f
h3 M:3 MAN pal.b[2024] e:=bind(h3!c,arg1,h2!c)
h3 M:3 MAN pal.b[2026] GOTO h3!c
h3 M:3 MAN pal.b[2032] GOTO h3!c
h3 M:3 MAN pal.b[2038] GOTO h3!c
h3 M:3 MAN pal.b[2076] UNTIL arg1>0&!arg1=s_tuple&h3!arg1=y2 DO ..
h3 M:3 MAN pal.b[2113] UNLESS y0<arg1&arg1<=h3!c DO ..
h3 M:3 MAN pal.b[2115] FOR i=arg1+1 TO h3!c DO..
h3 M:3 MAN pal.b[2128] h3!c
h3 M:3 MAN pal.b[2137] TEST h3!c=c3 THEN .. ELSE ..
h3 M:3 MAN pal.b[2139] h3!c:=c31
h3 M:3 MAN pal.b[2143] c3:=h3!c
h3 M:3 MAN pal.b[2160] .. REPEATUNTIL c=z|arg1<=h3!c
h3 M:3 MAN pal.b[2161] TEST c=z|arg1<h3!c THEN .. ELSE ..
h3 M:3 MAN pal.b[2201] e,c:=h1!c,h3!c
h3 M:3 MAN pal.b[2208] c:=h3!c
h3 M:3 MAN pal.b[2216] UNTIL arg1>0&!arg1=s_tuple&h3!arg1=h3!c2 DO ..
h3 M:3 MAN pal.b[2221] c:=h3!c
h3 M:3 MAN pal.b[2228] c:=h3!c
h3 M:3 MAN pal.b[2236] c,f:=h3!c,z
h3 M:3 MAN pal.b[2244] c,f:=h3!c,z
h3 M:3 MAN pal.b[2257] h3!f
h3 M:3 MAN pal.b[2260] arg1:=get4(s_tuple,t,arg1,...)
h3 M:3 MAN pal.b[2267] h2!f,h3!f:=h1!c,arg1
h3 M:3 MAN pal.b[2271] h3!f
h3 M:3 MAN pal.b[2274] arg1:=get4(s_tuple,t,arg1,...)
h3 M:3 MAN pal.b[2294] c:=h3!c
h3 M:3 MAN pal.b[2307] c:=h3!c
h3 M:3 MAN pal.b[2325] c:=h3!f
h3 M:3 MAN pal.b[2326] h3!f:=arg1
h3 M:3 MAN pal.b[2330] c:=h3!f
h3 M:3 MAN pal.b[2341] h3!f
h3 M:3 MAN pal.b[2348] c:=h3!c
h3 M:3 MAN pal.b[2352] c:=h3!f
h3 M:3 MAN pal.b[2353] h3!f:=arg1
h3 M:3 MAN pal.b[2357] c:=h3!f
h3 M:3 MAN pal.b[2367] c,gw0:=h2!f,h3!f
h3 M:3 MAN pal.b[2378] h3!f
h3 M:3 MAN pal.b[2388] h3!f
h3 M:3 MAN pal.b[2402] c:=h3!f
h3 M:3 MAN pal.b[2417] GOTO h3!c
h3 M:3 MAN pal.b[2422] GOTO h3!c
h3 M:3 MAN pal.b[2429] GOTO h3!c
h3 M:3 MAN pal.b[2434] GOTO h3!c
h3 M:3 MAN pal.b[2439] GOTO h3!c
h3 M:3 MAN pal.b[2447] GOTO h3!c
h3 M:3 MAN pal.b[2452] GOTO h3!c
h3 M:3 MAN pal.b[2457] GOTO h3!c
h3 M:3 MAN pal.b[2462] GOTO h3!c
h3 M:3 MAN pal.b[2469] GOTO h3!c
h3 M:3 MAN pal.b[2478] GOTO h3!c
h3 M:3 MAN pal.b[2484] GOTO h3!c
h3 M:3 MAN pal.b[2492] !t,h1!t,h2!t,h3!t:=s_tuple,h2!t,arg1,h2!c
h3 M:3 MAN pal.b[2495] GOTO h3!c
h3 M:3 MAN pal.b[2500] GOTO h3!c
h3 M:3 MAN pal.b[2505] arg1:=get4(!arg1,e,...,...)
h3 M:3 MAN pal.b[2507] GOTO h3!c
h3 M:3 MAN pal.b[2511] arg1:=get4(!arg1,h1!arg1,e,...)
h3 M:3 MAN pal.b[2513] GOTO h3!c
h3 M:3 MAN pal.b[2519] GOTO h3!c
h3 M:3 MAN pal.b[2525] GOTO h3!c
h3 M:3 MAN pal.b[2538] GOTO h3!c
h3 M:3 MAN pal.b[2546] GOTO h3!c
h3 M:3 MAN pal.b[2553] GOTO h3!c
h3 M:3 MAN pal.b[2561] GOTO h3!c
h3 M:3 MAN pal.b[2568] GOTO h3!c
h3 M:3 MAN pal.b[2574] GOTO h3!c
h3 M:3 MAN pal.b[2580] GOTO h3!c
h3 M:3 MAN pal.b[2586] e:=get4(s_e,t,v,...)
h3 M:3 MAN pal.b[2589] GOTO h3!c
h3 M:3 MAN pal.b[2599] GOTO h3!c
h3 M:3 MAN pal.b[2608] GOTO h3!c
h3 M:3 MAN pal.b[2614] arg1:=h3!arg1
h3 M:3 MAN pal.b[2617] GOTO h3!c
h3 M:3 MAN pal.b[2626] GOTO h3!c
h3 M:3 MAN pal.b[2633] GOTO h3!c
h3 M:3 MAN pal.b[2642] GOTO h3!c
h3 M:3 MAN pal.b[2654] GOTO h3!c
h3 M:3 MAN pal.b[2665] GOTO h3!c
h3 M:3 MAN pal.b[2682] arg1:=get4(s_tuple,arg1,t,...)
h3 M:3 MAN pal.b[2688] GOTO h3!c
h3 M:3 MAN pal.b[2707] h2!f:=get4(s_tuple,s,t,...)
h3 M:3 MAN pal.b[2708] s:=get4(s_tuple,s,t,...)
h3 M:3 MAN pal.b[2712] GOTO h3!c
h3 M:3 MAN pal.b[2717] GOTO h3!c
h3 M:3 MAN pal.b[2724] GOTO h3!c
h3 M:3 MAN pal.b[2730] GOTO h3!c
h3 M:3 MAN pal.b[2733] arg1:=(h2!c)(arg1,h3!e)
h3 M:3 MAN pal.b[2735] GOTO h3!c
h3 M:3 MAN pal.b[2740] GOTO h3!c
h3 M:3 MAN pal.b[2746] GOTO h3!c
h3 M:3 MAN pal.b[2755] h3!f:=h1!c
h3 M:3 MAN pal.b[2765] h3!f:=h1!c
h3 M:3 MAN pal.b[2783] h3!f:=h1!c
h3 M:3 MAN pal.b[2788] GOTO h3!c
h3 M:3 MAN pal.b[2796] GOTO h3!c
h3 M:3 MAN pal.b[279] RESULTIS get4(!b,h1!b,a,...)
h3 M:3 MAN pal.b[2803] GOTO h3!c
h3 M:3 MAN pal.b[2810] h3!f:=h1!c
h3 M:3 MAN pal.b[2815] GOTO h3!c
h3 M:3 MAN pal.b[2823] GOTO h3!c
h3 M:3 MAN pal.b[2830] GOTO h3!c
h3 M:3 MAN pal.b[2837] h3!f:=h1!c
h3 M:3 MAN pal.b[2839] h3!c
h3 M:3 MAN pal.b[2847] h3!c
h3 M:3 MAN pal.b[2854] h3!c
h3 M:3 MAN pal.b[2859] h3!c
h3 M:3 MAN pal.b[2866] GOTO h3!c
h3 M:3 MAN pal.b[2871] h3!f:=h2!c
h3 M:3 MAN pal.b[2874] GOTO h3!c
h3 M:3 MAN pal.b[2969] get4(!a,e,...,...)
h3 M:3 MAN pal.b[2977] RESULTIS (h3!a)(b,h2!a)
h3 M:3 MAN pal.b[2994] RESULTIS (h3!a)(b)
h3 M:3 MAN pal.b[3003] RESULTIS (h3!a)(b)
h3 M:3 MAN pal.b[3014] RESULTIS (h3!a)(b1,b2)
h3 M:3 MAN pal.b[3032] a:=h3!a
h3 M:3 MAN pal.b[303] RESULTIS get4(s_ratp,u,a,...)
h3 M:3 MAN pal.b[3129] IF h3!g=a DO ..
h3 M:3 MAN pal.b[3137] fixapf(a2,h3!a)
h3 M:3 MAN pal.b[3138] h3!a:=h2!a
h3 M:3 MAN pal.b[3151] flat0(h3!a,e)
h3 M:3 MAN pal.b[3153] h3!a:=c
h3 M:3 MAN pal.b[3211] a:=efsy(h3!a,n+1)
h3 M:3 MAN pal.b[3235] !g,h1!g,h2!g,h3!g:=!n,h1!n,h2!n,h3!n
h3 M:3 MAN pal.b[3282] c:=get4(s_cd,c,...,ll_glz)
h3 M:3 MAN pal.b[3283] h3!a:=c
h3 M:3 MAN pal.b[3287] IF h3!g=a DO ..
h3 M:3 MAN pal.b[3312] h3!a,ll_tup
h3 M:3 MAN pal.b[3342] c:=get4(s_cd,c,...,ll_rec1)
h3 M:3 MAN pal.b[3360] TEST fbv(h2!a)&matchbv(h2!a,...,FALSE) THEN .. ELSE ..
h3 M:3 MAN pal.b[3364] a,cstac:=h3!a,FALSE
h3 M:3 MAN pal.b[3395] IF matchbv(h3!v,h2!a,FALSE) DO ..
h3 M:3 MAN pal.b[3439] c:=get4(s_cd,c,...,ll)
h3 M:3 MAN pal.b[3440] h3!a1:=c
h3 M:3 MAN pal.b[3460] c:=get4(s_cd,c,...,ll_ap1)
h3 M:3 MAN pal.b[3466] h3!a
h3 M:3 MAN pal.b[3483] FALSE,h3!a
h3 M:3 MAN pal.b[3523] get4(!a,h1!a,...,...)
h3 M:3 MAN pal.b[3525] !a,h1!a,h2!a,h3!a:=s_mb,!gseqf,n,get4(...)
h3 M:3 MAN pal.b[3528] h1!c0:=flat1(h3!n,c,e,...)
h3 M:3 MAN pal.b[3535] h3!a
h3 M:3 MAN pal.b[3538] UNLESS h3!a3=f DO ..
h3 M:3 MAN pal.b[3554] IF n=y1&...=ll_na1|n=y2&...=ll_na2|n=h2!c&h3!c=ll_na DO ..
h3 M:3 MAN pal.b[3556] IF n=y1&...=ll_na1f|n=y2&...=ll_na2f|n=h2!c&h3!c=ll_naf DO ..
h3 M:3 MAN pal.b[3559] IF (h3!c&sva)=0 DO ..
h3 M:3 MAN pal.b[3561] IF h3!c=ll_cond DO ..
h3 M:3 MAN pal.b[3570] RESULTIS get4(s_cd,t1,...,...)
h3 M:3 MAN pal.b[360] f:=(h3!h2!f)(p,q,f)
h3 M:3 MAN pal.b[3668] h2!l,h3!l
h3 M:3 MAN pal.b[3671] h1!l,h2!l,h3!l:=h1!l1,v,h3!l1
h3 M:3 MAN pal.b[3674] h1!l,h2!l,h3!l:=h1!v,h2!v,ll_entz
h3 M:3 MAN pal.b[3684] h1!l,h2!l,h3!l:=h1!h1!l,v,ll
h3 M:3 MAN pal.b[3687] h1!l,h2!l,h3!l:=h1!v,h2!v,ll_enty
h3 M:3 MAN pal.b[3697] h1!l,h2!l,h3!l:=h1!h1!l,v,ll
h3 M:3 MAN pal.b[3727] h3!k:=keep3(h3!k)
h3 M:3 MAN pal.b[376] !ap:=h3!p
h3 M:3 MAN pal.b[3804] TEST h3!a>h3!b THEN .. ELSE ..
h3 M:3 MAN pal.b[3806] UNLESS h3!a=h3!b DO ..
h3 M:3 MAN pal.b[382] !ap:=h3!p
h3 M:3 MAN pal.b[3835] gw1:=h3!a+h3!b+cy
h3 M:3 MAN pal.b[3857] gw1:=h3!a+1
h3 M:3 MAN pal.b[3880] gw1:=h3!a-h3!b-cy
h3 M:3 MAN pal.b[3896] UNLESS h3!a=0 DO ..
h3 M:3 MAN pal.b[3897] gw1:=h3!a-1
h3 M:3 MAN pal.b[3919] IF h3!c=0 DO ..
h3 M:3 MAN pal.b[3924] RESULTIS h3!c+y0
h3 M:3 MAN pal.b[3925] RESULTIS y0-h3!c
h3 M:3 MAN pal.b[3951] gw1:=h3!a+gw1
h3 M:3 MAN pal.b[3961] gw1:=h3!a+1
h3 M:3 MAN pal.b[3979] gw1:=h3!a-gw1
h3 M:3 MAN pal.b[3993] UNLESS h3!a=0 DO ..
h3 M:3 MAN pal.b[3994] gw1:=h3!a-1
h3 M:3 MAN pal.b[400] RESULTIS h3!b
h3 M:3 MAN pal.b[401] RESULTIS mlet(h2!b,2!ae,h3!b)
h3 M:3 MAN pal.b[4039] muldiv(h3!a,gl1,numba)
h3 M:3 MAN pal.b[4074] gl1,gl3:=0,h3!a
h3 M:3 MAN pal.b[4075] gw3:=h3!c1+gl1
h3 M:3 MAN pal.b[4076] gw2:=h2!c1+muldiv(gl3,...,numba)
h3 M:3 MAN pal.b[4084] h3!c1:=gw3
h3 M:3 MAN pal.b[408] RESULTIS h3!b
h3 M:3 MAN pal.b[4096] h3!c1:=gl1
h3 M:3 MAN pal.b[4105] gl1:=muldiv(gl3,h3!b1,numba)
h3 M:3 MAN pal.b[4115] gw3:=h3!c1+gl1
h3 M:3 MAN pal.b[4124] h3!c1:=gw3
h3 M:3 MAN pal.b[4130] TEST h2!cc=0&0=h3!cc THEN .. ELSE ..
h3 M:3 MAN pal.b[4170] n:=getx(s_numj,n,...,...)
h3 M:3 MAN pal.b[4177] result2:=h3!nMODgl1
h3 M:3 MAN pal.b[4178] h3!n:=h3!n/gl1
h3 M:3 MAN pal.b[4179] IF h3!n=0 DO ..
h3 M:3 MAN pal.b[4183] h3!n:=sdiv(result2,h3!n,gl1)
h3 M:3 MAN pal.b[4189] RESULTIS h3!a+y0
h3 M:3 MAN pal.b[4190] RESULTIS y0-h3!a
h3 M:3 MAN pal.b[4347] !p,h1!p,h2!p,h3!p:=-!st1,h1!st1,h2!st1,h3!st1
h3 M:3 MAN pal.b[4433] IF cons>h3!trz DO ..
h3 M:3 MAN pal.b[4526] h3!t>0->3,h2!t>0->2,...>0->1,0
h3 M:3 MAN pal.b[4581] h3!t>0->3,h2!t>0->2,...>0->1,0
h3 M:3 MAN pal.b[4687] UNLESS h2!u=h2!v&h3!u=h3!v DO ..
h3 M:3 MAN pal.b[4695] IF h3!u=h3!v DO ..
h3 M:3 MAN pal.b[4704] UNLESS h3!u=h3!v DO ..
h3 M:3 MAN pal.b[4834] IF g<=h3!b DO ..
h3 M:3 MAN pal.b[4836] RESULTIS get4(s_ratp,h1!b,a,...)
h3 M:3 MAN pal.b[4840] g:=h3!b
h3 M:3 MAN pal.b[4844] IF g<=h3!b DO ..
h3 M:3 MAN pal.b[4847] RESULTIS get4(s_ratp,c,a,...)
h3 M:3 MAN pal.b[4850] g:=h3!b
h3 M:3 MAN pal.b[5094] IF g>h3!b DO ..
h3 M:3 MAN pal.b[5099] IF result2>0&!result2=s_poly&h3!result2=h3!b DO ..
h3 M:3 MAN pal.b[5107] RESULTIS get4(s_ratp,b,a,...)
h3 M:3 MAN pal.b[5112] RESULTIS get4(s_ratp,b,a,...)
h3 M:3 MAN pal.b[5120] IF g<=h3!a DO ..
h3 M:3 MAN pal.b[5122] IF b>0&!b=s_poly&h3!b=h3!a DO ..
h3 M:3 MAN pal.b[5128] RESULTIS get4(s_ratp,b,a,...)
h3 M:3 MAN pal.b[5130] RESULTIS get4(s_ratp,a1,a,...)
h3 M:3 MAN pal.b[5134] g:=h3!a
h3 M:3 MAN pal.b[5138] IF g<=h3!b DO ..
h3 M:3 MAN pal.b[5146] g:=h3!b
h3 M:3 MAN pal.b[5150] IF g<=h3!b DO ..
h3 M:3 MAN pal.b[5152] IF b2>0&!b2=s_poly&h3!b2=h3!a DO ..
h3 M:3 MAN pal.b[5159] RESULTIS get4(s_ratp,b2,b,...)
h3 M:3 MAN pal.b[5162] RESULTIS get4(s_ratp,h1!a,b,...)
h3 M:3 MAN pal.b[5166] g:=h3!a
h3 M:3 MAN pal.b[5342] writeargp(h3!dd3,TRUE)
h3 M:3 MAN pal.b[5654] writef("...%N",h3!x)
h3 M:3 MAN pal.b[5660] s0,s1:="#%Nrat#",h3!x
h3 M:3 MAN pal.b[5679] s0,s1:="#%N-tuple#",h3!x-y0
h3 M:3 MAN pal.b[5682] s0,s1:="#%N-xtuple#",h3!x-y0
h3 M:3 MAN pal.b[5684] s0,s1:="#poly%N#",h3!x-y0
h3 M:3 MAN pal.b[5687] s0,s1:="#term%N#",h3!x-y0
h3 M:3 MAN pal.b[5690] s0,s1:="#hcode(%P)#",h3!x
h3 M:3 MAN pal.b[576] IF h3!p>=h3!q DO ..
h3 M:3 MAN pal.b[5770] f(h3!p,numwi)
h3 M:3 MAN pal.b[5776] writel(h3!p,numwi)
h3 M:3 MAN pal.b[5781] h2!n,h3!n
h3 M:3 MAN pal.b[5805] h2!p,h3!p>y0
h3 M:3 MAN pal.b[582] TEST h3!p>h3!q THEN .. ELSE ..
h3 M:3 MAN pal.b[5832] UNLESS h3!p=y1 DO ..
h3 M:3 MAN pal.b[5834] writen(h3!p-y0)
h3 M:3 MAN pal.b[5860] !a,h2!a,h3!a
h3 M:3 MAN pal.b[587] UNLESS h3!p=h3!q DO ..
h3 M:3 MAN pal.b[5896] a:=h3!a
h3 M:3 MAN pal.b[5930] h3!p,z
h3 M:3 MAN pal.b[5934] IF h3!p>=0 DO ..
h3 M:3 MAN pal.b[5939] h3!p:=q
h3 M:3 MAN pal.b[5943] p:=h3!q
h3 M:3 MAN pal.b[5944] h3!q:=n
h3 M:3 MAN pal.b[6030] prc(h3!c,y0)
h3 M:3 MAN pal.b[6039] prinbv(h3!c)
h3 M:3 MAN pal.b[6065] c:=h3!c
h3 M:3 MAN pal.b[6076] h3!c
h3 M:3 MAN pal.b[6080] c3:=h3!c3
h3 M:3 MAN pal.b[6095] c:=h3!c
h3 M:3 MAN pal.b[6137] IF h3!s<0 DO ..
h3 M:3 MAN pal.b[617] TEST h3!p>h3!q THEN .. ELSE ..
h3 M:3 MAN pal.b[622] UNLESS h3!p=h3!q DO ..
h3 M:3 MAN pal.b[6236] writef("*n%P%Z",h3!e,15)
h3 M:3 MAN pal.b[6254] h3!j
h3 M:3 MAN pal.b[626] IF h3!p>h3!q DO ..
h3 M:3 MAN pal.b[6272] writef("*n cel'%Zand %E",g,...,...)
h3 M:3 MAN pal.b[6358] h3!a1-y0
h3 M:3 MAN pal.b[6373] TEST h3!a<h3!b THEN .. ELSE ..
h3 M:3 MAN pal.b[6375] UNLESS h3!a=h3!b DO ..
h3 M:3 MAN pal.b[6420] UNLESS a>0&!a=s_tuple&h3!a=n DO ..
h3 M:3 MAN pal.b[6449] RESULTIS h3!p
h3 M:3 MAN pal.b[6471] RESULTIS h3!p
h3 M:3 MAN pal.b[6504] TEST h3!v=y3 THEN .. ELSE ..
h3 M:3 MAN pal.b[6507] UNLESS h3!v=y2 DO ..
h3 M:3 MAN pal.b[6525] RESULTIS get4(s_tuple,p,q,...)
h3 M:3 MAN pal.b[6546] UNLESS q>0&!q=s_tuple&h3!q=h3!p DO ..
h3 M:3 MAN pal.b[6548] h3!q
h3 M:3 MAN pal.b[6550] h3!t:=rvv(h2!t)
h3 M:3 MAN pal.b[6553] assg(h2!p,h3!q)
h3 M:3 MAN pal.b[6554] h3!q:=i
h3 M:3 MAN pal.b[6573] h1!p,h3!p:=q,l
h3 M:3 MAN pal.b[6623] IF eqlv(h3!e,n) DO ..
h3 M:3 MAN pal.b[6678] TEST h3!f THEN .. ELSE ..
h3 M:3 MAN pal.b[6717] t:=t+h3!a
h3 M:3 MAN pal.b[6729] v,h3!a-y0
h3 M:3 MAN pal.b[6940] RESULTIS get4(!p,h1!p,t,...)
h3 M:3 MAN pal.b[7008] RESULTIS get4(s_ratp,p,q,...)
h3 M:3 MAN pal.b[7112] IF a=h3!ee DO ..
h3 M:3 MAN pal.b[7126] UNTIL w>0&!w=s_tuple&h3!v=h3!w DO ..
h3 M:3 MAN pal.b[7130] w:=lmapt(w,h3!v)
h3 M:3 MAN pal.b[7159] fixap(h3!v)
h3 M:3 MAN pal.b[7160] h3!v:=z
h3 M:3 MAN pal.b[7177] UNTIL w>0&!w=s_tuple&h3!v=h3!w DO ..
h3 M:3 MAN pal.b[7181] w:=lmapt(w,h3!v)
h3 M:3 MAN pal.b[7207] fixap(h3!v)
h3 M:3 MAN pal.b[7208] h3!v:=z
h3 M:3 MAN pal.b[7218] h3!f
h3 M:3 MAN pal.b[7219] v,w,h2!f,h3!f:=h2!f2,h2!f3,h1!f2,h1!f3
h3 M:3 MAN pal.b[7245] h1!e1,h2!e1,h3!e1:=h1!e2,h2!e2,h3!e2
h3 M:3 MAN pal.b[7280] h3!a:=get4(s_tra,f,...,b)
h3 M:3 MAN pal.b[7290] h3!a
h3 M:3 MAN pal.b[7292] h3!a:=h2!a3
h3 M:3 MAN pal.b[7302] UNLESS h3!c=z DO ..
h3 M:3 MAN pal.b[7303] apply(h3!c,a)
h3 M:3 MAN pal.b[7321] IF h3!s1>=n DO ..
h3 M:3 MAN pal.b[7322] IF h3!s1>n DO ..
h3 M:3 MAN pal.b[7388] UNLESS h2!p=h2!q&h3!p=h3!q DO ..
h3 M:3 MAN pal.b[7394] IF h3!p=h3!q DO ..
h3 M:3 MAN pal.b[7403] UNLESS h3!p=h3!q DO ..
h3 M:3 MAN pal.b[7537] RESULTIS get4(s_poly,...,...)+(p&ysg)
h3 M:3 MAN pal.b[7545] UNTIL n=h3!p DO ..
h3 M:3 MAN pal.b[7560] get4(s_poly,zsy,...,...)
h3 M:3 MAN pal.b[7565] IF h3!q>h3!p DO ..
h3 M:3 MAN pal.b[7566] h3!q
h3 M:3 MAN pal.b[7568] get4(s_polyj,zsy,...)+sg
h3 M:3 MAN pal.b[7574] .. REPEATWHILE h3!p<q3
h3 M:3 MAN pal.b[7575] IF h3!p>h3!q DO ..
h3 M:3 MAN pal.b[7576] h3!p
h3 M:3 MAN pal.b[7577] get4(s_polyj,zsy,...)+(q&ysg)
h3 M:3 MAN pal.b[7582] .. REPEATWHILE p3>h3!q
h3 M:3 MAN pal.b[7583] UNLESS p3=h3!q DO ..
h3 M:3 MAN pal.b[7588] f:=get4(s_polyj,zsy,...)+(p&ysg)
h3 M:3 MAN pal.b[7595] IF h3!r1=y0 DO ..
h3 M:3 MAN pal.b[7616] get4(s_poly,zsy,...,...)
h3 M:3 MAN pal.b[7618] IF h3!p=y0 DO ..
h3 M:3 MAN pal.b[7642] get4(s_poly,zsy,...)+(p&ysg)
h3 M:3 MAN pal.b[7646] r:=get4(s_polyj,zsy,...)+(p&ysg)
h3 M:3 MAN pal.b[7662] get4(s_poly,zsy,...,...)
h3 M:3 MAN pal.b[7671] h3!p
h3 M:3 MAN pal.b[7672] p3+h3!q1-y0
h3 M:3 MAN pal.b[7676] UNTIL h3!r1a>=q3 DO ..
h3 M:3 MAN pal.b[7681] TEST h3!r1a>q3 THEN .. ELSE ..
h3 M:3 MAN pal.b[7699] q3:=p3+h3!q1-y0
h3 M:3 MAN pal.b[7702] UNTIL h3!r1a>=q3 DO ..
h3 M:3 MAN pal.b[7728] FOR k=h3!u-h3!v+y0 TO y0 BY -1 DO..
h3 M:3 MAN pal.b[7736] FOR i=y2 TO h3!vv DO..
h3 M:3 MAN pal.b[7743] lcoef,ldeg,result2:=q,h3!v,p
h3 M:3 MAN pal.b[7748] TEST h3!u=y0&h1!u=z THEN .. ELSE ..
h3 M:3 MAN pal.b[7750] u:=get4(s_poly,u,...,...)
h3 M:3 MAN pal.b[7751] TEST h3!r=y0&h1!r=z THEN .. ELSE ..
h3 M:3 MAN pal.b[7753] r:=get4(s_poly,r,...,...)
h3 M:3 MAN pal.b[7754] lcoef,ldeg,result2:=q,h3!v,u
h3 M:3 MAN pal.b[7770] FOR k=h3!u TO h3!v BY -1 DO..
h3 M:3 MAN pal.b[7776] FOR i=y2 TO h3!vv DO..
h3 M:3 MAN pal.b[7790] lcoef,ldeg:=q,h3!v
h3 M:3 MAN pal.b[7795] TEST h3!u=y0&h1!u=z THEN .. ELSE ..
h3 M:3 MAN pal.b[7797] u:=get4(s_poly,u,...,...)
h3 M:3 MAN pal.b[7798] lcoef,ldeg:=q,h3!v
h3 M:3 MAN pal.b[7811] h3!p
h3 M:3 MAN pal.b[7832] h3!q:=h3!p-p3+y0
h3 M:3 MAN pal.b[7834] p3:=h3!p
h3 M:3 MAN pal.b[7836] h3!q:=p3
h3 M:3 MAN pal.b[7863] get4(s_poly,zsy,...)+(a&ysg)
h3 M:3 MAN pal.b[7868] s:=get4(s_polyj,zsy,...)+(a&ysg)
h3 M:3 MAN pal.b[7871] h1!rr:=get4(s_polyj,z,...)XORrr&ysg
h3 M:3 MAN pal.b[7885] d1:=h3!d1
h3 M:3 MAN pal.b[7888] UNLESS r>0&!r=s_poly&h3!r=h3!q DO ..
h3 M:3 MAN pal.b[7940] UNLESS h3!a=h3!b DO ..
h3 M:3 MAN pal.b[7946] IF h3!a=h3!b DO ..
h3 M:3 MAN pal.b[7955] .. REPEATWHILE h3!a=h3!b&eqpoly(h2!a,...,f)
h3 M:3 MAN pal.b[8255] set_z(!a_fclos,"fn",...,...)
h3 M:3 MAN pal.b[8486] s:=h3!s
h3 M:3 MAN pal.b[8520] h1!s,h3!s:=h3!s,0
h3 M:3 MAN pal.b[8596] !a0&p_tagp,h2!a0,h3!a0
h3 M:3 MAN pal.b[8601] WHILE h3!b0<a3 DO ..
h3 M:3 MAN pal.b[8606] IF h3!b0=a3 DO ..
h3 M:3 MAN pal.b[8610] IF h2!b0>a2|h3!b0>a3 DO ..
h3 M:3 MAN pal.b[8617] IF h2!b0>a2|h3!b0>a3|(!b0&p_tagp)>ay DO ..
h3 M:3 MAN pal.b[8685] h1!a,h2!a,h3!a
h3 M:3 MAN pal.b[8687] h3!s1
h3 M:3 MAN pal.b[8707] IF h3!t1<=a3 DO ..
h3 M:3 MAN pal.b[8708] IF h3!t1<a3 DO ..
h3 M:3 MAN pal.b[8714] s2:=h3!s2
h3 M:3 MAN pal.b[8725] s2:=h3!s2
h3 M:3 MAN pal.b[8730] s2:=h3!s2
h3 M:3 MAN pal.b[8733] t1,t2:=h3+s1,s2
h3 M:3 MAN pal.b[8746] IF h3!t2<=a3 DO ..
h3 M:3 MAN pal.b[8747] IF h3!t2<a3 DO ..
h3 M:3 MAN pal.b[8751] .. REPEATWHILE h3!t2<a3
h3 M:3 MAN pal.b[8752] IF h3!t2>a3 DO ..
h3 M:3 MAN pal.b[8755] h3!a:=s2
h3 M:3 MAN pal.b[8756] h3!s1:=a+signbit
h3 M:3 MAN pal.b[8776] !a&p_tagp,h1!a,h2!a,h3!a
h3 M:3 MAN pal.b[8786] h3!a,h1!a:=a1,0
h3 M:3 MAN pal.b[8798] IF h3!s2<=a3 DO ..
h3 M:3 MAN pal.b[8799] IF h3!s2<a3 DO ..
h3 M:3 MAN pal.b[8821] IF h2!t2=a2&h3!t2<=a3 DO ..
h3 M:3 MAN pal.b[8822] IF h3!t2<a3 DO ..
h3 M:3 MAN pal.b[8826] .. REPEATWHILE h3!t2<a3
h3 M:3 MAN pal.b[8827] IF h3!t2>a3 DO ..
h3 M:3 MAN pal.b[8858] IF h2!b=a2&h3!b<=a3 DO ..
h3 M:3 MAN pal.b[8859] IF h3!b<a3 DO ..
h3 M:3 MAN pal.b[8863] .. REPEATWHILE h3!b<a3
h3 M:3 MAN pal.b[8864] IF h3!b>a3 DO ..
h3 M:3 MAN pal.b[8870] IF h3!b>a3|h2!b>a2 DO ..
h3 M:3 MAN pal.b[8878] IF (...&p_tagp)>a0|h3!b>a3|h2!b>a2 DO ..
h3 M:3 MAN pal.b[9293] k2,k3:=h2!s0,h3!s0
h3 M:3 MAN pal.b[9294] h2!s0,h3!s0:=k2&lwc,k3&lwc
h3 M:3 MAN pal.b[9296] IF s1~=0&h3!h2!s1<0 DO ..
h3 M:3 MAN pal.b[9299] h2!s0,h3!s0:=k2,k3
h3 M:3 MAN pal.b[9352] IF h3!s1>=0 DO ..
h3 M:3 MAN pal.b[9357] h3!mfn
h3 M:3 MAN pal.b[9465] !g0,h1!g0,h2!g0,h3!g0:=!a,h1!a,h2!a,h3!a
h3 M:3 MAN pal.b[9681] h3!d:=rfndef(s_relop+y0,y1)
h3 M:3 MAN pal.b[9684] h3!d:=rec(h2!d,h3!d)
h3 M:3 MAN pal.b[9691] h2!d,h3!d
h3 M:3 MAN pal.b[9693] n:=fn(d2,h3!d)
h3 M:3 MAN pal.b[9694] h3!d:=ap1(n,d3)
h3 M:3 MAN pal.b[9699] aug(zsy,h3!d)
h3 M:3 MAN pal.b[9702] d3:=aug(d3,h3!d)
h3 M:3 MAN pal.b[9703] h2!d,h3!d:=d2,revd(d3)
h3 M:3 MAN pal.b[9814] IF evsy(h3!a) DO ..
h3 M:3 MAN pal.b[9875] UNLESS d>0&!d=s_tuple&h3!c=h3!d DO ..
h3 M:3 MAN pal.b[9892] h3!a
h3 M:3 MAN pal.b[9896] !a,h1!a,h2!a,h3!a:=!s,h1!s,h2!s,h3!s
h3 M:3 MAN pal.b[9909] h3!a:=get4(s_apz,a,b,...)
h3 M:3 MAN pal.b[9910] RESULTIS h3!a
h3 M:3 MAN pal.b[9911] TEST matchbv(h3!v,b,TRUE) THEN .. ELSE ..
h3 M:3 MAN pal.b[9923] IF b>0&!b=s_tuple&h3!b=y2 DO ..
h3 M:3 MAN pal.b[9924] h3!v
h3 M:3 MAN pal.b[9934] IF b>0&!b=s_tuple&h3!b=y2 DO ..
h3 M:3 MAN pal.b[9942] IF b>0&!b=s_tuple&h3!b=h3!h2!v DO ..
h3 M:3 MAN pal.b[9964] RESULTIS mlet(h2!a,b,h3!a)
hdv G:499 DEF palhdr.h[601] hdv=
hdv G:499 FN pal.b[6441] LET hdv(p)=..
hdv G:499 LG pal.b[3467] TEST a3=hdv THEN .. ELSE ..
hdv G:499 LLG pal.b[8329] set_v("HD",@hdv)
id_inoutscb M:131 DEF libhdr.h[362] id_inoutscb=131
id_inscb M:129 DEF libhdr.h[360] id_inscb=129
id_outscb M:130 DEF libhdr.h[361] id_outscb=130
igcd G:630 DEF palhdr.h[748] igcd=
igcd G:630 FN pal.b[7088] LET igcd(a,b)=..
igcd G:630 LG pal.b[116] ga1:=igcd(u+ny0,v+ny0)
igcd G:630 LG pal.b[126] ga1:=igcd(a+ny0,ga1)
igcd G:630 LG pal.b[243] ga1:=igcd(u+ny0,v+ny0)
igcd G:630 LG pal.b[253] ga1:=igcd(a+ny0,ga1)
igcd G:630 LG pal.b[4764] ga1:=igcd(a+ny0,h1!b+ny0)
igcd G:630 LG pal.b[4796] ga1:=igcd(h2!a+ny0,h1!b+ny0)
igcd G:630 LG pal.b[4797] ga2:=igcd(t+ny0,h2!b+ny0)
igcd G:630 LG pal.b[4877] ga3:=igcd(ga2,ga3)
igcd G:630 LG pal.b[4893] ga1:=igcd(b+ny0,result2)
igcd G:630 LG pal.b[4953] ga1:=igcd(h2!a+ny0,b+ny0)
igcd G:630 LG pal.b[4970] ga1:=igcd(a+ny0,h2!b+ny0)
igcd G:630 LG pal.b[5030] ga1:=igcd(h2!a+ny0,t+ny0)
igcd G:630 LG pal.b[5031] ga2:=igcd(h1!a+ny0,h1!b+ny0)
igcd G:630 LG pal.b[7020] RESULTIS igcd(a+ny0,b+ny0)+y0
igcd G:630 LG pal.b[7099] RESULTIS igcd(n+ny0,result2)
ignore F:11 FN pal.b[9237] LET ignore()=..
ignore F:11 LF pal.b[9531] rprio:=ignore()
ignore F:11 LF pal.b[9544] rprio:=ignore()
ignore F:11 LF pal.b[9563] rprio:=ignore()
ignore1 F:12 FN pal.b[9247] LET ignore1()=..
ignore1 F:12 LF pal.b[9533] rprio:=ignore1()
ignore1 F:12 LF pal.b[9547] rprio:=ignore1()
incontrol G:210 DEF palhdr.h[272] incontrol=
indir F:14 LF pal.b[4343] scanp(indir)
indir F:14 LF pal.b[4357] scanp(indir)
indir F:14 RT pal.b[4438] LET indir(p)BE..
initco G:22 DEF libhdr.h[37] initco=22
initff G:354 DEF palhdr.h[434] initff=
initff G:354 LG pal.b[8187] initff()
initff G:354 LG pal.b[8553] initff()
initff G:354 RT pal.b[9004] LET initff()BE..
initio G:46 DEF libhdr.h[61] initio=46
input G:58 DEF libhdr.h[73] input=58
input G:58 DEF palhdr.h[27] input=58
input G:58 LG pal.b[740] sysin:=input()
input G:58 LLG pal.b[8318] d("INPUT",s_bcplv,@input)
inputmember G:230 DEF palhdr.h[297] inputmember=
inputmember G:230 LG pal.b[6583] g_get(inputmember,s1,s2)
instrcount G:121 DEF libhdr.h[137] instrcount=121
intflag G:119 DEF libhdr.h[135] intflag=119
isbreak G:265 DEF palhdr.h[333] isbreak=
isrregs M:41 DEF libhdr.h[358] isrregs=41
isv G:510 DEF palhdr.h[614] isv=
isv G:510 FN pal.b[6536] LET isv(p,q)=..
isv G:510 LLG pal.b[8278] dt("is",@isv,ap2,...)
iv G:503 DEF palhdr.h[605] iv=
iv G:503 FN pal.b[6462] LET iv(a)=..
iv G:503 LG pal.b[3756] iv()
iv G:503 LG pal.b[7727] f:=iv
iv G:503 LG pal.b[7769] f:=iv
iv G:503 LG pal.b[8014] RESULTIS h2!linkword(s_glo,a,...)
iv G:503 LG pal.b[9008] fff!i:=iv
iv G:503 LG pal.b[9474] iv()
iv G:503 LG pal.b[9852] get4(s_zz,0,a,iv)
iv G:503 LLG pal.b[8292] set_d("I",@iv)
j G:438 DEF palhdr.h[532] j=
j G:438 LG pal.b[1650] e,j
j G:438 LG pal.b[1700] z,-m,e,j
j G:438 LG pal.b[1748] j:=keep2(j)
j G:438 LG pal.b[1749] j:=keep1(j,f)
j G:438 LG pal.b[1750] arg1:=j
j G:438 LG pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[1890] TEST j<yfj THEN .. ELSE ..
j G:438 LG pal.b[1891] TEST j=zj THEN .. ELSE ..
j G:438 LG pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
j G:438 LG pal.b[1933] j:=keep2(j)
j G:438 LG pal.b[1935] get4(s_kclos,e1,j,...)
j G:438 LG pal.b[1954] m:=!j
j G:438 LG pal.b[1957] m:=!j
j G:438 LG pal.b[1958] !j,stackp:=stackp,j&p_addr
j G:438 LG pal.b[1959] e,f,j:=h1!j,h3!j,h2!j
j G:438 LG pal.b[1962] m:=!j
j G:438 LG pal.b[1965] m:=!j
j G:438 LG pal.b[1966] !j,stackp:=stackp,j&p_addr
j G:438 LG pal.b[1967] e,c,j:=h1!j,h3!j,h2!j
j G:438 LG pal.b[1970] m:=!j
j G:438 LG pal.b[1973] m:=!j
j G:438 LG pal.b[1974] !j,stackp:=stackp,j&p_addr
j G:438 LG pal.b[1975] e,f,j:=h1!j,h3!j,h2!j
j G:438 LG pal.b[1979] m:=!j
j G:438 LG pal.b[1980] e,f,j:=h1!j,h3!j,h2!j
j G:438 LG pal.b[1985] m:=!j
j G:438 LG pal.b[1986] !j,stackp:=stackp,j&p_addr
j G:438 LG pal.b[1987] e,f,j:=h1!j,h3!j,h2!j
j G:438 LG pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2233] TEST j=zj THEN .. ELSE ..
j G:438 LG pal.b[2241] TEST j=zj THEN .. ELSE ..
j G:438 LG pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 LG pal.b[2721] j:=keep2(j)
j G:438 LG pal.b[2722] arg1:=j
j G:438 LG pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 LG pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
j G:438 LG pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 LG pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 LG pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
j G:438 LG pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 LG pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 LG pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
j G:438 LG pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 LG pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 LG pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
j G:438 LG pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 LG pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 LG pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 LG pal.b[3733] RESULTIS j&p_addr
j G:438 LG pal.b[3751] -m,e,j
j G:438 LG pal.b[3763] -m,e,j
j G:438 SG pal.b[1701] j,m:=zj,s_j
j G:438 SG pal.b[1748] j:=keep2(j)
j G:438 SG pal.b[1749] j:=keep1(j,f)
j G:438 SG pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
j G:438 SG pal.b[1933] j:=keep2(j)
j G:438 SG pal.b[1951] m,e,j:=-p1,p2,p3
j G:438 SG pal.b[1959] e,f,j:=h1!j,h3!j,h2!j
j G:438 SG pal.b[1967] e,c,j:=h1!j,h3!j,h2!j
j G:438 SG pal.b[1975] e,f,j:=h1!j,h3!j,h2!j
j G:438 SG pal.b[1980] e,f,j:=h1!j,h3!j,h2!j
j G:438 SG pal.b[1987] e,f,j:=h1!j,h3!j,h2!j
j G:438 SG pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2232] j:=h2!c
j G:438 SG pal.b[2240] e,j:=h1!c,h2!c
j G:438 SG pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
j G:438 SG pal.b[2721] j:=keep2(j)
j G:438 SG pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 SG pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
j G:438 SG pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 SG pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 SG pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
j G:438 SG pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 SG pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 SG pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
j G:438 SG pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 SG pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 SG pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
j G:438 SG pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 SG pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
j G:438 SG pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
j G:438 SG pal.b[3752] j,m:=zj,s_j
j G:438 SG pal.b[3769] m,e,j:=-p1,p2,p3
jgap M:19 DEF palhdr.h[241] jgap=s_mz-s_z
jgap M:19 MAN pal.b[1747] m:=m-jgap
jgap M:19 MAN pal.b[2720] m:=m-jgap
jgap M:19 MAN pal.b[3717] !f:=t-jgap
jgap M:19 MAN pal.b[3725] !k:=!k-jgap
jgap M:19 MAN pal.b[3740] !g:=!g-jgap
k2 S:63 DEF pal.b[9291] k2=0
k2 S:63 LL pal.b[9294] h2!s0,h3!s0:=k2&lwc,k3&lwc
k2 S:63 LL pal.b[9299] h2!s0,h3!s0:=k2,k3
k2 S:63 SL pal.b[9293] k2,k3:=h2!s0,h3!s0
k3 S:64 DEF pal.b[9292] k3=0
k3 S:64 LL pal.b[9294] h2!s0,h3!s0:=k2&lwc,k3&lwc
k3 S:64 LL pal.b[9299] h2!s0,h3!s0:=k2,k3
k3 S:64 SL pal.b[9293] k2,k3:=h2!s0,h3!s0
keep1 G:420 DEF palhdr.h[511] keep1=
keep1 G:420 FN pal.b[3711] LET keep1(k,f)=..
keep1 G:420 LG pal.b[1749] j:=keep1(j,f)
keep2 G:421 DEF palhdr.h[512] keep2=
keep2 G:421 FN pal.b[3722] LET keep2(k)=..
keep2 G:421 LG pal.b[1748] j:=keep2(j)
keep2 G:421 LG pal.b[1933] j:=keep2(j)
keep2 G:421 LG pal.b[2721] j:=keep2(j)
keep2 G:421 LG pal.b[3718] RESULTIS keep2(k)
keep3 F:3 FN pal.b[3737] LET keep3(f)=..
keep3 F:3 LF pal.b[3727] h3!k:=keep3(h3!k)
kk S:3 DEF pal.b[5585] kk=0
kk S:3 LL pal.b[5851] UNTIL kk=0 DO ..
kk S:3 LL pal.b[5852] !kk&p_addr
kk S:3 LL pal.b[5853] !kk:=s_cd
kk S:3 LL pal.b[5871] !a:=nn+(kk&p_addr)
kk S:3 SL pal.b[5849] kk,nn:=0,signbit
kk S:3 SL pal.b[5854] kk:=t
kk S:3 SL pal.b[5872] kk:=a
klibregs M:21 DEF libhdr.h[356] klibregs=21
ksq G:341 DEF palhdr.h[419] ksq=
ksq G:341 LG pal.b[4281] ksq:=ksq/2
ksq G:341 LG pal.b[4283] ksq:=ksq*3/2
ksq G:341 LG pal.b[4365] IF w<ksq DO ..
ksq G:341 LG pal.b[4434] IF w<ksq DO ..
ksq G:341 LG pal.b[9124] r:=ksq+y0
ksq G:341 SG pal.b[4281] ksq:=ksq/2
ksq G:341 SG pal.b[4283] ksq:=ksq*3/2
ksq G:341 SG pal.b[8068] ksq,kwords,kstack:=2048,1024,1024
ksq G:341 SG pal.b[9125] ksq:=readsn(p,j)
kstack G:343 DEF palhdr.h[421] kstack=
kstack G:343 LG pal.b[4287] stack(kstack)
kstack G:343 LG pal.b[4405] IF st1-@t>2*kstack DO ..
kstack G:343 LG pal.b[4406] stack(kstack)
kstack G:343 LG pal.b[8201] stack(kstack)
kstack G:343 LG pal.b[9113] r:=kstack+y0
kstack G:343 SG pal.b[8068] ksq,kwords,kstack:=2048,1024,1024
kstack G:343 SG pal.b[9116] kstack:=t
kwords G:342 DEF palhdr.h[420] kwords=
kwords G:342 LG pal.b[4278] IF n=0&w<kwords DO ..
kwords G:342 LG pal.b[9106] r:=kwords+y0
kwords G:342 SG pal.b[8068] ksq,kwords,kstack:=2048,1024,1024
kwords G:342 SG pal.b[9109] kwords:=t
l F:10 LF pal.b[5300] l(a,0)
l F:10 LF pal.b[5314] l(a!i,n+1)
l F:10 RT pal.b[5303] LET l(a,n)BE..
l F:115 LAB pal.b[5831] l:prc(a,50+y0)
l F:115 LF pal.b[5814] GOTO l
l F:115 LF pal.b[5818] GOTO l
l F:120 LAB pal.b[9442] l:rch()
l F:120 LF pal.b[9429] GOTO l
l F:123 LAB pal.b[1058] l:UNLESS userpostmortem=globcon79 DO ..
l F:123 LF pal.b[1055] erlev,erlab:=level(),l
l F:130 LAB pal.b[4183] l:h3!n:=sdiv(result2,h3!n,gl1)
l F:130 LF pal.b[4176] GOTO l
l F:158 LAB pal.b[1067] l:LET ..; ..
l F:158 LAB pal.b[4632] l:LET ..; ..
l F:158 LF pal.b[1073] GOTO l
l F:158 LF pal.b[4614] GOTO l
l F:18 LAB pal.b[6349] l:!v:=n
l F:18 LF pal.b[6343] GOTO l
l F:18 LF pal.b[6345] GOTO l
l F:191 LAB pal.b[5227] l:DEFAULT:..
l F:191 LF pal.b[5198] GOTO l
l F:191 LF pal.b[5209] GOTO l
l F:191 LF pal.b[5225] GOTO l
l F:20 LAB pal.b[3768] l:erlev,erlab:=-l1,-l2
l F:20 LAB pal.b[6259] l:writes("*n end'cktrace*n")
l F:20 LF pal.b[3764] erlev,erlab:=level(),l
l F:20 LF pal.b[6252] GOTO l
l F:256 LAB pal.b[2130] l:..;..
l F:256 LF pal.b[2146] GOTO l
l F:28 LAB pal.b[7566] l:LET ..; ..
l F:28 LF pal.b[7584] GOTO l
l F:31 LAB pal.b[3868] l:IF a=z DO ..
l F:31 LF pal.b[3853] GOTO l
l F:38 LAB pal.b[7210] l:DEFAULT:..
l F:38 LF pal.b[7213] GOTO l
l F:42 LAB pal.b[9401] l:s1:=rbase(s1)&p_addr
l F:42 LF pal.b[9397] GOTO l
l F:42 LF pal.b[9399] GOTO l
l F:58 LAB pal.b[5422] l:writef("*n*n# C'%S (%T)*n",s)
l F:58 LF pal.b[5410] GOTO l
l F:58 LF pal.b[5418] GOTO l
l F:64 LAB pal.b[6531] l:msg1(24,p)
l F:64 LF pal.b[6523] GOTO l
l F:69 LAB pal.b[3979] l:gw1:=h3!a-gw1
l F:69 LF pal.b[3947] GOTO l
l F:69 LF pal.b[3950] GOTO l
l F:9 LAB pal.b[358] l:q:=af1(@e,q)
l F:9 LAB pal.b[8991] l:setio()
l F:9 LF pal.b[352] GOTO l
l F:9 LF pal.b[8954] erlev,erlab:=level(),l
l F:95 LAB pal.b[950] l:f(arg,n)
l F:95 LF pal.b[910] GOTO l
l F:95 LF pal.b[912] GOTO l
l F:95 LF pal.b[915] GOTO l
l F:95 LF pal.b[919] GOTO l
l F:95 LF pal.b[921] GOTO l
l F:95 LF pal.b[923] GOTO l
l F:95 LF pal.b[925] GOTO l
l F:95 LF pal.b[927] GOTO l
l F:95 LF pal.b[929] GOTO l
l F:95 LF pal.b[931] GOTO l
l F:95 LF pal.b[941] GOTO l
l0 F:143 LAB pal.b[5879] l0:FOR i=0 TO 3 DO..
l0 F:143 LF pal.b[5876] GOTO l0
l0 F:280 LAB pal.b[3628] l0:c:=loadn(c,y1,0)
l0 F:280 LF pal.b[3626] GOTO l0
l0 F:33 LAB pal.b[4312] l0:FOR i=svv TO st2 BY 4 DO..
l0 F:33 LF pal.b[4346] GOTO l0
l0 S:1 DEF pal.b[5269] l0=0
l0 S:1 LL pal.b[5361] longjump(flevel(verify),l0)
l0 S:1 SL pal.b[5327] l0,dd0:=ll,TRUE
l1 F:112 LAB pal.b[8735] l1:UNTIL h1!t2>=a1 DO ..
l1 F:112 LF pal.b[8700] GOTO l1
l1 F:112 LF pal.b[8705] GOTO l1
l1 F:112 LF pal.b[8710] GOTO l1
l1 F:112 LF pal.b[8720] GOTO l1
l1 F:122 LAB pal.b[4511] l1:LET ..; ..
l1 F:122 LF pal.b[4546] GOTO l1
l1 F:141 LAB pal.b[5888] l1:a:=h1!a
l1 F:141 LF pal.b[5878] GOTO l1
l1 F:145 LAB pal.b[8818] l1:UNTIL h2!t2>=a2 DO ..
l1 F:145 LF pal.b[8797] GOTO l1
l1 F:145 LF pal.b[8802] GOTO l1
l1 F:19 LAB pal.b[1595] l1:writef(s,a,b,...)
l1 F:19 LF pal.b[1511] GOTO l1
l1 F:19 LF pal.b[1517] GOTO l1
l1 F:19 LF pal.b[1519] GOTO l1
l1 F:19 LF pal.b[1521] GOTO l1
l1 F:19 LF pal.b[1523] GOTO l1
l1 F:19 LF pal.b[1525] GOTO l1
l1 F:19 LF pal.b[1527] GOTO l1
l1 F:19 LF pal.b[1531] GOTO l1
l1 F:19 LF pal.b[1533] GOTO l1
l1 F:19 LF pal.b[1535] GOTO l1
l1 F:19 LF pal.b[1539] GOTO l1
l1 F:19 LF pal.b[1541] GOTO l1
l1 F:19 LF pal.b[1543] GOTO l1
l1 F:19 LF pal.b[1545] GOTO l1
l1 F:19 LF pal.b[1547] GOTO l1
l1 F:19 LF pal.b[1549] GOTO l1
l1 F:19 LF pal.b[1551] GOTO l1
l1 F:19 LF pal.b[1553] GOTO l1
l1 F:19 LF pal.b[1555] GOTO l1
l1 F:19 LF pal.b[1557] GOTO l1
l1 F:19 LF pal.b[1559] GOTO l1
l1 F:19 LF pal.b[1561] GOTO l1
l1 F:19 LF pal.b[1563] GOTO l1
l1 F:19 LF pal.b[1565] GOTO l1
l1 F:19 LF pal.b[1567] GOTO l1
l1 F:19 LF pal.b[1569] GOTO l1
l1 F:19 LF pal.b[1581] GOTO l1
l1 F:19 LF pal.b[1583] GOTO l1
l1 F:19 LF pal.b[1585] GOTO l1
l1 F:19 LF pal.b[1587] GOTO l1
l1 F:19 LF pal.b[1591] GOTO l1
l1 F:19 LF pal.b[1593] GOTO l1
l1 F:281 LAB pal.b[3603] l1:..;..
l1 F:281 LF pal.b[3613] GOTO l1
l1 F:31 LAB pal.b[5726] l1:writes(s0)
l1 F:31 LF pal.b[5627] GOTO l1
l1 F:31 LF pal.b[5630] GOTO l1
l1 F:31 LF pal.b[5651] GOTO l1
l1 F:31 LF pal.b[5666] GOTO l1
l1 F:31 LF pal.b[5716] GOTO l1
l1 F:31 LF pal.b[5719] GOTO l1
l1 F:31 LF pal.b[5722] GOTO l1
l1 F:31 LF pal.b[5724] GOTO l1
l1 F:52 LAB pal.b[3914] l1:h1!s0:=getx(s_numj,h1!a,gw2,gw1)
l1 F:52 LAB pal.b[4352] l1:FOR i=p TO svu BY 4 DO..
l1 F:52 LF pal.b[3903] GOTO l1
l1 F:52 LF pal.b[4338] GOTO l1
l1 F:96 LAB pal.b[946] l1:p:=p+1
l1 F:96 LF pal.b[933] GOTO l1
l1 F:96 LF pal.b[935] GOTO l1
l1 F:96 LF pal.b[937] GOTO l1
l1 F:96 LF pal.b[939] GOTO l1
l2 F:121 LAB pal.b[4566] l2:LET ..; ..
l2 F:121 LF pal.b[4539] GOTO l2
l2 F:121 LF pal.b[4592] GOTO l2
l2 F:18 LAB pal.b[1600] l2:writef(s,a,b,...)
l2 F:18 LF pal.b[1510] GOTO l2
l2 F:18 LF pal.b[1537] GOTO l2
l2 F:18 LF pal.b[1571] GOTO l2
l2 F:18 LF pal.b[1573] GOTO l2
l2 F:18 LF pal.b[1575] GOTO l2
l2 F:18 LF pal.b[1577] GOTO l2
l2 F:18 LF pal.b[1579] GOTO l2
l2 F:18 LF pal.b[1589] GOTO l2
l2 F:32 LAB pal.b[5708] l2:writef(s0,s1)
l2 F:32 LF pal.b[5663] GOTO l2
l2 F:32 LF pal.b[5677] GOTO l2
l2 F:32 LF pal.b[5680] GOTO l2
l2 F:32 LF pal.b[5683] GOTO l2
l2 F:32 LF pal.b[5685] GOTO l2
l2 F:32 LF pal.b[5688] GOTO l2
l2 F:32 LF pal.b[5691] GOTO l2
l2 F:32 LF pal.b[5696] GOTO l2
l2 F:49 LAB pal.b[3918] l2:WHILE h2!c=0 DO ..
l2 F:49 LF pal.b[3911] GOTO l2
l3 F:17 LAB pal.b[1607] l3:writef(s,a,b,...)
l3 F:17 LF pal.b[1513] GOTO l3
l3 F:17 LF pal.b[1515] GOTO l3
l3 F:17 LF pal.b[1529] GOTO l3
l_flatten G:633 DEF palhdr.h[752] l_flatten=
l_flatten G:633 LAB pal.b[3166] l_flatten:RESULTIS z
l_flatten G:633 LG pal.b[3109] longjump(flevel(flatten),l_flatten)
la_a1 G:665 DEF palhdr.h[787] la_a1=
la_a1 G:665 LAB pal.b[1805] la_a1:e:=get4(s_e,h1!c,arg1,...)
la_a1 G:665 LG pal.b[3411] l:=la_a1
la_a1 G:665 LLG pal.b[8112] d(@la_a1,"IA1 ")
la_ae G:666 DEF palhdr.h[788] la_ae=
la_ae G:666 LAB pal.b[1870] la_ae:e:=binda(h2!c,arg1,h1!c)
la_ae G:666 LG pal.b[3419] l:=la_ae
la_ae G:666 LLG pal.b[8113] d(@la_ae,"IAE ")
la_apclos2 G:657 DEF palhdr.h[778] la_apclos2=
la_apclos2 G:657 LAB pal.b[2211] la_apclos2:CASE s_clos2:.. 
la_apclos2 G:657 LG pal.b[9939] l:=la_apclos2
la_apclos2 G:657 LLG pal.b[8104] d(@la_apclos2,"IAE2")
la_apcode2 G:656 DEF palhdr.h[777] la_apcode2=
la_apcode2 G:656 LAB pal.b[2075] la_apcode2:CASE s_code2:.. 
la_apcode2 G:656 LG pal.b[3414] l:=la_apcode2
la_apcode2 G:656 LG pal.b[9931] l:=la_apcode2
la_apcode2 G:656 LLG pal.b[8103] d(@la_apcode2,"IAB2")
la_apeclos G:658 DEF palhdr.h[779] la_apeclos=
la_apeclos G:658 LAB pal.b[2212] la_apeclos:CASE s_eclos:.. 
la_apeclos G:658 LG pal.b[9947] l:=la_apeclos
la_apeclos G:658 LLG pal.b[8105] d(@la_apeclos,"IAE ")
la_apfclos G:659 DEF palhdr.h[780] la_apfclos=
la_apfclos G:659 LAB pal.b[2224] la_apfclos:CASE s_fclos:.. 
la_apfclos G:659 LG pal.b[9950] l:=la_apfclos
la_apfclos G:659 LLG pal.b[8106] d(@la_apfclos,"IAF ")
la_aploc G:654 DEF palhdr.h[775] la_aploc=
la_aploc G:654 LAB pal.b[2019] la_aploc:CASE s_loc:.. 
la_aploc G:654 LG pal.b[3425] l:=la_aploc
la_aploc G:654 LG pal.b[9952] l:=la_aploc
la_aploc G:654 LLG pal.b[8101] d(@la_aploc,"IAL ")
la_aptup G:655 DEF palhdr.h[776] la_aptup=
la_aptup G:655 LAB pal.b[2098] la_aptup:CASE s_tuple:.. 
la_aptup G:655 LG pal.b[2110] GOTO la_aptup
la_aptup G:655 LG pal.b[3428] l:=la_aptup
la_aptup G:655 LG pal.b[9955] l:=la_aptup
la_aptup G:655 LLG pal.b[8102] d(@la_aptup,"IAT ")
la_entx G:651 DEF palhdr.h[772] la_entx=
la_entx G:651 LAB pal.b[2022] la_entx:CASE s_cdx:.. 
la_entx G:651 LG pal.b[9914] l:=la_entx
la_entx G:651 LLG pal.b[8098] d(@la_entx,"IEX ")
la_enty G:652 DEF palhdr.h[773] la_enty=
la_enty G:652 LAB pal.b[2028] la_enty:CASE s_cdy:.. 
la_enty G:652 LG pal.b[9912] l:=la_enty
la_enty G:652 LLG pal.b[8099] d(@la_enty,"IEY ")
la_entz G:653 DEF palhdr.h[774] la_entz=
la_entz G:653 LAB pal.b[2034] la_entz:CASE s_cdz:.. 
la_entz G:653 LLG pal.b[8100] d(@la_entz,"IEZ ")
lastditch G:344 DEF palhdr.h[423] lastditch=
lastditch G:344 RT pal.b[5299] LET lastditch(a)BE..
lcoef G:407 DEF palhdr.h[497] lcoef=
lcoef G:407 LG pal.b[5098] lcoef
lcoef G:407 LG pal.b[5102] c:=div(c,lcoef)
lcoef G:407 LG pal.b[5110] UNLESS lcoef=y1 DO ..
lcoef G:407 LG pal.b[5111] a:=div(a,lcoef)
lcoef G:407 LG pal.b[5124] TEST lcoef=y1 THEN .. ELSE ..
lcoef G:407 LG pal.b[5126] a:=div(h2!a,lcoef)
lcoef G:407 LG pal.b[5154] TEST lcoef=y1 THEN .. ELSE ..
lcoef G:407 LG pal.b[5156] b:=div(h1!b,lcoef)
lcoef G:407 LG pal.b[5484] result2,lcoef,ldeg
lcoef G:407 LG pal.b[5504] lcoef,ldeg
lcoef G:407 LG pal.b[7007] recip(lcoef)
lcoef G:407 LG pal.b[7029] TEST a=y1|lcoef=y1 THEN .. ELSE ..
lcoef G:407 LG pal.b[7892] lcoef,ldeg
lcoef G:407 SG pal.b[5492] result2,lcoef,ldeg:=d1,d2,d3
lcoef G:407 SG pal.b[5495] result2,lcoef,ldeg:=d1,d2,d3
lcoef G:407 SG pal.b[5511] lcoef,ldeg:=d2,d3
lcoef G:407 SG pal.b[5514] lcoef,ldeg:=d2,d3
lcoef G:407 SG pal.b[7743] lcoef,ldeg,result2:=q,h3!v,p
lcoef G:407 SG pal.b[7754] lcoef,ldeg,result2:=q,h3!v,u
lcoef G:407 SG pal.b[7790] lcoef,ldeg:=q,h3!v
lcoef G:407 SG pal.b[7798] lcoef,ldeg:=q,h3!v
lcoef G:407 SG pal.b[7859] lcoef:=t
lcoef G:407 SG pal.b[7872] lcoef:=t
ldeg G:408 DEF palhdr.h[498] ldeg=
ldeg G:408 LG pal.b[5484] result2,lcoef,ldeg
ldeg G:408 LG pal.b[5504] lcoef,ldeg
ldeg G:408 LG pal.b[7892] lcoef,ldeg
ldeg G:408 SG pal.b[5492] result2,lcoef,ldeg:=d1,d2,d3
ldeg G:408 SG pal.b[5495] result2,lcoef,ldeg:=d1,d2,d3
ldeg G:408 SG pal.b[5511] lcoef,ldeg:=d2,d3
ldeg G:408 SG pal.b[5514] lcoef,ldeg:=d2,d3
ldeg G:408 SG pal.b[7743] lcoef,ldeg,result2:=q,h3!v,p
ldeg G:408 SG pal.b[7754] lcoef,ldeg,result2:=q,h3!v,u
ldeg G:408 SG pal.b[7790] lcoef,ldeg:=q,h3!v
ldeg G:408 SG pal.b[7798] lcoef,ldeg:=q,h3!v
level G:15 DEF libhdr.h[30] level=15
level G:15 DEF palhdr.h[18] level=15
level G:15 LG pal.b[1055] erlev,erlab:=level(),l
level G:15 LG pal.b[1210] backtr(stackbase,level()>>2)
level G:15 LG pal.b[1597] backtr(erlev>>2,level()>>2)
level G:15 LG pal.b[3764] erlev,erlab:=level(),l
level G:15 LG pal.b[8057] stackb:=level()>>2
level G:15 LG pal.b[8954] erlev,erlab:=level(),l
lgcd G:632 DEF palhdr.h[750] lgcd=
lgcd G:632 FN pal.b[4203] LET lgcd(a,b)=..
lgcd G:632 LG pal.b[4930] c:=lgcd(b,c)
lgcd G:632 LG pal.b[7023] RESULTIS lgcd(a,b)
linkword G:546 DEF palhdr.h[654] linkword=
linkword G:546 FN pal.b[6304] LET linkword(n,a,a2,a3)=..
linkword G:546 LG pal.b[6880] RESULTIS linkword(s_glz,a,zsy,z)
linkword G:546 LG pal.b[7984] RESULTIS h2!linkword(s_glo,s,...)
linkword G:546 LG pal.b[7991] RESULTIS h2!linkword(s_glo,s,...)
linkword G:546 LG pal.b[7997] RESULTIS h2!linkword(s_glo,s,...)
linkword G:546 LG pal.b[8004] RESULTIS h2!linkword(s_glo,s,...)
linkword G:546 LG pal.b[8009] RESULTIS h2!linkword(s_glo,s,...)
linkword G:546 LG pal.b[8014] RESULTIS h2!linkword(s_glo,a,...)
linkword G:546 LG pal.b[8019] RESULTIS h2!linkword(s_glo,a,...)
linkword G:546 LG pal.b[8046] RESULTIS h2!linkword(s_glo,a,...)
linkword G:546 LG pal.b[8051] RESULTIS h2!linkword(n,s,...)
linseq G:579 DEF palhdr.h[689] linseq=
linseq G:579 FN pal.b[10276] LET linseq(a,e,f,x)=..
linseq G:579 LG pal.b[10283] e:=linseq(h2!a,e,f,x)
linseq G:579 LG pal.b[10289] f:=linseq(h3!a,e,f,x)
linseq G:579 LG pal.b[10290] e:=linseq(h2!a,e,f,x)
linseq G:579 LG pal.b[10294] e:=linseq(h2!a,e,f,x)
linseq G:579 LG pal.b[9462] a:=linseq(a,z,z,signbit)
ll F:24 LAB pal.b[8203] ll:..;..
ll F:39 LAB pal.b[5329] ll:LET ..; ..
ll F:39 LF pal.b[5327] l0,dd0:=ll,TRUE
ll F:43 LAB pal.b[9367] ll:CASE s_fin:.. 
ll F:43 LF pal.b[9342] GOTO ll
ll S:1 DEF pal.b[3076] ll=0
ll S:1 LL pal.b[3162] RESULTIS get4(ll,c,a1,a2)
ll S:1 LL pal.b[3281] c:=get4(s_cd,c,zsy,ll)
ll S:1 LL pal.b[3392] c:=get4(s_cd,c,v,ll)
ll S:1 LL pal.b[3403] c:=get4(s_cd,c,v,ll)
ll S:1 LL pal.b[3439] c:=get4(s_cd,c,...,ll)
ll S:1 LL pal.b[3451] c:=get4(s_cd,c,z,ll)
ll S:1 LL pal.b[3478] c:=get4(s_cd,c,a3,ll)
ll S:1 LL pal.b[3507] c:=get4(s_cd,c,a3,ll)
ll S:1 LL pal.b[3546] RESULTIS get4(s_cd,c,a,ll)
ll S:1 LL pal.b[3603] c:=get4(s_cd,c,...,ll)
ll S:1 LL pal.b[3629] RESULTIS get4(s_cd,c,...,ll)
ll S:1 LL pal.b[3684] h1!l,h2!l,h3!l:=h1!h1!l,v,ll
ll S:1 LL pal.b[3697] h1!l,h2!l,h3!l:=h1!h1!l,v,ll
ll S:1 SL pal.b[3156] ll:=s_cdz
ll S:1 SL pal.b[3160] ll:=s_cdy
ll S:1 SL pal.b[3161] ll:=s_cdx
ll S:1 SL pal.b[3265] ll:=ll_cyf
ll S:1 SL pal.b[3266] ll:=ll_cy
ll S:1 SL pal.b[3273] ll:=ll_apck
ll S:1 SL pal.b[3275] ll:=ll_apcc
ll S:1 SL pal.b[3276] ll:=ll_apcf
ll S:1 SL pal.b[3279] ll:=ll_cyf
ll S:1 SL pal.b[3280] ll:=ll_cy
ll S:1 SL pal.b[3292] ll:=ll_na1f
ll S:1 SL pal.b[3293] ll:=ll_na1
ll S:1 SL pal.b[3296] ll:=ll_na2f
ll S:1 SL pal.b[3297] ll:=ll_na2
ll S:1 SL pal.b[3300] ll:=ll_naf
ll S:1 SL pal.b[3301] ll:=ll_na
ll S:1 SL pal.b[3337] ll:=ll_closx
ll S:1 SL pal.b[3345] ll:=ll_rec0
ll S:1 SL pal.b[3386] c,v,ll:=h1!v,h2!v,ll_entz
ll S:1 SL pal.b[3388] ll:=ll_apbk
ll S:1 SL pal.b[3390] ll:=ll_apbc
ll S:1 SL pal.b[3391] ll:=ll_apbf
ll S:1 SL pal.b[3397] c,v,ll:=h1!v,h2!v,ll_enty
ll S:1 SL pal.b[3399] ll:=ll_apck
ll S:1 SL pal.b[3401] ll:=ll_apcc
ll S:1 SL pal.b[3402] ll:=ll_apcf
ll S:1 SL pal.b[3432] ll:=ll_apkj
ll S:1 SL pal.b[3434] ll:=ll_apkk
ll S:1 SL pal.b[3436] ll:=ll_apkc
ll S:1 SL pal.b[3437] ll:=ll_apkf
ll S:1 SL pal.b[3445] ll:=ll_apnj
ll S:1 SL pal.b[3447] ll:=ll_apnk
ll S:1 SL pal.b[3449] ll:=ll_apnc
ll S:1 SL pal.b[3450] ll:=ll_apnf
ll S:1 SL pal.b[3468] ll:=ll_hdv
ll S:1 SL pal.b[3470] ll:=ll_tlv
ll S:1 SL pal.b[3472] ll:=ll_miv
ll S:1 SL pal.b[3474] ll:=ll_atom
ll S:1 SL pal.b[3476] ll:=ll_null
ll S:1 SL pal.b[3477] ll:=ll_apv
ll S:1 SL pal.b[3495] ll:=ll_xconsf
ll S:1 SL pal.b[3496] ll:=ll_consf
ll S:1 SL pal.b[3498] ll:=ll_xcons
ll S:1 SL pal.b[3499] ll:=ll_cons
ll S:1 SL pal.b[3502] ll:=ll_ap2sf
ll S:1 SL pal.b[3503] ll:=ll_ap2f
ll S:1 SL pal.b[3505] ll:=ll_ap2s
ll S:1 SL pal.b[3506] ll:=ll_ap2
ll S:1 SL pal.b[3513] ll:=ll_e
ll S:1 SL pal.b[3515] ll:=ll_j
ll S:1 SL pal.b[3544] ll:=ll_cyf
ll S:1 SL pal.b[3545] ll:=ll_cy
ll S:1 SL pal.b[3602] ll:=ll_bvez
ll S:1 SL pal.b[3604] ll:=ll_bve
ll S:1 SL pal.b[3612] ll:=ll_bve
ll S:1 SL pal.b[3625] ll:=ll_lv
ll S:1 SL pal.b[3627] ll:=ll_rv
ll S:1 SL pal.b[3678] ll:=ll_apbk
ll S:1 SL pal.b[3680] ll:=ll_apbc
ll S:1 SL pal.b[3682] ll:=ll_apbf
ll S:1 SL pal.b[3691] ll:=ll_apck
ll S:1 SL pal.b[3693] ll:=ll_apcc
ll S:1 SL pal.b[3695] ll:=ll_apcf
ll_1tup G:698 DEF palhdr.h[824] ll_1tup=
ll_1tup G:698 LAB pal.b[2497] ll_1tup:arg1:=get4(s_tuple,z,arg1,y1)
ll_1tup G:698 LG pal.b[3316] l:=ll_1tup
ll_1tup G:698 LLG pal.b[8152] d(@ll_1tup,"AUG1")
ll_ap G:669 DEF palhdr.h[792] ll_ap=
ll_ap G:669 LAB pal.b[2007] ll_ap:IF c<=0 DO ..
ll_ap G:669 LG pal.b[1794] GOTO ll_ap
ll_ap G:669 LG pal.b[2020] GOTO ll_ap
ll_ap G:669 LG pal.b[2237] GOTO ll_ap
ll_ap G:669 LG pal.b[2758] GOTO ll_ap
ll_ap G:669 LG pal.b[2768] GOTO ll_ap
ll_ap G:669 LG pal.b[2777] GOTO ll_ap
ll_ap G:669 LG pal.b[3377] ll_ap,h2!a1
ll_ap G:669 LG pal.b[3757] GOTO ll_ap
ll_ap G:669 LG pal.b[9903] ll_ap,h2!a
ll_ap G:669 LLG pal.b[8114] d(@ll_ap,"IA  ")
ll_ap1 G:702 DEF palhdr.h[828] ll_ap1=
ll_ap1 G:702 LAB pal.b[2596] ll_ap1:arg1:=(h2!c)(arg1)
ll_ap1 G:702 LG pal.b[3460] c:=get4(s_cd,c,...,ll_ap1)
ll_ap1 G:702 LLG pal.b[8154] d(@ll_ap1,"B1  ")
ll_ap2 G:708 DEF palhdr.h[834] ll_ap2=
ll_ap2 G:708 LAB pal.b[2649] ll_ap2:arg1:=(h2!c)(arg1,h2!f)
ll_ap2 G:708 LG pal.b[3506] ll:=ll_ap2
ll_ap2 G:708 LLG pal.b[8160] d(@ll_ap2,"B2  ")
ll_ap2f G:709 DEF palhdr.h[835] ll_ap2f=
ll_ap2f G:709 LAB pal.b[2660] ll_ap2f:gw0:=(h2!c)(arg1,h2!f)
ll_ap2f G:709 LG pal.b[3503] ll:=ll_ap2f
ll_ap2f G:709 LLG pal.b[8161] a(@ll_ap2f,"B2F ")
ll_ap2s G:710 DEF palhdr.h[836] ll_ap2s=
ll_ap2s G:710 LAB pal.b[2645] ll_ap2s:arg1:=(h2!c)(h2!f,arg1)
ll_ap2s G:710 LG pal.b[3505] ll:=ll_ap2s
ll_ap2s G:710 LLG pal.b[8162] d(@ll_ap2s,"B2S ")
ll_ap2sf G:711 DEF palhdr.h[837] ll_ap2sf=
ll_ap2sf G:711 LAB pal.b[2656] ll_ap2sf:gw0:=(h2!c)(h2!f,arg1)
ll_ap2sf G:711 LG pal.b[3502] ll:=ll_ap2sf
ll_ap2sf G:711 LLG pal.b[8163] a(@ll_ap2sf,"B2SF")
ll_apbc G:733 DEF palhdr.h[861] ll_apbc=
ll_apbc G:733 LAB pal.b[2825] ll_apbc:j,m:=get4(m,...)+yfj,s_mmcc
ll_apbc G:733 LG pal.b[3390] ll:=ll_apbc
ll_apbc G:733 LG pal.b[3680] ll:=ll_apbc
ll_apbc G:733 LLG pal.b[8180] d(@ll_apbc,"ABC ")
ll_apbf G:730 DEF palhdr.h[858] ll_apbf=
ll_apbf G:730 LAB pal.b[2806] ll_apbf:TEST f<yfj THEN .. ELSE ..
ll_apbf G:730 LG pal.b[3391] ll:=ll_apbf
ll_apbf G:730 LG pal.b[3682] ll:=ll_apbf
ll_apbf G:730 LLG pal.b[8177] d(@ll_apbf,"ABF ")
ll_apbf1 G:731 DEF palhdr.h[859] ll_apbf1=
ll_apbf1 G:731 LAB pal.b[2810] ll_apbf1:h3!f:=h1!c
ll_apbf1 G:731 LLG pal.b[8178] d(@ll_apbf1,"ABF1")
ll_apbk G:732 DEF palhdr.h[860] ll_apbk=
ll_apbk G:732 LAB pal.b[2817] ll_apbk:f:=get4(s_mmcf,f,...)+yfj
ll_apbk G:732 LG pal.b[3388] ll:=ll_apbk
ll_apbk G:732 LG pal.b[3678] ll:=ll_apbk
ll_apbk G:732 LLG pal.b[8179] d(@ll_apbk,"ABK ")
ll_apcc G:729 DEF palhdr.h[857] ll_apcc=
ll_apcc G:729 LAB pal.b[2798] ll_apcc:j,m:=get4(m,...)+yfj,s_mmcc
ll_apcc G:729 LG pal.b[3275] ll:=ll_apcc
ll_apcc G:729 LG pal.b[3401] ll:=ll_apcc
ll_apcc G:729 LG pal.b[3693] ll:=ll_apcc
ll_apcc G:729 LLG pal.b[8176] d(@ll_apcc,"ACC ")
ll_apcf G:726 DEF palhdr.h[854] ll_apcf=
ll_apcf G:726 LAB pal.b[2779] ll_apcf:TEST f<yfj THEN .. ELSE ..
ll_apcf G:726 LG pal.b[3276] ll:=ll_apcf
ll_apcf G:726 LG pal.b[3402] ll:=ll_apcf
ll_apcf G:726 LG pal.b[3695] ll:=ll_apcf
ll_apcf G:726 LLG pal.b[8173] d(@ll_apcf,"ACF ")
ll_apcf1 G:727 DEF palhdr.h[855] ll_apcf1=
ll_apcf1 G:727 LAB pal.b[2783] ll_apcf1:h3!f:=h1!c
ll_apcf1 G:727 LLG pal.b[8174] d(@ll_apcf1,"ACF1")
ll_apck G:728 DEF palhdr.h[856] ll_apck=
ll_apck G:728 LAB pal.b[2790] ll_apck:f:=get4(s_mmcf,f,...)+yfj
ll_apck G:728 LG pal.b[3273] ll:=ll_apck
ll_apck G:728 LG pal.b[3399] ll:=ll_apck
ll_apck G:728 LG pal.b[3691] ll:=ll_apck
ll_apck G:728 LLG pal.b[8175] d(@ll_apck,"ACK ")
ll_apeclos G:663 DEF palhdr.h[785] ll_apeclos=
ll_apeclos G:663 LAB pal.b[2215] ll_apeclos:LET ..; ..
ll_apeclos G:663 LG pal.b[3420] l:=ll_apeclos
ll_apeclos G:663 LLG pal.b[8110] d(@ll_apeclos,"KAE ")
ll_apfclos G:664 DEF palhdr.h[786] ll_apfclos=
ll_apfclos G:664 LAB pal.b[2227] ll_apfclos:e:=bind(h2!c,arg1,h1!c)
ll_apfclos G:664 LG pal.b[3423] l:=ll_apfclos
ll_apfclos G:664 LLG pal.b[8111] d(@ll_apfclos,"KAF ")
ll_apkc G:736 DEF palhdr.h[864] ll_apkc=
ll_apkc G:736 LAB pal.b[2851] ll_apkc:c:=h1!c
ll_apkc G:736 LG pal.b[3436] ll:=ll_apkc
ll_apkc G:736 LG pal.b[3679] TEST l3=ll_apkc THEN .. ELSE ..
ll_apkc G:736 LG pal.b[3692] TEST l3=ll_apkc THEN .. ELSE ..
ll_apkc G:736 LLG pal.b[8183] d(@ll_apkc,"ATC ")
ll_apkf G:734 DEF palhdr.h[862] ll_apkf=
ll_apkf G:734 LAB pal.b[2832] ll_apkf:c:=h1!c
ll_apkf G:734 LG pal.b[3437] ll:=ll_apkf
ll_apkf G:734 LG pal.b[3681] TEST l3=ll_apkf THEN .. ELSE ..
ll_apkf G:734 LG pal.b[3694] TEST l3=ll_apkf THEN .. ELSE ..
ll_apkf G:734 LLG pal.b[8181] d(@ll_apkf,"ATF ")
ll_apkf1 F:9 LAB pal.b[2837] ll_apkf1:h3!f:=h1!c
ll_apkj G:737 DEF palhdr.h[865] ll_apkj=
ll_apkj G:737 LAB pal.b[2857] ll_apkj:c:=h1!c
ll_apkj G:737 LG pal.b[3432] ll:=ll_apkj
ll_apkj G:737 LG pal.b[3673] TEST l3=ll_apkj THEN .. ELSE ..
ll_apkj G:737 LG pal.b[3686] TEST l3=ll_apkj THEN .. ELSE ..
ll_apkj G:737 LLG pal.b[8184] d(@ll_apkj,"ATJ ")
ll_apkk G:735 DEF palhdr.h[863] ll_apkk=
ll_apkk G:735 LAB pal.b[2843] ll_apkk:c:=h1!c
ll_apkk G:735 LG pal.b[3434] ll:=ll_apkk
ll_apkk G:735 LG pal.b[3677] TEST l3=ll_apkk THEN .. ELSE ..
ll_apkk G:735 LG pal.b[3690] TEST l3=ll_apkk THEN .. ELSE ..
ll_apkk G:735 LLG pal.b[8182] d(@ll_apkk,"ATK ")
ll_apnc G:741 DEF palhdr.h[869] ll_apnc=
ll_apnc G:741 LAB pal.b[2770] ll_apnc:j,m:=get4(m,...)+yfj,s_mmcc
ll_apnc G:741 LG pal.b[3449] ll:=ll_apnc
ll_apnc G:741 LLG pal.b[8171] d(@ll_apnc,"APC ")
ll_apnf G:738 DEF palhdr.h[866] ll_apnf=
ll_apnf G:738 LAB pal.b[2748] ll_apnf:IF f>=yfj DO ..
ll_apnf G:738 LG pal.b[3450] ll:=ll_apnf
ll_apnf G:738 LLG pal.b[8168] d(@ll_apnf,"APF ")
ll_apnf1 G:739 DEF palhdr.h[867] ll_apnf1=
ll_apnf1 G:739 LAB pal.b[2750] ll_apnf1:!f,stackp:=stackp,f&p_addr
ll_apnf1 G:739 LLG pal.b[8169] d(@ll_apnf1,"APF1")
ll_apnj G:742 DEF palhdr.h[870] ll_apnj=
ll_apnj G:742 LAB pal.b[2772] ll_apnj:c:=h2!f
ll_apnj G:742 LG pal.b[3445] ll:=ll_apnj
ll_apnj G:742 LLG pal.b[8172] d(@ll_apnj,"APJ ")
ll_apnk G:740 DEF palhdr.h[868] ll_apnk=
ll_apnk G:740 LAB pal.b[2760] ll_apnk:TEST f<yfj THEN .. ELSE ..
ll_apnk G:740 LG pal.b[3447] ll:=ll_apnk
ll_apnk G:740 LLG pal.b[8170] d(@ll_apnk,"APK ")
ll_apv G:701 DEF palhdr.h[827] ll_apv=
ll_apv G:701 LAB pal.b[2592] ll_apv:IF arg1>=yloc DO ..
ll_apv G:701 LG pal.b[3477] ll:=ll_apv
ll_apv G:701 LLG pal.b[8153] d(@ll_apv,"B1V ")
ll_atom G:707 DEF palhdr.h[833] ll_atom=
ll_atom G:707 LAB pal.b[2635] ll_atom:IF arg1>=yloc DO ..
ll_atom G:707 LG pal.b[3474] ll:=ll_atom
ll_atom G:707 LLG pal.b[8159] d(@ll_atom,"ATOM")
ll_bind G:676 DEF palhdr.h[800] ll_bind=
ll_bind G:676 LAB pal.b[2516] ll_bind:e:=bind(h2!c,arg1,e)
ll_bind G:676 LG pal.b[3362] c:=get4(s_cd,c,...,ll_bind)
ll_bind G:676 LLG pal.b[8122] d(@ll_bind,"BV  ")
ll_binde G:677 DEF palhdr.h[801] ll_binde=
ll_binde G:677 LAB pal.b[2535] ll_binde:e:=get4(s_e,e,arg1,...)
ll_binde G:677 LG pal.b[3633] RESULTIS get4(s_cd,c,b,ll_binde)
ll_binde G:677 LLG pal.b[8123] a(@ll_binde,"BE  ")
ll_bve G:723 DEF palhdr.h[850] ll_bve=
ll_bve G:723 LAB pal.b[2570] ll_bve:e:=get4(s_e,e,...,...)
ll_bve G:723 LG pal.b[3604] ll:=ll_bve
ll_bve G:723 LG pal.b[3612] ll:=ll_bve
ll_bve G:723 LLG pal.b[8131] d(@ll_bve,"BVE ")
ll_bvez G:724 DEF palhdr.h[851] ll_bvez=
ll_bvez G:724 LAB pal.b[2576] ll_bvez:arg1:=h2!arg1
ll_bvez G:724 LG pal.b[3602] ll:=ll_bvez
ll_bvez G:724 LLG pal.b[8132] d(@ll_bvez,"BVEZ")
ll_bvf G:718 DEF palhdr.h[845] ll_bvf=
ll_bvf G:718 LAB pal.b[2541] ll_bvf:arg1:=h2!f
ll_bvf G:718 LG pal.b[3621] c:=get4(s_cd,c,z,ll_bvf)
ll_bvf G:718 LLG pal.b[8126] d(@ll_bvf,"BVF ")
ll_bvf1 G:721 DEF palhdr.h[848] ll_bvf1=
ll_bvf1 G:721 LAB pal.b[2558] ll_bvf1:arg1:=h2!arg1
ll_bvf1 G:721 LG pal.b[3610] c:=get4(s_cd,c,z,ll_bvf1)
ll_bvf1 G:721 LLG pal.b[8129] d(@ll_bvf1,"BVF1")
ll_bvfa G:720 DEF palhdr.h[847] ll_bvfa=
ll_bvfa G:720 LAB pal.b[2555] ll_bvfa:f:=get4(s_mmcf,f,...)+yfj
ll_bvfa G:720 LG pal.b[3624] RESULTIS get4(s_cd,c,z,ll_bvfa)
ll_bvfa G:720 LLG pal.b[8128] d(@ll_bvfa,"BVFA")
ll_bvfe G:719 DEF palhdr.h[846] ll_bvfe=
ll_bvfe G:719 LAB pal.b[2548] ll_bvfe:arg1:=h2!f
ll_bvfe G:719 LG pal.b[3619] c:=get4(s_cd,c,b2,ll_bvfe)
ll_bvfe G:719 LLG pal.b[8127] d(@ll_bvfe,"BVFE")
ll_bvfz G:722 DEF palhdr.h[849] ll_bvfz=
ll_bvfz G:722 LAB pal.b[2563] ll_bvfz:arg1:=h2!h2!f
ll_bvfz G:722 LG pal.b[3615] c:=get4(s_cd,c,z,ll_bvfz)
ll_bvfz G:722 LLG pal.b[8130] d(@ll_bvfz,"BVFZ")
ll_closl G:699 DEF palhdr.h[825] ll_closl=
ll_closl G:699 LAB pal.b[2503] ll_closl:arg1:=h2!c
ll_closl G:699 LLG pal.b[8120] d(@ll_closl,"CLL ")
ll_closx G:700 DEF palhdr.h[826] ll_closx=
ll_closx G:700 LAB pal.b[2509] ll_closx:arg1:=h2!c
ll_closx G:700 LG pal.b[3337] ll:=ll_closx
ll_closx G:700 LLG pal.b[8121] d(@ll_closx,"CLX ")
ll_cond G:694 DEF palhdr.h[819] ll_cond=
ll_cond G:694 LAB pal.b[2742] ll_cond:TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
ll_cond G:694 LG pal.b[3524] get4(s_cd,zsy,zsy,ll_cond)
ll_cond G:694 LG pal.b[3561] IF h3!c=ll_cond DO ..
ll_cond G:694 LG pal.b[3566] RESULTIS get4(s_cd,t1,t2,ll_cond)
ll_cond G:694 LLG pal.b[8148] a(@ll_cond,"->  ")
ll_cons G:712 DEF palhdr.h[838] ll_cons=
ll_cons G:712 LAB pal.b[2672] ll_cons:t:=h2!f
ll_cons G:712 LG pal.b[3499] ll:=ll_cons
ll_cons G:712 LLG pal.b[8164] d(@ll_cons,"AU  ")
ll_consf G:713 DEF palhdr.h[839] ll_consf=
ll_consf G:713 LAB pal.b[2693] ll_consf:s,t:=arg1,h2!f
ll_consf G:713 LG pal.b[3496] ll:=ll_consf
ll_consf G:713 LLG pal.b[8165] a(@ll_consf,"AUF ")
ll_cy G:679 DEF palhdr.h[803] ll_cy=
ll_cy G:679 LAB pal.b[2415] ll_cy:arg1:=h2!c
ll_cy G:679 LG pal.b[3266] ll:=ll_cy
ll_cy G:679 LG pal.b[3280] ll:=ll_cy
ll_cy G:679 LG pal.b[3545] ll:=ll_cy
ll_cy G:679 LLG pal.b[8134] d(@ll_cy,"L   ")
ll_cyf G:680 DEF palhdr.h[804] ll_cyf=
ll_cyf G:680 LAB pal.b[2419] ll_cyf:f:=get4(s_mmcf,f,...)+yfj
ll_cyf G:680 LG pal.b[3265] ll:=ll_cyf
ll_cyf G:680 LG pal.b[3279] ll:=ll_cyf
ll_cyf G:680 LG pal.b[3544] ll:=ll_cyf
ll_cyf G:680 LLG pal.b[8135] a(@ll_cyf,"LF  ")
ll_dash G:691 DEF palhdr.h[816] ll_dash=
ll_dash G:691 LAB pal.b[2737] ll_dash:arg1:=difr(arg1,h2!c)
ll_dash G:691 LG pal.b[3350] c:=get4(s_cd,c,...,ll_dash)
ll_e G:692 DEF palhdr.h[817] ll_e=
ll_e G:692 LAB pal.b[2715] ll_e:arg1:=e
ll_e G:692 LG pal.b[3513] ll:=ll_e
ll_e G:692 LLG pal.b[8146] d(@ll_e,"E   ")
ll_ent2 G:725 DEF palhdr.h[852] ll_ent2=
ll_ent2 G:725 LAB pal.b[2583] ll_ent2:LET ..; ..
ll_entx G:660 DEF palhdr.h[782] ll_entx=
ll_entx G:660 LAB pal.b[2024] ll_entx:e:=bind(h3!c,arg1,h2!c)
ll_entx G:660 LG pal.b[3408] l:=ll_entx
ll_entx G:660 LLG pal.b[8107] d(@ll_entx,"KEX ")
ll_enty G:661 DEF palhdr.h[783] ll_enty=
ll_enty G:661 LAB pal.b[2030] ll_enty:e:=h2!c
ll_enty G:661 LG pal.b[3397] c,v,ll:=h1!v,h2!v,ll_enty
ll_enty G:661 LG pal.b[3687] h1!l,h2!l,h3!l:=h1!v,h2!v,ll_enty
ll_enty G:661 LLG pal.b[8108] d(@ll_enty,"KEY ")
ll_entz G:662 DEF palhdr.h[784] ll_entz=
ll_entz G:662 LAB pal.b[2036] ll_entz:e:=get4(s_e,ze,arg1,...)
ll_entz G:662 LG pal.b[3157] a1,a2:=a2,ll_entz
ll_entz G:662 LG pal.b[3386] c,v,ll:=h1!v,h2!v,ll_entz
ll_entz G:662 LG pal.b[3674] h1!l,h2!l,h3!l:=h1!v,h2!v,ll_entz
ll_entz G:662 LLG pal.b[8109] d(@ll_entz,"KEZ ")
ll_ev G:667 DEF palhdr.h[790] ll_ev=
ll_ev G:667 LAB pal.b[1706] ll_ev:cycles:=cycles+1
ll_ex G:668 DEF palhdr.h[791] ll_ex=
ll_ex G:668 LAB pal.b[1941] ll_ex:c:=gw2
ll_ex G:668 LG pal.b[6282] longjump(flevel(eval),ll_ex)
ll_ex G:668 LG pal.b[7307] longjump(flevel(eval),ll_ex)
ll_ex G:668 LG pal.b[7329] longjump(flevel(eval),ll_ex)
ll_glz G:670 DEF palhdr.h[793] ll_glz=
ll_glz G:670 LAB pal.b[2411] ll_glz:msg1(41)
ll_glz G:670 LG pal.b[3282] c:=get4(s_cd,c,...,ll_glz)
ll_glz G:670 LG pal.b[3669] TEST l3=ll_glz THEN .. ELSE ..
ll_hdv G:703 DEF palhdr.h[829] ll_hdv=
ll_hdv G:703 LAB pal.b[2601] ll_hdv:IF arg1>=yloc DO ..
ll_hdv G:703 LG pal.b[3468] ll:=ll_hdv
ll_hdv G:703 LLG pal.b[8155] d(@ll_hdv,"HD  ")
ll_j G:693 DEF palhdr.h[818] ll_j=
ll_j G:693 LAB pal.b[2719] ll_j:IF m>=s_mz DO ..
ll_j G:693 LG pal.b[3515] ll:=ll_j
ll_j G:693 LLG pal.b[8147] d(@ll_j,"J   ")
ll_lv G:716 DEF palhdr.h[843] ll_lv=
ll_lv G:716 LAB pal.b[2528] ll_lv:UNLESS arg1>=yloc DO ..
ll_lv G:716 LG pal.b[3625] ll:=ll_lv
ll_lv G:716 LLG pal.b[8124] d(@ll_lv,"BVLV")
ll_miv G:704 DEF palhdr.h[830] ll_miv=
ll_miv G:704 LAB pal.b[2610] ll_miv:IF arg1>=yloc DO ..
ll_miv G:704 LG pal.b[3472] ll:=ll_miv
ll_miv G:704 LLG pal.b[8156] d(@ll_miv,"MI  ")
ll_na G:681 DEF palhdr.h[805] ll_na=
ll_na G:681 LAB pal.b[2424] ll_na:arg1:=h1!h1!e
ll_na G:681 LG pal.b[3301] ll:=ll_na
ll_na G:681 LG pal.b[3554] IF n=y1&...=ll_na1|n=y2&...=ll_na2|n=h2!c&h3!c=ll_na DO ..
ll_na G:681 LLG pal.b[8136] d(@ll_na,"N   ")
ll_na1 G:682 DEF palhdr.h[806] ll_na1=
ll_na1 G:682 LAB pal.b[2431] ll_na1:arg1:=h2!e
ll_na1 G:682 LG pal.b[3293] ll:=ll_na1
ll_na1 G:682 LG pal.b[3554] IF n=y1&...=ll_na1|n=y2&...=ll_na2|n=h2!c&h3!c=ll_na DO ..
ll_na1 G:682 LLG pal.b[8137] d(@ll_na1,"N1  ")
ll_na1f G:685 DEF palhdr.h[809] ll_na1f=
ll_na1f G:685 LAB pal.b[2449] ll_na1f:f:=get4(s_mmcf,f,...)+yfj
ll_na1f G:685 LG pal.b[3292] ll:=ll_na1f
ll_na1f G:685 LG pal.b[3556] IF n=y1&...=ll_na1f|n=y2&...=ll_na2f|n=h2!c&h3!c=ll_naf DO ..
ll_na1f G:685 LLG pal.b[8140] a(@ll_na1f,"NF1 ")
ll_na2 G:683 DEF palhdr.h[807] ll_na2=
ll_na2 G:683 LAB pal.b[2436] ll_na2:arg1:=h2!h1!e
ll_na2 G:683 LG pal.b[3297] ll:=ll_na2
ll_na2 G:683 LG pal.b[3554] IF n=y1&...=ll_na1|n=y2&...=ll_na2|n=h2!c&h3!c=ll_na DO ..
ll_na2 G:683 LLG pal.b[8138] d(@ll_na2,"N2  ")
ll_na2f G:686 DEF palhdr.h[810] ll_na2f=
ll_na2f G:686 LAB pal.b[2454] ll_na2f:f:=get4(s_mmcf,f,...)+yfj
ll_na2f G:686 LG pal.b[3296] ll:=ll_na2f
ll_na2f G:686 LG pal.b[3556] IF n=y1&...=ll_na1f|n=y2&...=ll_na2f|n=h2!c&h3!c=ll_naf DO ..
ll_na2f G:686 LLG pal.b[8141] a(@ll_na2f,"NF2 ")
ll_naf G:684 DEF palhdr.h[808] ll_naf=
ll_naf G:684 LAB pal.b[2441] ll_naf:arg1:=h1!h1!e
ll_naf G:684 LG pal.b[3300] ll:=ll_naf
ll_naf G:684 LG pal.b[3556] IF n=y1&...=ll_na1f|n=y2&...=ll_na2f|n=h2!c&h3!c=ll_naf DO ..
ll_naf G:684 LLG pal.b[8139] a(@ll_naf,"NF  ")
ll_null G:706 DEF palhdr.h[832] ll_null=
ll_null G:706 LAB pal.b[2628] ll_null:IF arg1>=yloc DO ..
ll_null G:706 LG pal.b[3476] ll:=ll_null
ll_null G:706 LLG pal.b[8158] d(@ll_null,"NULL")
ll_rec0 G:689 DEF palhdr.h[814] ll_rec0=
ll_rec0 G:689 LAB pal.b[2727] ll_rec0:e:=get4(s_e,e,zsy,...)
ll_rec0 G:689 LG pal.b[3345] ll:=ll_rec0
ll_rec0 G:689 LLG pal.b[8144] a(@ll_rec0,"REC0")
ll_rec1 G:690 DEF palhdr.h[815] ll_rec1=
ll_rec1 G:690 LAB pal.b[2732] ll_rec1:arg1:=(h2!c)(arg1,h3!e)
ll_rec1 G:690 LG pal.b[3342] c:=get4(s_cd,c,...,ll_rec1)
ll_rec1 G:690 LLG pal.b[8145] d(@ll_rec1,"REC1")
ll_rsc G:671 DEF palhdr.h[794] ll_rsc=
ll_rsc G:671 LAB pal.b[1962] ll_rsc:CASE s_mcc:.. 
ll_rsc G:671 LG pal.b[3357] c:=get4(s_cd,c,z,ll_rsc)
ll_rsc G:671 LLG pal.b[8115] a(@ll_rsc,"QC  ")
ll_rsf G:672 DEF palhdr.h[795] ll_rsf=
ll_rsf G:672 LAB pal.b[1970] ll_rsf:CASE s_mcf:.. 
ll_rsf G:672 LLG pal.b[8116] a(@ll_rsf,"QF  ")
ll_rv G:717 DEF palhdr.h[844] ll_rv=
ll_rv G:717 LAB pal.b[2532] ll_rv:IF arg1>=yloc DO ..
ll_rv G:717 LG pal.b[3627] ll:=ll_rv
ll_rv G:717 LLG pal.b[8125] d(@ll_rv,"BVRV")
ll_rx G:457 DEF palhdr.h[554] ll_rx=
ll_rx G:457 LAB pal.b[9482] ll_rx:LET ..; ..
ll_rx G:457 LG pal.b[9475] GOTO ll_rx
ll_st G:687 DEF palhdr.h[811] ll_st=
ll_st G:687 LAB pal.b[2460] ll_st:f:=get4(s_mmcf,f,...)+yfj
ll_st G:687 LG pal.b[3335] c:=get4(s_cd,c,z,ll_st)
ll_st G:687 LG pal.b[3341] c:=get4(s_cd,c,z,ll_st)
ll_st G:687 LG pal.b[3349] c:=get4(s_cd,c,z,ll_st)
ll_st G:687 LG pal.b[3356] c:=get4(s_cd,c,z,ll_st)
ll_st G:687 LG pal.b[3459] c:=get4(s_cd,c,z,ll_st)
ll_st G:687 LG pal.b[3465] c:=get4(s_cd,c,z,ll_st)
ll_st G:687 LG pal.b[3517] c:=get4(s_cd,c,z,ll_st)
ll_st G:687 LG pal.b[3558] RESULTIS get4(s_cd,c,z,ll_st)
ll_st G:687 LLG pal.b[8142] a(@ll_st,"S   ")
ll_svc G:673 DEF palhdr.h[796] ll_svc=
ll_svc G:673 LAB pal.b[2863] ll_svc:j,m:=get4(m,...)+yfj,s_mmcc
ll_svc G:673 LG pal.b[3363] c:=get4(s_cd,c,z,ll_svc)
ll_svc G:673 LLG pal.b[8117] a(@ll_svc,"SVC ")
ll_svf G:674 DEF palhdr.h[797] ll_svf=
ll_svf G:674 LAB pal.b[2867] ll_svf:TEST f<yfj THEN .. ELSE ..
ll_svf G:674 LLG pal.b[8118] a(@ll_svf,"SVF ")
ll_svf1 G:675 DEF palhdr.h[798] ll_svf1=
ll_svf1 G:675 LAB pal.b[2871] ll_svf1:h3!f:=h2!c
ll_svf1 G:675 LLG pal.b[8119] a(@ll_svf1,"SVF1")
ll_sy G:456 DEF palhdr.h[553] ll_sy=
ll_sy G:456 LAB pal.b[9210] ll_sy:e:=e1
ll_sy G:456 LG pal.b[9224] longjump(flevel(rp),ll_sy)
ll_tlv G:705 DEF palhdr.h[831] ll_tlv=
ll_tlv G:705 LAB pal.b[2619] ll_tlv:IF arg1>=yloc DO ..
ll_tlv G:705 LG pal.b[3470] ll:=ll_tlv
ll_tlv G:705 LLG pal.b[8157] d(@ll_tlv,"TL  ")
ll_tup G:695 DEF palhdr.h[821] ll_tup=
ll_tup G:695 LAB pal.b[2472] ll_tup:gw0:=get4(s_tuple,h2!f,arg1,...)
ll_tup G:695 LG pal.b[3312] h3!a,ll_tup
ll_tup G:695 LG pal.b[3323] n,l,t:=n-1,ll_tup,h1!t
ll_tup G:695 LLG pal.b[8149] a(@ll_tup,"AUG ")
ll_tupa G:696 DEF palhdr.h[822] ll_tupa=
ll_tupa G:696 LAB pal.b[2480] ll_tupa:gw0:=get4(s_tuple,z,arg1,y1)
ll_tupa G:696 LG pal.b[3315] l:=ll_tupa
ll_tupa G:696 LG pal.b[3324] l:=ll_tupa
ll_tupa G:696 LLG pal.b[8150] a(@ll_tupa,"AUGA")
ll_tupz G:697 DEF palhdr.h[823] ll_tupz=
ll_tupz G:697 LAB pal.b[2486] ll_tupz:TEST f<yfj THEN .. ELSE ..
ll_tupz G:697 LG pal.b[3319] l:=ll_tupz
ll_tupz G:697 LLG pal.b[8151] d(@ll_tupz,"AUGZ")
ll_unbind G:678 DEF palhdr.h[802] ll_unbind=
ll_unbind G:678 LAB pal.b[2521] ll_unbind:FOR i=y1 TO h2!c DO..
ll_unbind G:678 LLG pal.b[8133] a(@ll_unbind,"UBV ")
ll_us G:688 DEF palhdr.h[812] ll_us=
ll_us G:688 LAB pal.b[2464] ll_us:IF f>=yfj DO ..
ll_us G:688 LLG pal.b[8143] d(@ll_us,"F   ")
ll_xcons G:714 DEF palhdr.h[840] ll_xcons=
ll_xcons G:714 LAB pal.b[2668] ll_xcons:LET ..; ..
ll_xcons G:714 LG pal.b[3498] ll:=ll_xcons
ll_xcons G:714 LLG pal.b[8166] d(@ll_xcons,"XAU ")
ll_xconsf G:715 DEF palhdr.h[841] ll_xconsf=
ll_xconsf G:715 LAB pal.b[2690] ll_xconsf:LET ..; ..
ll_xconsf G:715 LG pal.b[3495] ll:=ll_xconsf
ll_xconsf G:715 LLG pal.b[8167] a(@ll_xconsf,"XAUF")
ll_zc G:650 DEF palhdr.h[771] ll_zc=
ll_zc G:650 LAB pal.b[1949] ll_zc:SWITCHON m INTO..
ll_zc G:650 LG pal.b[5867] IF a3=ll_zc DO ..
ll_zc G:650 LG pal.b[8217] zc:=get4(s_cd,z,z,ll_zc)
ll_zc G:650 LLG pal.b[5873] FOR i=@ll_zc TO @ll_zc+ocmsz DO..
ll_zc G:650 LLG pal.b[5875] s0:=i-@ll_zc+ocm
ll_zc G:650 LLG pal.b[8089] n:=n-@ll_zc+ocm
ll_zc G:650 LLG pal.b[8096] d(@ll_zc+i,"NNN ")
ll_zc G:650 LLG pal.b[8097] d(@ll_zc,"Q   ")
lmap G:505 DEF palhdr.h[608] lmap=
lmap G:505 FN pal.b[6475] LET lmap(f,a)=..
lmap G:505 LG pal.b[3142] lmap(flatten,a)
lmap G:505 LG pal.b[7295] lmap(untrace,a)
lmapl G:506 DEF palhdr.h[609] lmapl=
lmapl G:506 FN pal.b[6482] LET lmapl(f,a)=..
lmapl G:506 LG pal.b[7531] RESULTIS lmapl(alg,n)
lmapt G:507 DEF palhdr.h[610] lmapt=
lmapt G:507 FN pal.b[6491] LET lmapt(f,n)=..
lmapt G:507 LG pal.b[7130] w:=lmapt(w,h3!v)
lmapt G:507 LG pal.b[7181] w:=lmapt(w,h3!v)
load G:209 DEF palhdr.h[264] load=
load G:209 LG pal.b[9152] load(s1,s2)
load G:209 RT pal.b[45] LET load(s1,s2)BE..
loadfort G:207 DEF palhdr.h[262] loadfort=
loadn G:639 DEF palhdr.h[758] loadn=
loadn G:639 FN pal.b[3551] LET loadn(c,n,m)=..
loadn G:639 LG pal.b[3158] c:=loadn(c,y1,0)
loadn G:639 LG pal.b[3303] c:=loadn(c,n,0)
loadn G:639 LG pal.b[3555] RESULTIS loadn(h1!c,n,m)
loadn G:639 LG pal.b[3557] c:=loadn(h1!c,n,m)
loadn G:639 LG pal.b[3562] loadn(h1!c,n,m)
loadn G:639 LG pal.b[3563] loadn(h2!c,n,m)
loadn G:639 LG pal.b[3567] loadn(h1!c,n,m-1)
loadn G:639 LG pal.b[3601] c:=loadn(c,y1,0)
loadn G:639 LG pal.b[3628] c:=loadn(c,y1,0)
loadn G:639 LG pal.b[3632] c:=loadn(c,y1,0)
loadpage G:254 DEF palhdr.h[322] loadpage=
loadpoint G:237 DEF palhdr.h[304] loadpoint=
loadpoint G:237 LG pal.b[1145] IF ...=...&...=...&(...>>24)=11&(p!7>>24)<=8 DO ..
loadpoint G:237 LG pal.b[1187] mapseg(0,loadpoint,endpoint)
loadpoint G:237 LG pal.b[8074] region:=(stackend+pagesize&pagemask)-(loadpoint&pagemask)
loadpoint G:237 LG pal.b[8078] writef("# Ver'f region",loadpoint+4,...,...)
loadpoint G:237 LG pal.b[8919] endpoint:=loadpoint+rootnode!rtn_memsize
loadpoint G:237 LG pal.b[983] IF (loadpoint&pagemask)<=p&p<=stackbase DO ..
loadpoint G:237 SG pal.b[8918] loadpoint:=rootnode!rtn_membase
loadseg G:105 DEF libhdr.h[121] loadseg=105
locatedir G:80 DEF libhdr.h[95] locatedir=80
locateobj G:81 DEF libhdr.h[96] locateobj=81
longadd G:613 DEF palhdr.h[728] longadd=
longadd G:613 FN pal.b[3832] LET longadd(a,b)=..
longadd G:613 LG pal.b[201] RESULTIS longadd(a,b)
longadd G:613 LG pal.b[91] RESULTIS longadd(a,b)
longas1 G:615 DEF palhdr.h[730] longas1=
longas1 G:615 FN pal.b[3940] LET longas1(a,n,f)=..
longas1 G:615 LG pal.b[104] a:=longas1(a,h2!b,TRUE)
longas1 G:615 LG pal.b[112] a:=longas1(a,h2!b,TRUE)
longas1 G:615 LG pal.b[199] RESULTIS longas1(a,b,FALSE)
longas1 G:615 LG pal.b[200] RESULTIS longas1(bXORysg,a,TRUE)
longas1 G:615 LG pal.b[218] b:=longas1(bXORysg,h2!a,TRUE)
longas1 G:615 LG pal.b[227] a:=longas1(a,h2!b,FALSE)
longas1 G:615 LG pal.b[235] b:=longas1(b,h2!a,TRUE)
longas1 G:615 LG pal.b[239] a:=longas1(a,h2!b,FALSE)
longas1 G:615 LG pal.b[90] RESULTIS longas1(b,a,TRUE)
longcmp G:618 DEF palhdr.h[733] longcmp=
longcmp G:618 FN pal.b[3802] LET longcmp(a,b)=..
longcmp G:618 LG pal.b[202] longcmp(a,b)
longcmp G:618 LG pal.b[7431] longcmp(p,q)
longcmp G:618 LG pal.b[92] longcmp(a,b)
longdiv G:620 DEF palhdr.h[735] longdiv=
longdiv G:620 FN pal.b[4200] LET longdiv(a,b)=..
longdiv G:620 LG pal.b[4927] longdiv(a,b)
longdiv G:620 LG pal.b[5206] longdiv(a,b)
longdiv G:620 LG pal.b[7050] longdiv,h1!p
longdiv1 G:619 DEF palhdr.h[734] longdiv1=
longdiv1 G:619 FN pal.b[4157] LET longdiv1(a,n)=..
longdiv1 G:619 LG pal.b[129] a:=longdiv1(a,ga1+y0)
longdiv1 G:619 LG pal.b[256] a:=longdiv1(a,ga1+y0)
longdiv1 G:619 LG pal.b[4779] a:=longdiv1(a,ga1+y0)
longdiv1 G:619 LG pal.b[4890] ga1:=longdiv1(a,b)
longdiv1 G:619 LG pal.b[4898] a:=longdiv1(a,ga1+y0)
longdiv1 G:619 LG pal.b[4917] b:=longdiv1(b,ga1+y0)
longdiv1 G:619 LG pal.b[4992] b:=longdiv1(b,ga1+y0)
longdiv1 G:619 LG pal.b[5010] a:=longdiv1(a,ga1+y0)
longdiv1 G:619 LG pal.b[5195] longdiv1(a,b)
longdiv1 G:619 LG pal.b[7052] f:=longdiv1
longdiv1 G:619 LG pal.b[7098] longdiv1(a,n)
longjump G:16 DEF libhdr.h[31] longjump=16
longjump G:16 DEF palhdr.h[19] longjump=16
longjump G:16 LG pal.b[1599] longjump(erlev,erlab)
longjump G:16 LG pal.b[3109] longjump(flevel(flatten),l_flatten)
longjump G:16 LG pal.b[5361] longjump(flevel(verify),l0)
longjump G:16 LG pal.b[6282] longjump(flevel(eval),ll_ex)
longjump G:16 LG pal.b[7307] longjump(flevel(eval),ll_ex)
longjump G:16 LG pal.b[7329] longjump(flevel(eval),ll_ex)
longjump G:16 LG pal.b[9224] longjump(flevel(rp),ll_sy)
longmul G:616 DEF palhdr.h[731] longmul=
longmul G:616 FN pal.b[4061] LET longmul(a,b)=..
longmul G:616 LG pal.b[4755] RESULTIS longmul(a,b)
longmul1 G:617 DEF palhdr.h[732] longmul1=
longmul1 G:617 FN pal.b[4026] LET longmul1(a,n)=..
longmul1 G:617 LG pal.b[111] a:=longmul1(a,h1!b)
longmul1 G:617 LG pal.b[234] b:=longmul1(bXORysg,h1!a)
longmul1 G:617 LG pal.b[238] a:=longmul1(a,h1!b)
longmul1 G:617 LG pal.b[4754] RESULTIS longmul1(b,a)
longmul1 G:617 LG pal.b[4776] a:=longmul1(a,h2!b)
longmul1 G:617 LG pal.b[4782] a:=longmul1(a,h2!b)
longmul1 G:617 LG pal.b[4988] b:=longmul1(b,gw1)
longmul1 G:617 LG pal.b[4995] b:=longmul1(b,h1!a)
longmul1 G:617 LG pal.b[5006] a:=longmul1(a,gw1)
longmul1 G:617 LG pal.b[5013] a:=longmul1(a,h1!b)
longsub G:614 DEF palhdr.h[729] longsub=
longsub G:614 FN pal.b[3877] LET longsub(a,b)=..
longsub G:614 LG pal.b[210] RESULTIS longsub(a,b)
longsub G:614 LG pal.b[96] RESULTIS longsub(a,b)
lookup G:621 DEF palhdr.h[737] lookup=
lookup G:621 FN pal.b[7110] LET lookup(a)=..
lookup G:621 LG pal.b[7269] a:=lookup(a)
lookup G:621 LG pal.b[9013] fff!i:=lookup
lprio S:2 DEF pal.b[9189] lprio=0
lprio S:2 LL pal.b[9619] IF n>=lprio DO ..
lprio S:2 LL pal.b[9632] IF n>=lprio DO ..
lprio S:2 SL pal.b[9361] lprio,rprio,sym:=getbyte(s1,13)+y0,getbyte(...)+y0,getbyte(s1,15)
lprio S:2 SL pal.b[9379] lprio,rprio,sym:=11+y0,11+y0,s_diadop
ls_er F:72 LAB pal.b[2409] ls_er:msg1(40,c,f)
ls_er F:72 LF pal.b[2675] GOTO ls_er
ls_er F:72 LF pal.b[2681] GOTO ls_er
ls_er F:72 LF pal.b[2696] GOTO ls_er
ls_er F:72 LF pal.b[2705] GOTO ls_er
lvv G:496 DEF palhdr.h[598] lvv=
lvv G:496 FN pal.b[6427] LET lvv(p)=..
lvv G:496 LG pal.b[9849] get4(s_aa,0,a,lvv)
lvv G:496 LLG pal.b[8233] typ!s_loc:=set_d("LV",@lvv)
lwc M:-1077952577 DEF pal.b[9289] lwc=~#x40404040
lwc M:-1077952577 MAN pal.b[9294] h2!s0,h3!s0:=k2&lwc,k3&lwc
lx F:111 LAB pal.b[8762] lx:!a:=t2
lx F:111 LF pal.b[8743] GOTO lx
lx F:111 LF pal.b[8745] GOTO lx
lx F:111 LF pal.b[8751] GOTO lx
lx F:111 LF pal.b[8753] GOTO lx
lx F:144 LAB pal.b[8838] lx:h1!a:=t2
lx F:144 LF pal.b[8826] GOTO lx
lx F:144 LF pal.b[8828] GOTO lx
lx F:163 LAB pal.b[8891] lx:h1!a:=(b&p_addr)+a1t
lx F:163 LF pal.b[8863] GOTO lx
lx F:163 LF pal.b[8865] GOTO lx
lx F:163 LF pal.b[8871] GOTO lx
lx F:163 LF pal.b[8873] GOTO lx
lx F:163 LF pal.b[8879] GOTO lx
lx F:163 LF pal.b[8881] GOTO lx
lx F:25 LAB pal.b[7328] lx:gw0,gw1,gw2:=dotrap1,b,a
lx F:25 LF pal.b[7324] GOTO lx
lx F:78 LAB pal.b[8630] lx:a:=a0
lx F:78 LF pal.b[8605] GOTO lx
lx F:78 LF pal.b[8611] GOTO lx
lx F:78 LF pal.b[8618] GOTO lx
m G:428 DEF palhdr.h[521] m=
m G:428 LG pal.b[1700] z,-m,e,j
m G:428 LG pal.b[1746] IF m>=s_mz DO ..
m G:428 LG pal.b[1747] m:=m-jgap
m G:428 LG pal.b[1762] f,m,c:=get4(m,...)+yfj,s_mmf2r,h1!c
m G:428 LG pal.b[1772] f,m,c:=get4(m,...)+yfj,s_mms,h1!c
m G:428 LG pal.b[1784] f,m,c:=get4(m,...)+yfj,s_mmal,h1!c
m G:428 LG pal.b[1796] f,m,c:=get4(m,...)+yfj,s_mma1,h2!c
m G:428 LG pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[1810] f,m,c:=get4(m,...)+yfj,s_mmf1,h2!c
m G:428 LG pal.b[1814] f,m,c:=get4(m,...)+yfj,s_mmf1a,h2!c
m G:428 LG pal.b[1818] f,m,c:=get4(m,...)+yfj,s_mma2l,h2!h1!c1
m G:428 LG pal.b[1822] f,m,c:=get4(m,...)+yfj,s_mmf2l,h2!h1!c1
m G:428 LG pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[1874] f,m,c:=get4(m,...)+yfj,s_mmaa,h2!c
m G:428 LG pal.b[1876] f,m,c:=get4(m,...)+yfj,s_mmt,h2!c
m G:428 LG pal.b[1879] f,m,c:=get4(m,...)+yfj,s_mmaq,h2!c
m G:428 LG pal.b[1897] f,m,c:=get4(m,...)+yfj,s_mmcond,h1!c
m G:428 LG pal.b[1909] f,m,c:=get4(m,...)+yfj,s_mmlet,h3!c
m G:428 LG pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
m G:428 LG pal.b[1942] f,m:=get4(m,...)+yfj,s_mmf2r
m G:428 LG pal.b[1949] SWITCHON m INTO..
m G:428 LG pal.b[1992] msg1(30,m)
m G:428 LG pal.b[1997] m:=m+1
m G:428 LG pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2108] f,m:=get4(m,...)+yfj,s_mmal
m G:428 LG pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 LG pal.b[2719] IF m>=s_mz DO ..
m G:428 LG pal.b[2720] m:=m-jgap
m G:428 LG pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 LG pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
m G:428 LG pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 LG pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 LG pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
m G:428 LG pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 LG pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 LG pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
m G:428 LG pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 LG pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 LG pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
m G:428 LG pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 LG pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 LG pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 LG pal.b[3751] -m,e,j
m G:428 LG pal.b[3763] -m,e,j
m G:428 SG pal.b[1701] j,m:=zj,s_j
m G:428 SG pal.b[1747] m:=m-jgap
m G:428 SG pal.b[1762] f,m,c:=get4(m,...)+yfj,s_mmf2r,h1!c
m G:428 SG pal.b[1772] f,m,c:=get4(m,...)+yfj,s_mms,h1!c
m G:428 SG pal.b[1784] f,m,c:=get4(m,...)+yfj,s_mmal,h1!c
m G:428 SG pal.b[1796] f,m,c:=get4(m,...)+yfj,s_mma1,h2!c
m G:428 SG pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[1810] f,m,c:=get4(m,...)+yfj,s_mmf1,h2!c
m G:428 SG pal.b[1814] f,m,c:=get4(m,...)+yfj,s_mmf1a,h2!c
m G:428 SG pal.b[1818] f,m,c:=get4(m,...)+yfj,s_mma2l,h2!h1!c1
m G:428 SG pal.b[1822] f,m,c:=get4(m,...)+yfj,s_mmf2l,h2!h1!c1
m G:428 SG pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[1874] f,m,c:=get4(m,...)+yfj,s_mmaa,h2!c
m G:428 SG pal.b[1876] f,m,c:=get4(m,...)+yfj,s_mmt,h2!c
m G:428 SG pal.b[1879] f,m,c:=get4(m,...)+yfj,s_mmaq,h2!c
m G:428 SG pal.b[1892] m:=s_j
m G:428 SG pal.b[1893] m:=s_z
m G:428 SG pal.b[1894] m:=s_mz
m G:428 SG pal.b[1897] f,m,c:=get4(m,...)+yfj,s_mmcond,h1!c
m G:428 SG pal.b[1909] f,m,c:=get4(m,...)+yfj,s_mmlet,h3!c
m G:428 SG pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
m G:428 SG pal.b[1942] f,m:=get4(m,...)+yfj,s_mmf2r
m G:428 SG pal.b[1951] m,e,j:=-p1,p2,p3
m G:428 SG pal.b[1954] m:=!j
m G:428 SG pal.b[1957] m:=!j
m G:428 SG pal.b[1962] m:=!j
m G:428 SG pal.b[1965] m:=!j
m G:428 SG pal.b[1970] m:=!j
m G:428 SG pal.b[1973] m:=!j
m G:428 SG pal.b[1979] m:=!j
m G:428 SG pal.b[1985] m:=!j
m G:428 SG pal.b[1997] m:=m+1
m G:428 SG pal.b[2000] m:=!f
m G:428 SG pal.b[2003] m:=!f
m G:428 SG pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2108] f,m:=get4(m,...)+yfj,s_mmal
m G:428 SG pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2234] m:=s_j
m G:428 SG pal.b[2235] m:=s_z
m G:428 SG pal.b[2242] m:=s_j
m G:428 SG pal.b[2243] m:=s_z
m G:428 SG pal.b[2248] m:=!f
m G:428 SG pal.b[2251] m:=!f
m G:428 SG pal.b[2263] m:=!f
m G:428 SG pal.b[2268] m,c:=s_mmt,h2!c
m G:428 SG pal.b[2277] m:=!f
m G:428 SG pal.b[2281] m,c:=s_mmt,h2!c
m G:428 SG pal.b[2284] m:=!f
m G:428 SG pal.b[2287] m:=!f
m G:428 SG pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2297] m:=!f
m G:428 SG pal.b[2300] m:=!f
m G:428 SG pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2312] m:=!f
m G:428 SG pal.b[2317] m:=!f
m G:428 SG pal.b[2327] m:=s_mma2r
m G:428 SG pal.b[2332] m:=s_mma2r
m G:428 SG pal.b[2335] m:=!f
m G:428 SG pal.b[2338] m:=!f
m G:428 SG pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2354] m:=s_mmf2r
m G:428 SG pal.b[2359] m:=s_mmf2r
m G:428 SG pal.b[2362] m:=!f
m G:428 SG pal.b[2365] m:=!f
m G:428 SG pal.b[2372] m:=!f
m G:428 SG pal.b[2375] m:=!f
m G:428 SG pal.b[2382] m:=!f
m G:428 SG pal.b[2385] m:=!f
m G:428 SG pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
m G:428 SG pal.b[2396] m:=!f
m G:428 SG pal.b[2399] m:=!f
m G:428 SG pal.b[2720] m:=m-jgap
m G:428 SG pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 SG pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
m G:428 SG pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 SG pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 SG pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
m G:428 SG pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 SG pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 SG pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
m G:428 SG pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 SG pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 SG pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
m G:428 SG pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 SG pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
m G:428 SG pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
m G:428 SG pal.b[3752] j,m:=zj,s_j
m G:428 SG pal.b[3769] m,e,j:=-p1,p2,p3
m G:428 SG pal.b[8208] m:=s_j
m S:92 DEF pal.b[6834] m=0
m S:92 LL pal.b[6846] m:=m*10+!c0-48
m S:92 LL pal.b[6848] RESULTIS m+y0
m S:92 LL pal.b[6849] v:=getx(s_numj,z,n,m)
m S:92 LL pal.b[6857] m:=m*10+!c0-48
m S:92 LL pal.b[6858] v:=getx(s_numj,v,n,m)
m S:92 SL pal.b[6842] n,m:=0,0
m S:92 SL pal.b[6846] m:=m*10+!c0-48
m S:92 SL pal.b[6851] n,m:=0,0
m S:92 SL pal.b[6857] m:=m*10+!c0-48
m1 F:148 LAB pal.b[9584] m1:rsym(FALSE)
m1 F:148 LF pal.b[9574] GOTO m1
m2 F:189 LAB pal.b[9666] m2:rsym(FALSE)
m2 F:189 LF pal.b[9643] GOTO m2
m2 F:189 LF pal.b[9656] GOTO m2
m3 F:188 LAB pal.b[9667] m3:e:=ap1(e,e2)
m3 F:188 LF pal.b[9651] GOTO m3
ma2 G:590 DEF palhdr.h[700] ma2=
ma2 G:590 FN pal.b[9975] LET ma2(a,b,f)=..
ma2 G:590 LG pal.b[9378] mfn:=ma2
mainvar G:535 DEF palhdr.h[641] mainvar=
mainvar G:535 FN pal.b[6787] LET mainvar(a)=..
mainvar G:535 LG pal.b[6788] msg1(16,mainvar,a)
mainvar G:535 LLG pal.b[8339] set_v("MAINVAR",@mainvar)
mapgvec G:307 DEF palhdr.h[379] mapgvec=
mapgvec G:307 LG pal.b[1186] mapgvec()
mapgvec G:307 RT pal.b[1194] LET mapgvec()BE..
mapheap G:350 DEF palhdr.h[429] mapheap=
mapheap G:350 LG pal.b[5350] mapheap(FALSE)
mapheap G:350 RT pal.b[5368] LET mapheap(f)BE..
mapload G:309 DEF palhdr.h[381] mapload=
mapload G:309 LG pal.b[1188] mapload(0)
mapload G:309 RT pal.b[1163] LET mapload(s)BE..
mapseg G:308 DEF palhdr.h[380] mapseg=
mapseg G:308 LG pal.b[1168] mapseg(0,...>>2,...>>2)
mapseg G:308 LG pal.b[1187] mapseg(0,loadpoint,endpoint)
mapseg G:308 RT pal.b[1133] LET mapseg(s,p1,p2)BE..
mapstore G:260 DEF palhdr.h[328] mapstore=
mapstore G:260 LG pal.b[1084] mapstore()
mapstore G:260 LG pal.b[1604] mapstore()
mapstore G:260 LG pal.b[5388] mapstore()
mapstore G:260 RT pal.b[1132] LET mapstore()BE..
marka G:329 DEF palhdr.h[403] marka=
marka G:329 LG pal.b[4316] marka(!i)
marka G:329 LG pal.b[4324] marka(!i)
marka G:329 LG pal.b[4414] marka(!i)
marka G:329 LG pal.b[4418] marka(!i)
marka G:329 RT pal.b[4483] LET marka(p)BE..
matchbv G:566 DEF palhdr.h[676] matchbv=
matchbv G:566 FN pal.b[9858] LET matchbv(c,d,f)=..
matchbv G:566 LG pal.b[3360] TEST fbv(h2!a)&matchbv(h2!a,...,FALSE) THEN .. ELSE ..
matchbv G:566 LG pal.b[3395] IF matchbv(h3!v,h2!a,FALSE) DO ..
matchbv G:566 LG pal.b[3418] TEST matchbv(h2!v,h2!a,FALSE) THEN .. ELSE ..
matchbv G:566 LG pal.b[9877] UNLESS matchbv(h2!c,h2!d,f) DO ..
matchbv G:566 LG pal.b[9911] TEST matchbv(h3!v,b,TRUE) THEN .. ELSE ..
maxglob M:896 DEF palhdr.h[889] maxglob=896
maxglob M:896 MAN pal.b[8081] FOR i=@error TO @g0+maxglob DO..
maxint M:2147483647 DEF libhdr.h[164] maxint=minint-1
maxint M:2147483647 DEF palhdr.h[40] maxint=-1>>1
maxint M:2147483647 MAN pal.b[3237] result2:=gseqf&maxint
maxint M:2147483647 MAN pal.b[6866] c1:=maxint
maxint M:2147483647 MAN pal.b[9420] s2:=maxint
maxint M:2147483647 MAN palhdr.h[41] signbit=~maxint
mcaddrinc M:4 DEF libhdr.h[162] mcaddrinc=bytesperword
mclos1 G:589 DEF palhdr.h[699] mclos1=
mclos1 G:589 FN pal.b[10011] LET mclos1(e,v,f)=..
mclos1 G:589 LG pal.b[361] RESULTIS mclos1(e,v,f)
mclos1 G:589 LG pal.b[9787] mclos1(ze,a,b)
mcolon G:574 DEF palhdr.h[684] mcolon=
mcolon G:574 FN pal.b[10154] LET mcolon(a,b)=..
mcolon G:574 LG pal.b[10295] RESULTIS mcolon(h1!a,e)
mcolon G:574 LLG pal.b[8266] typ!s_colon:=du(":",s_code2,...,s_colon)
mcond G:578 DEF palhdr.h[688] mcond=
mcond G:578 FN pal.b[10181] LET mcond(a,b,c)=..
mcond G:578 LG pal.b[10031] mcond(a,TRUE,b)
mcond G:578 LG pal.b[10034] mcond(a,b,FALSE)
mcond G:578 LG pal.b[10301] RESULTIS mcond(a,e,f)
mcond G:578 LLG pal.b[8261] typ!s_cond:=du("->",s_code3,...,s_cond)
mdash G:587 DEF palhdr.h[697] mdash=
mdash G:587 FN pal.b[9829] LET mdash(a)=..
mdash G:587 LG pal.b[1428] mdash(h2!p)
mdash G:587 LG pal.b[9639] e:=mdash(e)
mdash G:587 LG pal.b[9745] d:=mdash(d)
mdash G:587 LLG pal.b[8267] typ!s_dash:=set_v("DF",@mdash)
mdol G:584 DEF palhdr.h[694] mdol=
mdol G:584 FN pal.b[9839] LET mdol(a)=..
mdol G:584 LLG pal.b[8383] dv("$",s_codev,...,...)
mdolv G:605 DEF palhdr.h[716] mdolv=
mdolv G:605 FN pal.b[9844] LET mdolv(a)=..
mdolv G:605 LG pal.b[9731] mfn:=mdolv
mfn G:410 DEF palhdr.h[500] mfn=
mfn G:410 LG pal.b[9356] IF mfn>0 DO ..
mfn G:410 LG pal.b[9357] h3!mfn
mfn G:410 LG pal.b[9360] mfn:=h2!mfn
mfn G:410 LG pal.b[9507] mfn
mfn G:410 LG pal.b[9568] mfn,s1
mfn G:410 LG pal.b[9621] mfn,s1
mfn G:410 LG pal.b[9625] mfn,s1
mfn G:410 LG pal.b[9634] mfn,s1
mfn G:410 LG pal.b[9648] mfn
mfn G:410 LG pal.b[9734] mfn
mfn G:410 SG pal.b[9355] mfn:=h2!s1
mfn G:410 SG pal.b[9359] mfn:=m3
mfn G:410 SG pal.b[9360] mfn:=h2!mfn
mfn G:410 SG pal.b[9378] mfn:=ma2
mfn G:410 SG pal.b[9501] mfn,rprio:=mqu,35+y0
mfn G:410 SG pal.b[9731] mfn:=mdolv
mfor G:603 DEF palhdr.h[714] mfor=
mfor G:603 FN pal.b[10115] LET mfor(i,l,r,s,f,v)=..
mfor G:603 LG pal.b[9536] e:=mfor(d,e1,e2,...)
minint M:-2147483648 DEF libhdr.h[163] minint=1<<bitsperword-1
minint M:-2147483648 MAN libhdr.h[164] maxint=minint-1
minu G:526 DEF palhdr.h[631] minu=
minu G:526 FN pal.b[192] LET minu(a,b)=..
minu G:526 LG pal.b[10068] RESULTIS minu(a,b)
minu G:526 LG pal.b[1421] s1:=minu(s1,s2)
minu G:526 LG pal.b[249] a:=minu(a,b)
minu G:526 LG pal.b[274] a:=minu(h2!a,gw1)
minu G:526 LG pal.b[277] a:=minu(a,h2!b)
minu G:526 LG pal.b[291] a:=minu(a,b)
minu G:526 LG pal.b[5507] minu(a,c)
minu G:526 LG pal.b[5524] (f->minu,add)(a,b)
minu G:526 LG pal.b[5537] minu
minu G:526 LG pal.b[7549] q:=(p<ysg->add,minu)(q,r)
minu G:526 LG pal.b[7585] (pXORq)<ysg->add,minu
minu G:526 LG pal.b[7619] p<ysg->add,minu
minu G:526 LG pal.b[7686] q1<ysg->add,minu
minu G:526 LG pal.b[7739] h2!uu:=minu(h2!uu,t)
minu G:526 LG pal.b[7781] h2!uu:=minu(s,t)
minu G:526 LLG pal.b[8282] a_minu:=ds("-",@minu,mk_minu,...)
minu G:526 SG pal.b[5538] minu,ddminu:=ddminu|signbit,t|signbit
miv G:500 DEF palhdr.h[602] miv=
miv G:500 FN pal.b[6447] LET miv(p)=..
miv G:500 LG pal.b[3471] TEST a3=miv THEN .. ELSE ..
miv G:500 LLG pal.b[8330] set_v("MI",@miv)
mk_a F:20 FN pal.b[9981] LET mk_a(a,b,f)=..
mk_a F:20 LF pal.b[9917] RESULTIS mk_a(a,b,v)
mk_a1 F:22 FN pal.b[9995] LET mk_a1(a,b,f)=..
mk_a1 F:22 LF pal.b[9921] RESULTIS mk_a1(a,b,h2!v)
mk_a1v F:21 FN pal.b[9988] LET mk_a1v(a,b,f)=..
mk_a1v F:21 LF pal.b[9826] mk_a1v(a_null,a,null)
mk_a1v F:21 LF pal.b[9919] RESULTIS mk_a1v(a,b,h2!v)
mk_aa G:585 DEF palhdr.h[695] mk_aa=
mk_aa G:585 FN pal.b[9849] LET mk_aa(a)=..
mk_aa G:585 LG pal.b[9841] RESULTIS mk_aa(a)
mk_aa G:585 LG pal.b[9845] a:=mk_aa(a)
mk_aa G:585 LLG pal.b[8268] typ!s_aa:=dv("@",s_codev,...,...)
mk_aug G:591 DEF palhdr.h[702] mk_aug=
mk_aug G:591 FN pal.b[10025] LET mk_aug(a,b,f)=..
mk_aug G:591 LG pal.b[8275] ds("aug",@aug,mk_aug,...)
mk_div G:601 DEF palhdr.h[712] mk_div=
mk_div G:601 FN pal.b[10085] LET mk_div(a,b,f)=..
mk_div G:601 LG pal.b[8284] a_div:=ds("/",@div,mk_div,...)
mk_ge G:595 DEF palhdr.h[706] mk_ge=
mk_ge G:595 FN pal.b[10042] LET mk_ge(a,b)=..
mk_ge G:595 LG pal.b[10145] k:=mk_ge
mk_ge G:595 LG pal.b[8374] set_q(">=",mk_ge,s_relop,...)
mk_le G:597 DEF palhdr.h[708] mk_le=
mk_le G:597 FN pal.b[10050] LET mk_le(a,b)=..
mk_le G:597 LG pal.b[10144] k:=mk_le
mk_le G:597 LG pal.b[8375] set_q("<=",mk_le,s_relop,...)
mk_logand G:593 DEF palhdr.h[704] mk_logand=
mk_logand G:593 FN pal.b[10034] LET mk_logand(a,b)=..
mk_logand G:593 LG pal.b[8372] set_q("&",mk_logand,s_diadop,...)
mk_logand G:593 LG pal.b[9629] e:=mk_logand(e,e3)
mk_logor G:592 DEF palhdr.h[703] mk_logor=
mk_logor G:592 FN pal.b[10031] LET mk_logor(a,b)=..
mk_logor G:592 LG pal.b[8371] set_q("|",mk_logor,s_diadop,...)
mk_lt G:596 DEF palhdr.h[707] mk_lt=
mk_lt G:596 FN pal.b[10047] LET mk_lt(a,b)=..
mk_lt G:596 LG pal.b[8376] set_q("<",mk_lt,s_relop,...)
mk_minu G:599 DEF palhdr.h[710] mk_minu=
mk_minu G:599 FN pal.b[10064] LET mk_minu(a,b,f)=..
mk_minu G:599 LG pal.b[8282] a_minu:=ds("-",@minu,mk_minu,...)
mk_mul G:600 DEF palhdr.h[711] mk_mul=
mk_mul G:600 FN pal.b[10072] LET mk_mul(a,b,f)=..
mk_mul G:600 LG pal.b[8283] a_mul:=ds("**",@mul,mk_mul,...)
mk_ne G:594 DEF palhdr.h[705] mk_ne=
mk_ne G:594 FN pal.b[10037] LET mk_ne(a,b)=..
mk_ne G:594 LG pal.b[8373] set_q("~=",mk_ne,s_relop,...)
mk_plus G:598 DEF palhdr.h[709] mk_plus=
mk_plus G:598 FN pal.b[10055] LET mk_plus(a,b,f)=..
mk_plus G:598 LG pal.b[10120] mk_plus(b,y1,a_plus)
mk_plus G:598 LG pal.b[10140] mk_plus(i,s,a_plus)
mk_plus G:598 LG pal.b[8281] a_plus:=ds("+",@add,mk_plus,...)
mk_pow G:602 DEF palhdr.h[713] mk_pow=
mk_pow G:602 FN pal.b[10095] LET mk_pow(a,b,f)=..
mk_pow G:602 LG pal.b[8286] ds("^",@pow,mk_pow,...)
mk_zz G:586 DEF palhdr.h[696] mk_zz=
mk_zz G:586 FN pal.b[9852] LET mk_zz(a)=..
mk_zz G:586 LG pal.b[9840] a:=mk_zz(a)
mk_zz G:586 LG pal.b[9846] RESULTIS mk_zz(a)
mk_zz G:586 LLG pal.b[8269] typ!s_zz:=dv("!",s_codev,...,...)
mkramstream G:123 DEF libhdr.h[139] mkramstream=123
mlet G:571 DEF palhdr.h[681] mlet=
mlet G:571 FN pal.b[9802] LET mlet(a,b,c)=..
mlet G:571 LG pal.b[401] RESULTIS mlet(h2!b,2!ae,h3!b)
mlet G:571 LG pal.b[9486] h1!e1:=mlet(zsy,zsy,zsy)
mlet G:571 LG pal.b[9592] e2:=mlet(zsy,zsy,zsy)
mlet G:571 LG pal.b[9964] RESULTIS mlet(h2!a,b,h3!a)
mlet G:571 LLG pal.b[8258] typ!s_let:=du("let",s_code3,...,s_let)
mlet1 G:572 DEF palhdr.h[682] mlet1=
mlet1 G:572 LG pal.b[9489] mlet1(e1)
mlet1 G:572 LG pal.b[9594] mlet1(e2)
mlet1 G:572 RT pal.b[9813] LET mlet1(a)BE..
mm3 M:6 DEF palhdr.h[238] mm3=s_ratl
mm3 M:6 MAN pal.b[2604] TEST arg1>0&!arg1>=mm3 THEN .. ELSE ..
mm3 M:6 MAN pal.b[2613] TEST arg1>0&!arg1>=mm3 THEN .. ELSE ..
mm3 M:6 MAN pal.b[4449] IF !i>=mm3 DO ..
mm3 M:6 MAN pal.b[4486] IF u<mm3 DO ..
mm3 M:6 MAN pal.b[4516] IF u<mm3 DO ..
mm3 M:6 MAN pal.b[4571] IF u<mm3 DO ..
mm3 M:6 MAN pal.b[6442] IF p>0&!p>=mm3 DO ..
mm3 M:6 MAN pal.b[6448] IF p>0&!p>=mm3 DO ..
mm3 M:6 MAN pal.b[8577] IF t>=mm3 DO ..
mm3 M:6 MAN pal.b[8646] IF u<mm3 DO ..
mm3 M:6 MAN pal.b[8675] TEST u<mm3 THEN .. ELSE ..
mnull G:588 DEF palhdr.h[698] mnull=
mnull G:588 FN pal.b[9826] LET mnull(a)=..
mnull G:588 LG pal.b[10039] RESULTIS mnull(a)
mnull G:588 LG pal.b[10044] RESULTIS mnull(a)
mnull G:588 LG pal.b[10052] RESULTIS mnull(a)
mnull G:588 LG pal.b[9562] e:=mnull(e)
mnull G:588 LLG pal.b[8289] dv("~",s_codev,...,...)
modv G:529 DEF palhdr.h[634] modv=
modv G:529 FN pal.b[5186] LET modv(a,b)=..
modv G:529 LLG pal.b[8285] ds("mod",@modv,ap2,...)
monicpoly G:564 DEF palhdr.h[673] monicpoly=
monicpoly G:564 FN pal.b[7851] LET monicpoly(a)=..
monicpoly G:564 LG pal.b[5109] b:=monicpoly(b)
monicpoly G:564 LG pal.b[5123] b:=monicpoly(b)
monicpoly G:564 LG pal.b[5153] b2:=monicpoly(b2)
monicpoly G:564 LG pal.b[7006] p:=monicpoly(p)
monicpoly G:564 LG pal.b[7031] RESULTIS monicpoly(a)
moveblock G:277 DEF palhdr.h[349] moveblock=
mqu G:581 DEF palhdr.h[691] mqu=
mqu G:581 FN pal.b[9823] LET mqu(a)=..
mqu G:581 LG pal.b[2107] mqu(h1!arg1)
mqu G:581 LG pal.b[405] b:=mqu(b)
mqu G:581 LG pal.b[9375] s1:=mqu(s1)
mqu G:581 LG pal.b[9464] a:=mqu(a)
mqu G:581 LG pal.b[9501] mfn,rprio:=mqu,35+y0
mqu G:581 LLG pal.b[8246] a_qu:=dv("'",s_codev,...,...)
mseq G:576 DEF palhdr.h[686] mseq=
mseq G:576 FN pal.b[10163] LET mseq(e,f)=..
mseq G:576 LG pal.b[10302] RESULTIS mseq(a,e)
mseq G:576 LG pal.b[9804] RESULTIS mseq(b,c)
mseq G:576 LLG pal.b[8263] typ!s_seq:=ds(";",@mseq,seq,...)
msg0 G:378 DEF palhdr.h[462] msg0=
msg0 G:378 LG pal.b[1487] msg1(13,msg0)
msg0 G:378 LG pal.b[5863] msg0(3,a0)
msg0 G:378 LG pal.b[8620] msg0(1,rtails1)
msg0 G:378 LG pal.b[9162] msg0(2,s)
msg0 G:378 RT pal.b[1480] LET msg0(n,a,b,c,d)BE..
msg1 G:379 DEF palhdr.h[463] msg1=
msg1 G:379 LG pal.b[10296] msg1(-1)
msg1 G:379 LG pal.b[1415] msg1(16,difr1,p)
msg1 G:379 LG pal.b[1487] msg1(13,msg0)
msg1 G:379 LG pal.b[1613] msg1(4,c)
msg1 G:379 LG pal.b[1617] msg1(33,"Tree",a)
msg1 G:379 LG pal.b[1621] msg1(36,a)
msg1 G:379 LG pal.b[1734] msg1(15,c)
msg1 G:379 LG pal.b[1738] msg1(25)
msg1 G:379 LG pal.b[1780] msg1(17,h1!c)
msg1 G:379 LG pal.b[183] msg1(14)
msg1 G:379 LG pal.b[1992] msg1(30,m)
msg1 G:379 LG pal.b[2041] msg1(25)
msg1 G:379 LG pal.b[2079] msg1(28,arg1,y2)
msg1 G:379 LG pal.b[2111] msg1(20,c,arg1)
msg1 G:379 LG pal.b[2125] msg1(20,c,arg1)
msg1 G:379 LG pal.b[2158] msg1(29,arg1)
msg1 G:379 LG pal.b[2190] msg1(19,c)
msg1 G:379 LG pal.b[2219] msg1(6,c2,arg1)
msg1 G:379 LG pal.b[2409] msg1(40,c,f)
msg1 G:379 LG pal.b[2412] msg1(41)
msg1 G:379 LG pal.b[324] msg1(14)
msg1 G:379 LG pal.b[3773] msg1(1)
msg1 G:379 LG pal.b[4165] msg1(7)
msg1 G:379 LG pal.b[416] msg1(22,b)
msg1 G:379 LG pal.b[4200] msg1(26,"longdiv")
msg1 G:379 LG pal.b[4203] msg1(26,"LGCD")
msg1 G:379 LG pal.b[4279] msg1(39)
msg1 G:379 LG pal.b[4305] msg1(16,stack,n)
msg1 G:379 LG pal.b[4332] msg1(38)
msg1 G:379 LG pal.b[4345] msg1(39)
msg1 G:379 LG pal.b[4474] msg1(32,f)
msg1 G:379 LG pal.b[4666] msg1(14)
msg1 G:379 LG pal.b[4751] msg1(14)
msg1 G:379 LG pal.b[4871] msg1(7)
msg1 G:379 LG pal.b[487] msg1(14)
msg1 G:379 LG pal.b[4952] msg1(7)
msg1 G:379 LG pal.b[5090] msg1(7)
msg1 G:379 LG pal.b[5171] msg1(7)
msg1 G:379 LG pal.b[5173] msg1(14)
msg1 G:379 LG pal.b[5190] msg1(7)
msg1 G:379 LG pal.b[5227] msg1(23,a,b)
msg1 G:379 LG pal.b[5241] msg1(23,a,b)
msg1 G:379 LG pal.b[5352] msg1(13,verify)
msg1 G:379 LG pal.b[5424] msg1(0)
msg1 G:379 LG pal.b[5461] msg1(0)
msg1 G:379 LG pal.b[5477] msg1(0)
msg1 G:379 LG pal.b[547] msg1(14)
msg1 G:379 LG pal.b[5496] msg1(0)
msg1 G:379 LG pal.b[5515] msg1(0)
msg1 G:379 LG pal.b[5529] msg1(0)
msg1 G:379 LG pal.b[5592] msg1(9,s1,s2)
msg1 G:379 LG pal.b[5782] msg1(26,"prfpl")
msg1 G:379 LG pal.b[6332] msg1(13,putword)
msg1 G:379 LG pal.b[6345] msg1(5,s)
msg1 G:379 LG pal.b[6360] msg1(5,a)
msg1 G:379 LG pal.b[6408] msg1(29,n)
msg1 G:379 LG pal.b[6415] msg1(22,a)
msg1 G:379 LG pal.b[6423] msg1(28,a,n)
msg1 G:379 LG pal.b[6508] msg1(16,dofor,v)
msg1 G:379 LG pal.b[6531] msg1(24,p)
msg1 G:379 LG pal.b[6547] msg1(6,p,q)
msg1 G:379 LG pal.b[654] msg1(14)
msg1 G:379 LG pal.b[6558] msg1(12,p,q)
msg1 G:379 LG pal.b[6631] msg1(16,put,e)
msg1 G:379 LG pal.b[6653] msg1(17,code,n)
msg1 G:379 LG pal.b[6722] msg1(37,a)
msg1 G:379 LG pal.b[6733] msg1(5,a)
msg1 G:379 LG pal.b[6764] msg1(0)
msg1 G:379 LG pal.b[6788] msg1(16,mainvar,a)
msg1 G:379 LG pal.b[6881] msg1(16,name,a)
msg1 G:379 LG pal.b[6898] msg1(16,genglo,n)
msg1 G:379 LG pal.b[6934] msg1(14)
msg1 G:379 LG pal.b[6954] msg1(14)
msg1 G:379 LG pal.b[6960] msg1(16,positive,p)
msg1 G:379 LG pal.b[6974] msg1(7)
msg1 G:379 LG pal.b[6986] msg1(14)
msg1 G:379 LG pal.b[7010] msg1(7)
msg1 G:379 LG pal.b[7032] msg1(23,a,b)
msg1 G:379 LG pal.b[7048] msg1(14)
msg1 G:379 LG pal.b[7073] msg1(14)
msg1 G:379 LG pal.b[7075] msg1(14)
msg1 G:379 LG pal.b[7076] msg1(16,floatv,p)
msg1 G:379 LG pal.b[7115] msg1(15,a)
msg1 G:379 LG pal.b[7132] msg1(6,v,w)
msg1 G:379 LG pal.b[7164] msg1(11,v,w)
msg1 G:379 LG pal.b[7183] msg1(6,v,w)
msg1 G:379 LG pal.b[7210] msg1(11,v,w)
msg1 G:379 LG pal.b[7283] msg1(16,trace,a)
msg1 G:379 LG pal.b[7297] msg1(16,untrace,a)
msg1 G:379 LG pal.b[7372] msg1(14)
msg1 G:379 LG pal.b[7482] msg1(14)
msg1 G:379 LG pal.b[7485] msg1(23,p,q)
msg1 G:379 LG pal.b[7491] msg1(26,"SHL")
msg1 G:379 LG pal.b[7494] msg1(26,"SHR")
msg1 G:379 LG pal.b[7532] msg1(16,alg,n)
msg1 G:379 LG pal.b[7674] msg1(18,q3)
msg1 G:379 LG pal.b[7701] msg1(18,q3)
msg1 G:379 LG pal.b[7932] msg1(14)
msg1 G:379 LG pal.b[7958] msg1(33,"Poly",a)
msg1 G:379 LG pal.b[8785] msg1(13,squash3)
msg1 G:379 LG pal.b[8992] msg1(1)
msg1 G:379 LG pal.b[9155] msg1(2,s1,l)
msg1 G:379 LG pal.b[9222] msg1(34,synerror)
msg1 G:379 LG pal.b[9307] msg1(14)
msg1 G:379 LG pal.b[9895] msg1(13,ap1)
msg1 G:379 RT pal.b[1501] LET msg1(n,a,b,c,d)BE..
msg2 G:380 DEF palhdr.h[464] msg2=
msg2 G:380 LG pal.b[1722] msg2(c)
msg2 G:380 LG pal.b[2945] IF fff!!a=msg2 DO ..
msg2 G:380 LG pal.b[9006] fff!i:=msg2
msg2 G:380 RT pal.b[1616] LET msg2(a)BE..
msg3 G:381 DEF palhdr.h[465] msg3=
msg3 G:381 LG pal.b[1723] msg3(c)
msg3 G:381 LG pal.b[2015] msg3(c)
msg3 G:381 LG pal.b[9009] fff!s_glz:=msg3
msg3 G:381 RT pal.b[1620] LET msg3(a)BE..
msgf F:2 LF pal.b[3134] msgf(2,a)
msgf F:2 LF pal.b[3165] msgf(1,a)
msgf F:2 LF pal.b[3248] msgf(0,1)
msgf F:2 LF pal.b[3252] msgf(4,a)
msgf F:2 LF pal.b[3308] msgf(3,a,e)
msgf F:2 LF pal.b[3384] msgf(7,a1)
msgf F:2 LF pal.b[3407] msgf(0,4)
msgf F:2 LF pal.b[3539] msgf(0,2)
msgf F:2 LF pal.b[3636] msgf(6,b)
msgf F:2 LF pal.b[3661] msgf(6,v)
msgf F:2 LF pal.b[3683] msgf(0,3)
msgf F:2 LF pal.b[3696] msgf(0,3)
msgf F:2 RT pal.b[3079] LET msgf(n,a,b,c,d)BE..
mtypsz M:100 DEF palhdr.h[239] mtypsz=s_mz-1
mtypsz M:100 MAN pal.b[8442] FOR i=1 TO mtypsz DO..
mtypsz M:100 MAN pal.b[8451] FOR i=mtypsz+1 TO typsz DO..
mtypsz M:100 MAN pal.b[8481] FOR i=1 TO mtypsz DO..
mtypsz M:100 MAN pal.b[8524] FOR i=1 TO mtypsz DO..
mul G:527 DEF palhdr.h[632] mul=
mul G:527 FN pal.b[4746] LET mul(a,b)=..
mul G:527 LG pal.b[10080] RESULTIS mul(a,b)
mul G:527 LG pal.b[1418] s1:=mul(s1,h1!p)
mul G:527 LG pal.b[1420] s2:=mul(s2,h2!p)
mul G:527 LG pal.b[1424] p:=mul(h1!p,h1!p)
mul G:527 LG pal.b[1438] mul(h2!p1,h3!p1)
mul G:527 LG pal.b[1449] r:=mul(r,q)
mul G:527 LG pal.b[144] a:=mul(a,h1!b)
mul G:527 LG pal.b[1460] d:=mul(d,t)
mul G:527 LG pal.b[151] a:=mul(h2!a,v)
mul G:527 LG pal.b[154] a:=mul(h2!a,t)
mul G:527 LG pal.b[157] b:=mul(h2!b,u)
mul G:527 LG pal.b[165] u:=mul(u,v)
mul G:527 LG pal.b[272] gw1:=mul(h1!a,b)
mul G:527 LG pal.b[276] a:=mul(a,h1!b)
mul G:527 LG pal.b[284] a:=mul(h2!a,v)
mul G:527 LG pal.b[287] a:=mul(h2!a,t)
mul G:527 LG pal.b[290] b:=mul(h2!b,u)
mul G:527 LG pal.b[298] u:=mul(u,v)
mul G:527 LG pal.b[4810] a:=mul(a,h2!b)
mul G:527 LG pal.b[4820] mul(h2!a,h2!b)
mul G:527 LG pal.b[4821] b:=mul(h1!a,h1!b)
mul G:527 LG pal.b[4829] RESULTIS polymapf(b,a,mul)
mul G:527 LG pal.b[4835] a:=mul(a,h2!b)
mul G:527 LG pal.b[4845] mul(h1!a,h1!b)
mul G:527 LG pal.b[4846] a:=mul(h2!a,h2!b)
mul G:527 LG pal.b[5050] b:=mul(h1!a,b)
mul G:527 LG pal.b[5062] a:=mul(a,h1!b)
mul G:527 LG pal.b[5076] mul(h2!a,h1!b)
mul G:527 LG pal.b[5077] b:=mul(h1!a,h2!b)
mul G:527 LG pal.b[5103] c:=polymapf(r,c,mul)
mul G:527 LG pal.b[5127] b:=mul(a1,b)
mul G:527 LG pal.b[5139] a:=mul(a,h1!b)
mul G:527 LG pal.b[5157] b2:=mul(h1!a,b2)
mul G:527 LG pal.b[5158] b:=mul(h2!a,b)
mul G:527 LG pal.b[5161] b:=mul(b2,h1!b)
mul G:527 LG pal.b[5252] b:=mul(a,b)
mul G:527 LG pal.b[5256] a:=mul(a,a)
mul G:527 LG pal.b[5488] mul(b,c)
mul G:527 LG pal.b[5540] mul
mul G:527 LG pal.b[7473] q,p:=mul(h1!p,q),h2!p
mul G:527 LG pal.b[7474] p,q:=mul(p,h1!q),h2!q
mul G:527 LG pal.b[7475] mul(h2!p,h1!q)
mul G:527 LG pal.b[7476] q:=mul(h1!p,h2!q)
mul G:527 LG pal.b[7547] aa:=mul(a,aa)
mul G:527 LG pal.b[7548] mul(h2!p,aa)
mul G:527 LG pal.b[7680] mul(p2,h2!q1)
mul G:527 LG pal.b[7738] mul(rr,h2!vv)
mul G:527 LG pal.b[7766] mul
mul G:527 LG pal.b[7779] mul(rr,h2!vv)
mul G:527 LLG pal.b[8283] a_mul:=ds("**",@mul,mk_mul,...)
mul G:527 SG pal.b[5541] mul,ddmul:=ddmul|signbit,t|signbit
muldiv G:5 DEF libhdr.h[20] muldiv=5
muldiv G:5 DEF palhdr.h[14] muldiv=5
muldiv G:5 LG pal.b[4014] muldiv(a-y0,b-y0,numba)
muldiv G:5 LG pal.b[4039] muldiv(h3!a,gl1,numba)
muldiv G:5 LG pal.b[4044] gl2:=muldiv(h2!a,gl1,numba)
muldiv G:5 LG pal.b[4076] gw2:=h2!c1+muldiv(gl3,...,numba)
muldiv G:5 LG pal.b[4085] gl1:=muldiv(gl3,h2!b1,numba)
muldiv G:5 LG pal.b[4105] gl1:=muldiv(gl3,h3!b1,numba)
muldiv G:5 LG pal.b[4116] gw2:=h2!c1+muldiv(gl3,...,numba)
muldiv G:5 LG pal.b[4145] muldiv(a,numba,c)
muldiv G:5 LG pal.b[7465] ga1:=muldiv(ga1,ga4,numba)
muldiv G:5 LG pal.b[7467] ga2:=muldiv(ga2,ga3,numba)
mulpoly G:558 DEF palhdr.h[667] mulpoly=
mulpoly G:558 FN pal.b[7661] LET mulpoly(p,q)=..
mulpoly G:558 LG pal.b[4830] RESULTIS mulpoly(a,b)
mulpoly G:558 LG pal.b[5553] mulpoly
mulpoly G:558 SG pal.b[5554] mulpoly,ddmulpoly:=ddmulpoly|signbit,t|signbit
mwhi G:604 DEF palhdr.h[715] mwhi=
mwhi G:604 FN pal.b[10105] LET mwhi(e,f)=..
mwhi G:604 LG pal.b[9565] e:=mwhi(e,e1)
n F:28 LAB pal.b[6275] n:writes("*n end'f frame*n")
n F:28 LF pal.b[6271] GOTO n
n F:30 LAB pal.b[9043] n:IF j>=i DO ..
n F:30 LF pal.b[9049] GOTO n
n F:30 LF pal.b[9052] GOTO n
n S:1 DEF pal.b[8433] n=0
n S:1 LL pal.b[8558] writef("   %N'eclaimed",n,w)
n S:1 LL pal.b[8562] RESULTIS n
n S:1 SL pal.b[8552] n:=w*100/ssz
n S:91 DEF pal.b[6833] n=0
n S:91 LL pal.b[6844] n:=n*10+!c0-48
n S:91 LL pal.b[6847] IF c0>c2&n=0 DO ..
n S:91 LL pal.b[6849] v:=getx(s_numj,z,n,m)
n S:91 LL pal.b[6854] n:=n*10+!c0-48
n S:91 LL pal.b[6858] v:=getx(s_numj,v,n,m)
n S:91 SL pal.b[6842] n,m:=0,0
n S:91 SL pal.b[6844] n:=n*10+!c0-48
n S:91 SL pal.b[6851] n,m:=0,0
n S:91 SL pal.b[6854] n:=n*10+!c0-48
name G:609 DEF palhdr.h[722] name=
name G:609 FN pal.b[6878] LET name(a)=..
name G:609 LG pal.b[6881] msg1(16,name,a)
name G:609 LG pal.b[6893] h2!name(a)
name G:609 LG pal.b[9301] s0:=name(s0)
name G:609 LLG pal.b[8245] typ!s_name:=set_v("NAME",@name)
nargs G:317 DEF palhdr.h[389] nargs=
nargs G:317 FN pal.b[994] LET nargs(f)=..
nargs G:317 LG pal.b[1659] q1:=q+nargs(...>>2)+3
nargs G:317 LG pal.b[6654] nargs(g)
nargsmask M:983040 DEF pal.b[713] nargsmask=983040
nargsmask M:983040 MAN pal.b[994] ((!f&nargsmask)>>16)-6
neg G:531 DEF palhdr.h[636] neg=
neg G:531 FN pal.b[6923] LET neg(p)=..
neg G:531 LG pal.b[1446] r:=neg(h2!r0)
neg G:531 LG pal.b[1457] d:=neg(d)
neg G:531 LG pal.b[2165] arg1:=neg(h2!c)
neg G:531 LG pal.b[313] a:=neg(b)
neg G:531 LG pal.b[4932] c:=neg(c)
neg G:531 LG pal.b[4945] RESULTIS neg(a)
neg G:531 LG pal.b[5048] RESULTIS neg(a)
neg G:531 LG pal.b[5053] b,a:=neg(b),neg(a)
neg G:531 LG pal.b[5065] b,a:=neg(b),neg(a)
neg G:531 LG pal.b[5079] b,c:=neg(b),neg(c)
neg G:531 LG pal.b[5119] RESULTIS neg(a)
neg G:531 LG pal.b[6939] neg(h2!p)
neg G:531 LG pal.b[7000] q:=neg(q)
neg G:531 LG pal.b[7001] p:=neg(h1!p)
neg G:531 LG pal.b[7085] RESULTIS neg(p)
neg G:531 LG pal.b[7598] RESULTIS neg(h2!r1)
neg G:531 LG pal.b[7683] t:=neg(t)
neg G:531 LG pal.b[7817] t:=neg(t)
neg G:531 LG pal.b[7830] t:=neg(t)
neg G:531 LG pal.b[7857] t:=neg(t)
newline G:244 DEF palhdr.h[312] newline=
newline G:244 LG pal.b[1495] newline()
newline G:244 LG pal.b[4257] newline()
newline G:244 LG pal.b[5304] newline()
newline G:244 LG pal.b[5339] newline()
newline G:244 LG pal.b[5341] newline()
newline G:244 LG pal.b[5397] newline()
newline G:244 LG pal.b[6042] newline()
newline G:244 LG pal.b[6044] newline()
newline G:244 LG pal.b[8389] newline()
newline G:244 LG pal.b[838] newline()
newline G:244 LG pal.b[840] newline()
newline G:244 LG pal.b[858] newline()
newline G:244 LG pal.b[9200] newline()
newline G:244 LG pal.b[9205] newline()
newline G:244 LG pal.b[943] newline()
newline G:244 LLG pal.b[8319] set_r("NEWLINE",@newline)
newline G:244 RT pal.b[1296] LET newline()BE..
newline G:84 DEF libhdr.h[99] newline=84
newpage G:120 DEF libhdr.h[136] newpage=120
newpage G:245 DEF palhdr.h[313] newpage=
nn S:4 DEF pal.b[5586] nn=0
nn S:4 LL pal.b[5870] nn:=nn+p_addr+1
nn S:4 LL pal.b[5871] !a:=nn+(kk&p_addr)
nn S:4 SL pal.b[5849] kk,nn:=0,signbit
nn S:4 SL pal.b[5870] nn:=nn+p_addr+1
note G:63 DEF libhdr.h[78] note=63
null G:502 DEF palhdr.h[604] null=
null G:502 FN pal.b[6459] LET null(p)=..
null G:502 LG pal.b[10182] WHILE a>0&h3!a=null&(!a=s_apv|!a=s_ave) DO ..
null G:502 LG pal.b[3475] TEST a3=null THEN .. ELSE ..
null G:502 LG pal.b[9826] mk_a1v(a_null,a,null)
null G:502 LLG pal.b[8288] a_null:=set_v("NULL",@null)
num G:536 DEF palhdr.h[642] num=
num G:536 FN pal.b[6773] LET num(a)=..
num G:536 LLG pal.b[8229] a_num:=set_v("NUM",@num)
numarg G:411 DEF palhdr.h[501] numarg=
numarg G:411 LG pal.b[198] IF numarg DO ..
numarg G:411 LG pal.b[213] IF numarg DO ..
numarg G:411 LG pal.b[4753] IF numarg DO ..
numarg G:411 LG pal.b[4756] IF numarg DO ..
numarg G:411 LG pal.b[4882] IF numarg DO ..
numarg G:411 LG pal.b[4940] IF numarg DO ..
numarg G:411 LG pal.b[7021] IF numarg DO ..
numarg G:411 LG pal.b[7425] IF numarg DO ..
numarg G:411 LG pal.b[7435] IF numarg DO ..
numarg G:411 LG pal.b[90] IF numarg DO ..
numarg G:411 LG pal.b[99] IF numarg DO ..
numarg G:411 SG pal.b[429] numarg,worse,worse1:=FALSE,FALSE,FALSE
numarg G:411 SG pal.b[436] numarg:=TRUE
numarg G:411 SG pal.b[471] numarg:=TRUE
numarg G:411 SG pal.b[497] numarg:=TRUE
numarg G:411 SG pal.b[667] numarg:=TRUE
numba M:1000000000 DEF palhdr.h[50] numba=#x3B9ACA00
numba M:1000000000 MAN pal.b[3788] numbb=numba-1
numba M:1000000000 MAN pal.b[3824] IF ABSn<numba DO ..
numba M:1000000000 MAN pal.b[3829] RESULTIS getx(s_numj,z,...)+sg
numba M:1000000000 MAN pal.b[3836] TEST gw1>=numba THEN .. ELSE ..
numba M:1000000000 MAN pal.b[3837] gw1:=gw1-numba
numba M:1000000000 MAN pal.b[3841] TEST gw2>=numba THEN .. ELSE ..
numba M:1000000000 MAN pal.b[3842] gw2:=gw2-numba
numba M:1000000000 MAN pal.b[3858] UNLESS gw1=numba DO ..
numba M:1000000000 MAN pal.b[3862] UNLESS gw2=numba DO ..
numba M:1000000000 MAN pal.b[3882] gw1:=gw1+numba
numba M:1000000000 MAN pal.b[3887] gw2:=gw2+numba
numba M:1000000000 MAN pal.b[3952] UNLESS gw1>=numba DO ..
numba M:1000000000 MAN pal.b[3954] gw1:=gw1-numba
numba M:1000000000 MAN pal.b[3956] UNLESS gw2=numba DO ..
numba M:1000000000 MAN pal.b[3962] UNLESS gw1=numba DO ..
numba M:1000000000 MAN pal.b[3966] UNLESS gw2=numba DO ..
numba M:1000000000 MAN pal.b[3982] gw1:=gw1+numba
numba M:1000000000 MAN pal.b[4014] muldiv(a-y0,b-y0,numba)
numba M:1000000000 MAN pal.b[4039] muldiv(h3!a,gl1,numba)
numba M:1000000000 MAN pal.b[4041] IF gw3>=numba DO ..
numba M:1000000000 MAN pal.b[4042] gw3:=gw3-numba
numba M:1000000000 MAN pal.b[4044] gl2:=muldiv(h2!a,gl1,numba)
numba M:1000000000 MAN pal.b[4046] IF gw2>=numba DO ..
numba M:1000000000 MAN pal.b[4047] gw2:=gw2-numba
numba M:1000000000 MAN pal.b[4076] gw2:=h2!c1+muldiv(gl3,...,numba)
numba M:1000000000 MAN pal.b[4077] IF gw3>=numba DO ..
numba M:1000000000 MAN pal.b[4078] gw3:=gw3-numba
numba M:1000000000 MAN pal.b[4081] IF gw3>=numba DO ..
numba M:1000000000 MAN pal.b[4082] gw3:=gw3-numba
numba M:1000000000 MAN pal.b[4085] gl1:=muldiv(gl3,h2!b1,numba)
numba M:1000000000 MAN pal.b[4086] IF gw2>=numba DO ..
numba M:1000000000 MAN pal.b[4087] gw2:=gw2-numba
numba M:1000000000 MAN pal.b[4090] IF gw2>=numba DO ..
numba M:1000000000 MAN pal.b[4091] gw2:=gw2-numba
numba M:1000000000 MAN pal.b[4105] gl1:=muldiv(gl3,h3!b1,numba)
numba M:1000000000 MAN pal.b[4106] IF gw2>=numba DO ..
numba M:1000000000 MAN pal.b[4107] gw2:=gw2-numba
numba M:1000000000 MAN pal.b[4110] IF gw2>=numba DO ..
numba M:1000000000 MAN pal.b[4111] gw2:=gw2-numba
numba M:1000000000 MAN pal.b[4116] gw2:=h2!c1+muldiv(gl3,...,numba)
numba M:1000000000 MAN pal.b[4117] IF gw3>=numba DO ..
numba M:1000000000 MAN pal.b[4118] gw3:=gw3-numba
numba M:1000000000 MAN pal.b[4121] IF gw3>=numba DO ..
numba M:1000000000 MAN pal.b[4122] gw3:=gw3-numba
numba M:1000000000 MAN pal.b[4145] muldiv(a,numba,c)
numba M:1000000000 MAN pal.b[5623] TEST ABSx-y0<=numba THEN .. ELSE ..
numba M:1000000000 MAN pal.b[6403] yz=y0+numba
numba M:1000000000 MAN pal.b[6692] IF ABSa-y0<numba DO ..
numba M:1000000000 MAN pal.b[6715] h2!a*numba
numba M:1000000000 MAN pal.b[6716] IF t/numba=h2!a DO ..
numba M:1000000000 MAN pal.b[6718] IF t>=numba|t=signbit DO ..
numba M:1000000000 MAN pal.b[6747] IF ABSa<numba DO ..
numba M:1000000000 MAN pal.b[6752] RESULTIS getx(s_numj,z,...)+v
numba M:1000000000 MAN pal.b[7465] ga1:=muldiv(ga1,ga4,numba)
numba M:1000000000 MAN pal.b[7467] ga2:=muldiv(ga2,ga3,numba)
numba M:1000000000 MAN pal.b[7506] yz=y0+numba
numba M:1000000000 MAN pal.b[8213] zsy:=get4(s_unset,z,y0,...)
numbb M:999999999 DEF pal.b[3788] numbb=numba-1
numbb M:999999999 MAN pal.b[3902] gw1:=numbb
numbb M:999999999 MAN pal.b[3905] h1!s0:=getx(s_numj,zsy,numbb,numbb)
numbb M:999999999 MAN pal.b[3991] getx(s_numj,zsy,numbb,gw1)
numbb M:999999999 MAN pal.b[3999] gw1:=numbb
numbb M:999999999 MAN pal.b[4002] h1!c0:=getx(s_numj,zsy,numbb,numbb)
number G:607 DEF palhdr.h[720] number=
number G:607 FN pal.b[6829] LET number(v)=..
number G:607 LG pal.b[9328] s0:=number(buffp)
number G:607 LLG pal.b[8314] set_f("NUMBER",@number)
numwi M:9 DEF palhdr.h[51] numwi=9
numwi M:9 MAN pal.b[5770] f(h3!p,numwi)
numwi M:9 MAN pal.b[5775] writel(h2!p,numwi)
numwi M:9 MAN pal.b[5776] writel(h3!p,numwi)
numwi M:9 MAN pal.b[6831] nw2=2*numwi
numwi M:9 MAN pal.b[6843] UNTIL c0>=c1-numwi DO ..
numwi M:9 MAN pal.b[6852] c1:=c0+numwi
numwi M:9 MAN pal.b[6855] c1:=c0+numwi
numwi M:9 MAN pal.b[9306] IF s0>numwi DO ..
numwi M:9 MAN pal.b[9326] TEST s0>numwi THEN .. ELSE ..
nval F:47 FN pal.b[1321] LET nval(c)=..
nval F:47 LF pal.b[1313] nval(ch)
nw2 M:18 DEF pal.b[6831] nw2=2*numwi
nw2 M:18 MAN pal.b[6840] c1:=c0+(c2-c0+1)MODnw2
ny0 M:1073741824 DEF pal.b[4731] ny0=-y0
ny0 M:1073741824 DEF pal.b[6911] ny0=-y0
ny0 M:1073741824 DEF pal.b[74] ny0=-y0
ny0 M:1073741824 MAN pal.b[116] ga1:=igcd(u+ny0,v+ny0)
ny0 M:1073741824 MAN pal.b[117] a:=smul(h2!a,.../ga1+y0)
ny0 M:1073741824 MAN pal.b[118] u:=(u+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[126] ga1:=igcd(a+ny0,ga1)
ny0 M:1073741824 MAN pal.b[127] a:=(a+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[130] v:=(v+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[243] ga1:=igcd(u+ny0,v+ny0)
ny0 M:1073741824 MAN pal.b[244] a:=smul(h2!a,.../ga1+y0)
ny0 M:1073741824 MAN pal.b[245] u:=(u+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[253] ga1:=igcd(a+ny0,ga1)
ny0 M:1073741824 MAN pal.b[254] a:=(a+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[257] v:=(v+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[4764] ga1:=igcd(a+ny0,h1!b+ny0)
ny0 M:1073741824 MAN pal.b[4765] a:=smul(.../ga1+y0,h2!b)
ny0 M:1073741824 MAN pal.b[4766] b:=(h1!b+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[4783] b:=(h1!b+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[4796] ga1:=igcd(h2!a+ny0,h1!b+ny0)
ny0 M:1073741824 MAN pal.b[4797] ga2:=igcd(t+ny0,h2!b+ny0)
ny0 M:1073741824 MAN pal.b[4798] a:=smul(.../ga1+y0,.../ga2+y0)
ny0 M:1073741824 MAN pal.b[4799] b:=smul(.../ga2+y0,.../ga1+y0)
ny0 M:1073741824 MAN pal.b[4869] ga1,ga2:=a+ny0,b+ny0
ny0 M:1073741824 MAN pal.b[4893] ga1:=igcd(b+ny0,result2)
ny0 M:1073741824 MAN pal.b[4897] b:=(b+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[4916] a:=(a+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[4953] ga1:=igcd(h2!a+ny0,b+ny0)
ny0 M:1073741824 MAN pal.b[4956] b:=smul(h1!a,.../ga1+y0)
ny0 M:1073741824 MAN pal.b[4957] a:=(h2!a+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[4970] ga1:=igcd(a+ny0,h2!b+ny0)
ny0 M:1073741824 MAN pal.b[4973] a:=smul(.../ga1+y0,h1!b)
ny0 M:1073741824 MAN pal.b[4974] b:=(h2!b+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[4996] a:=(h2!a+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[5014] b:=(h2!b+ny0)/ga1+y0
ny0 M:1073741824 MAN pal.b[5030] ga1:=igcd(h2!a+ny0,t+ny0)
ny0 M:1073741824 MAN pal.b[5031] ga2:=igcd(h1!a+ny0,h1!b+ny0)
ny0 M:1073741824 MAN pal.b[5034] b:=smul(.../ga1+y0,.../ga2+y0)
ny0 M:1073741824 MAN pal.b[5035] a:=smul(.../ga2+y0,.../ga1+y0)
ny0 M:1073741824 MAN pal.b[5192] RESULTIS (a+ny0)MOD(b+ny0)+y0
ny0 M:1073741824 MAN pal.b[7020] RESULTIS igcd(a+ny0,b+ny0)+y0
ny0 M:1073741824 MAN pal.b[7049] RESULTIS (h2!p+ny0)/(h1!p+ny0)+y0
ny0 M:1073741824 MAN pal.b[7066] RESULTIS getx(s_flt,0,...,0)
ny0 M:1073741824 MAN pal.b[7074] RESULTIS getx(s_flt,0,...,0)
ny0 M:1073741824 MAN pal.b[7099] RESULTIS igcd(n+ny0,result2)
ocm G:416 DEF palhdr.h[507] ocm=
ocm G:416 LG pal.b[5875] s0:=i-@ll_zc+ocm
ocm G:416 LG pal.b[8089] n:=n-@ll_zc+ocm
ocm G:416 SG pal.b[8924] ocm:=TABLE 0,0,0,...
ocmsz M:120 DEF palhdr.h[888] ocmsz=120
ocmsz M:120 MAN pal.b[5873] FOR i=@ll_zc TO @ll_zc+ocmsz DO..
ocmsz M:120 MAN pal.b[8096] FOR i=1 TO ocmsz DO..
oddstack M:-1009631140 DEF pal.b[717] oddstack=#xC3D2405C
oddstack M:-1009631140 MAN pal.b[1125] UNLESS p!1=oddstack DO ..
oddstack M:-1009631140 MAN pal.b[1259] IF v=evenstack|v=oddstack DO ..
okpal G:337 DEF palhdr.h[414] okpal=
okpal G:337 LG pal.b[1632] TEST f&okpal THEN .. ELSE ..
okpal G:337 LG pal.b[1668] IF okpal DO ..
okpal G:337 LG pal.b[3772] UNLESS okpal DO ..
okpal G:337 LG pal.b[8992] UNLESS okpal DO ..
okpal G:337 SG pal.b[4308] okpal:=FALSE
okpal G:337 SG pal.b[4359] okpal:=TRUE
okpal G:337 SG pal.b[4411] okpal:=FALSE
okpal G:337 SG pal.b[4430] okpal:=TRUE
okpal G:337 SG pal.b[4612] okpal:=FALSE
okpal G:337 SG pal.b[4620] okpal:=TRUE
okpal G:337 SG pal.b[5335] okpal:=TRUE
okpal G:337 SG pal.b[8390] okpal:=TRUE
okpal G:337 SG pal.b[8460] okpal:=FALSE
okpal G:337 SG pal.b[8554] okpal:=TRUE
okpal G:337 SG pal.b[8951] okpal:=FALSE
openblockfile G:272 DEF palhdr.h[344] openblockfile=
order G:504 DEF palhdr.h[606] order=
order G:504 FN pal.b[6465] LET order(p)=..
order G:504 LG pal.b[7129] IF order(w)=y1 DO ..
order G:504 LG pal.b[7180] IF order(w)=y1 DO ..
order G:504 LLG pal.b[8328] set_v("ORDER",@order)
outcontrol G:211 DEF palhdr.h[273] outcontrol=
output G:59 DEF libhdr.h[74] output=59
output G:59 DEF palhdr.h[28] output=59
output G:59 LG pal.b[1093] output(),0
output G:59 LG pal.b[730] sysout:=output()
output G:59 LLG pal.b[8324] d("OUTPUT",s_bcplv,@output)
outputmember G:235 DEF palhdr.h[302] outputmember=
overflow M:0 DEF pal.b[718] overflow=0
overflow M:0 MAN pal.b[1116] RESULTIS overflow
overflow M:0 MAN pal.b[1118] RESULTIS overflow
overflow M:0 MAN pal.b[1179] TEST hwm=overflow THEN .. ELSE ..
p_addr M:16777215 DEF palhdr.h[44] p_addr=#x00FFFFFF
p_addr M:16777215 MAN pal.b[1067] (!q&p_addr)+16*1024,q<<2
p_addr M:16777215 MAN pal.b[1069] IF 1!p=r&validentry((...&p_addr)>>2) DO ..
p_addr M:16777215 MAN pal.b[1070] 2!p&p_addr
p_addr M:16777215 MAN pal.b[1225] writef("<%N",(...&p_addr)-(...&p_addr))
p_addr M:16777215 MAN pal.b[1247] v&p_addr
p_addr M:16777215 MAN pal.b[1262] IF v>p_addr|v<-p_addr DO ..
p_addr M:16777215 MAN pal.b[1463] .. REPEATUNTIL (p1&p_addr)=z
p_addr M:16777215 MAN pal.b[1628] a&p_addr
p_addr M:16777215 MAN pal.b[1637] writef("?%X2:'(%X2:%N)",a>>24,b,...)
p_addr M:16777215 MAN pal.b[1659] q1:=q+nargs(...>>2)+3
p_addr M:16777215 MAN pal.b[1958] !j,stackp:=stackp,j&p_addr
p_addr M:16777215 MAN pal.b[1966] !j,stackp:=stackp,j&p_addr
p_addr M:16777215 MAN pal.b[1974] !j,stackp:=stackp,j&p_addr
p_addr M:16777215 MAN pal.b[1986] !j,stackp:=stackp,j&p_addr
p_addr M:16777215 MAN pal.b[2004] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2252] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2264] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2288] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2301] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2318] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2339] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2366] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2376] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2386] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2400] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2465] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2490] f&p_addr
p_addr M:16777215 MAN pal.b[2565] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2651] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2685] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2750] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[2775] !f,stackp:=stackp,f&p_addr
p_addr M:16777215 MAN pal.b[3731] h2!k:=k2&p_addr
p_addr M:16777215 MAN pal.b[3733] RESULTIS j&p_addr
p_addr M:16777215 MAN pal.b[3744] h1!g:=g1&p_addr
p_addr M:16777215 MAN pal.b[3746] RESULTIS f&p_addr
p_addr M:16777215 MAN pal.b[4441] q&p_addr
p_addr M:16777215 MAN pal.b[5287] p&p_addr
p_addr M:16777215 MAN pal.b[5307] UNLESS st1<=(a&p_addr)&(a&p_addr)<=st2 DO ..
p_addr M:16777215 MAN pal.b[5331] !s,s:=h1!s&p_addr,!s
p_addr M:16777215 MAN pal.b[5417] IF (p&p_addr)=zsy|h2!p=y0 DO ..
p_addr M:16777215 MAN pal.b[5852] !kk&p_addr
p_addr M:16777215 MAN pal.b[5870] nn:=nn+p_addr+1
p_addr M:16777215 MAN pal.b[5871] !a:=nn+(kk&p_addr)
p_addr M:16777215 MAN pal.b[6651] (f&p_addr)>>2
p_addr M:16777215 MAN pal.b[6680] f:=h2!f&p_addr
p_addr M:16777215 MAN pal.b[6835] c0,v:=v&p_addr,z
p_addr M:16777215 MAN pal.b[7550] .. REPEATUNTIL (p&p_addr)=z
p_addr M:16777215 MAN pal.b[7580] IF (q&p_addr)=z DO ..
p_addr M:16777215 MAN pal.b[7591] IF (p&p_addr)=z DO ..
p_addr M:16777215 MAN pal.b[7592] TEST (q&p_addr)=z THEN .. ELSE ..
p_addr M:16777215 MAN pal.b[7603] IF (q&p_addr)=z DO ..
p_addr M:16777215 MAN pal.b[7697] IF (q1&p_addr)=z DO ..
p_addr M:16777215 MAN pal.b[7708] .. REPEATUNTIL (p&p_addr)=z
p_addr M:16777215 MAN pal.b[7821] .. REPEATUNTIL (p&p_addr)=z
p_addr M:16777215 MAN pal.b[7835] .. REPEATUNTIL (p&p_addr)=z
p_addr M:16777215 MAN pal.b[7862] q:=q&p_addr
p_addr M:16777215 MAN pal.b[7866] UNTIL (a&p_addr)=q DO ..
p_addr M:16777215 MAN pal.b[8571] !a:=(x&p_addr)+(w&p_tag)
p_addr M:16777215 MAN pal.b[8580] IF (p&p_addr)=0 DO ..
p_addr M:16777215 MAN pal.b[8584] IF (t&p_addr)=zsq DO ..
p_addr M:16777215 MAN pal.b[8592] IF (b0&p_addr)=0 DO ..
p_addr M:16777215 MAN pal.b[8623] UNLESS (!a&p_addr)=0 DO ..
p_addr M:16777215 MAN pal.b[8625] !a:=(b0&p_addr)+signbit
p_addr M:16777215 MAN pal.b[8632] h1!a:=(b0&p_addr)+(a0&p_tag)
p_addr M:16777215 MAN pal.b[8633] (a&p_addr)+(b0&p_tag)
p_addr M:16777215 MAN pal.b[8635] .. REPEATUNTIL (a0&p_addr)=zsq
p_addr M:16777215 MAN pal.b[8644] RESULTIS (u&p_addr)+(a&p_tag)
p_addr M:16777215 MAN pal.b[8668] n!a:=(u&p_addr)+(t&p_tag)
p_addr M:16777215 MAN pal.b[8803] UNLESS (!a&p_addr)=0 DO ..
p_addr M:16777215 MAN pal.b[8806] RESULTIS (!s2&p_addr)+(a&p_tag)
p_addr M:16777215 MAN pal.b[8829] UNLESS (!a&p_addr)=0 DO ..
p_addr M:16777215 MAN pal.b[8833] h1!s1:=(a&p_addr)+signbit
p_addr M:16777215 MAN pal.b[8839] h1!t1:=a&p_addr
p_addr M:16777215 MAN pal.b[8849] IF (b&p_addr)=0 DO ..
p_addr M:16777215 MAN pal.b[8851] !a1:=(a&p_addr)+(b&p_tag)
p_addr M:16777215 MAN pal.b[8882] UNLESS (!a&p_addr)=0 DO ..
p_addr M:16777215 MAN pal.b[8884] !a:=(b&p_addr)+signbit
p_addr M:16777215 MAN pal.b[8885] RESULTIS (b&p_addr)+(a&p_tag)
p_addr M:16777215 MAN pal.b[8891] h1!a:=(b&p_addr)+a1t
p_addr M:16777215 MAN pal.b[8892] h1!a1:=(a&p_addr)+(b&p_tag)
p_addr M:16777215 MAN pal.b[9401] s1:=rbase(s1)&p_addr
p_addr M:16777215 MAN pal.b[982] p:=p&p_addr
p_tag M:-16777216 DEF palhdr.h[45] p_tag=#xFF000000
p_tag M:-16777216 MAN pal.b[4442] !p:=!r+(q&p_tag)
p_tag M:-16777216 MAN pal.b[8571] !a:=(x&p_addr)+(w&p_tag)
p_tag M:-16777216 MAN pal.b[8583] h1!p:=i+(t&p_tag)
p_tag M:-16777216 MAN pal.b[8593] b0:=zsq+(b0&p_tag)
p_tag M:-16777216 MAN pal.b[8613] h1!a0&p_tag
p_tag M:-16777216 MAN pal.b[8614] WHILE (h1!b0&p_tag)<a1 DO ..
p_tag M:-16777216 MAN pal.b[8619] IF (h1!b0&p_tag)=a1 DO ..
p_tag M:-16777216 MAN pal.b[8632] h1!a:=(b0&p_addr)+(a0&p_tag)
p_tag M:-16777216 MAN pal.b[8633] (a&p_addr)+(b0&p_tag)
p_tag M:-16777216 MAN pal.b[8644] RESULTIS (u&p_addr)+(a&p_tag)
p_tag M:-16777216 MAN pal.b[8668] n!a:=(u&p_addr)+(t&p_tag)
p_tag M:-16777216 MAN pal.b[8806] RESULTIS (!s2&p_addr)+(a&p_tag)
p_tag M:-16777216 MAN pal.b[8834] RESULTIS t2+(a&p_tag)
p_tag M:-16777216 MAN pal.b[8847] a1&p_tag
p_tag M:-16777216 MAN pal.b[8851] !a1:=(a&p_addr)+(b&p_tag)
p_tag M:-16777216 MAN pal.b[8874] IF (h1!b&p_tag)<=a1t DO ..
p_tag M:-16777216 MAN pal.b[8875] IF (h1!b&p_tag)<a1t DO ..
p_tag M:-16777216 MAN pal.b[8879] .. REPEATWHILE (h1!b&p_tag)<a1t
p_tag M:-16777216 MAN pal.b[8880] IF (h1!b&p_tag)>a1t DO ..
p_tag M:-16777216 MAN pal.b[8885] RESULTIS (b&p_addr)+(a&p_tag)
p_tag M:-16777216 MAN pal.b[8892] h1!a1:=(a&p_addr)+(b&p_tag)
p_tag M:-16777216 MAN palhdr.h[46] p_tagp=p_tag-signbit
p_tagp M:2130706432 DEF palhdr.h[46] p_tagp=p_tag-signbit
p_tagp M:2130706432 MAN pal.b[5289] UNLESS qq=0|qq=ysg|qq=yfj|qq=p_tagp DO ..
p_tagp M:2130706432 MAN pal.b[5865] writef(" ...%N",(a0&p_tagp)>>24)
p_tagp M:2130706432 MAN pal.b[8216] zsq:=get4(s_mb,zsy+p_tagp,...,...)
p_tagp M:2130706432 MAN pal.b[8542] TEST (j&p_tagp)=0 THEN .. ELSE ..
p_tagp M:2130706432 MAN pal.b[8570] IF x<0&(x&p_tagp)=0 DO ..
p_tagp M:2130706432 MAN pal.b[8576] (p&p_tagp)>>24
p_tagp M:2130706432 MAN pal.b[8596] !a0&p_tagp,h2!a0,h3!a0
p_tagp M:2130706432 MAN pal.b[8607] WHILE (!b0&p_tagp)<ay DO ..
p_tagp M:2130706432 MAN pal.b[8612] IF (!b0&p_tagp)=ay DO ..
p_tagp M:2130706432 MAN pal.b[8617] IF h2!b0>a2|h3!b0>a3|(!b0&p_tagp)>ay DO ..
p_tagp M:2130706432 MAN pal.b[8643] TEST (u&p_tagp)=0 THEN .. ELSE ..
p_tagp M:2130706432 MAN pal.b[8667] IF (u&p_tagp)=0 DO ..
p_tagp M:2130706432 MAN pal.b[8776] !a&p_tagp,h1!a,h2!a,h3!a
p_tagp M:2130706432 MAN pal.b[8866] IF (!b&p_tagp)<=a0 DO ..
p_tagp M:2130706432 MAN pal.b[8867] IF (!b&p_tagp)<a0 DO ..
p_tagp M:2130706432 MAN pal.b[8871] .. REPEATWHILE (!b&p_tagp)<a0
p_tagp M:2130706432 MAN pal.b[8872] IF (!b&p_tagp)>a0 DO ..
p_tagp M:2130706432 MAN pal.b[8878] IF (...&p_tagp)>a0|h3!b>a3|h2!b>a2 DO ..
packstring G:247 DEF palhdr.h[315] packstring=
packstring G:247 FN pal.b[871] LET packstring(v,s)=..
packstring G:247 LG pal.b[6725] packstring(stov(a,...),u)
packstring G:30 DEF libhdr.h[45] packstring=30
pagemask M:-512 DEF palhdr.h[42] pagemask=-512
pagemask M:-512 MAN pal.b[8074] region:=(stackend+pagesize&pagemask)-(loadpoint&pagemask)
pagemask M:-512 MAN pal.b[983] IF (loadpoint&pagemask)<=p&p<=stackbase DO ..
pagesize M:512 DEF palhdr.h[43] pagesize=512
pagesize M:512 MAN pal.b[8074] region:=(stackend+pagesize&pagemask)-(loadpoint&pagemask)
paldd G:352 DEF palhdr.h[431] paldd=
paldd G:352 RT pal.b[5392] LET paldd(style,s,n,a,b,c,d,...)BE..
param G:372 DEF palhdr.h[454] param=
param G:372 FN pal.b[9039] LET param(p)=..
param G:372 LLG pal.b[8304] set_f("PARAM",@param)
parama G:359 DEF palhdr.h[441] parama=
parama G:359 LG pal.b[9054] r:=parama
parama G:359 SG pal.b[8063] parama,paramb,paramc,paramd:=FALSE,FALSE,FALSE,FALSE
parama G:359 SG pal.b[9055] parama:=b
paramb G:360 DEF palhdr.h[442] paramb=
paramb G:360 LG pal.b[9058] r:=paramb
paramb G:360 SG pal.b[8063] parama,paramb,paramc,paramd:=FALSE,FALSE,FALSE,FALSE
paramb G:360 SG pal.b[9059] paramb:=b
paramc G:361 DEF palhdr.h[443] paramc=
paramc G:361 LG pal.b[1598] pmap(paramc)
paramc G:361 LG pal.b[1603] pmap(paramc)
paramc G:361 LG pal.b[5387] pmap(paramc)
paramc G:361 LG pal.b[6227] UNLESS paramc DO ..
paramc G:361 LG pal.b[6266] UNLESS paramc DO ..
paramc G:361 LG pal.b[9062] r:=paramc
paramc G:361 SG pal.b[8063] parama,paramb,paramc,paramd:=FALSE,FALSE,FALSE,FALSE
paramc G:361 SG pal.b[9063] paramc:=b
paramd G:362 DEF palhdr.h[444] paramd=
paramd G:362 LG pal.b[1601] TEST erz=z|~paramd THEN .. ELSE ..
paramd G:362 LG pal.b[4363] IF paramd DO ..
paramd G:362 LG pal.b[8458] IF paramd DO ..
paramd G:362 LG pal.b[8560] IF paramd DO ..
paramd G:362 LG pal.b[9066] r:=paramd
paramd G:362 LG pal.b[9221] IF paramd DO ..
paramd G:362 SG pal.b[8063] parama,paramb,paramc,paramd:=FALSE,FALSE,FALSE,FALSE
paramd G:362 SG pal.b[9068] paramd:=b
parami G:363 DEF palhdr.h[445] parami=
parami G:363 LG pal.b[9078] r:=parami
parami G:363 SG pal.b[8064] parami,paramj,paramk,paramm:=FALSE,FALSE,FALSE,FALSE
parami G:363 SG pal.b[9079] parami:=b
paramj G:364 DEF palhdr.h[446] paramj=
paramj G:364 LG pal.b[9082] r:=paramj
paramj G:364 SG pal.b[8064] parami,paramj,paramk,paramm:=FALSE,FALSE,FALSE,FALSE
paramj G:364 SG pal.b[9083] paramj:=b
paramk G:365 DEF palhdr.h[447] paramk=
paramk G:365 LG pal.b[4266] IF paramk DO ..
paramk G:365 LG pal.b[5383] IF paramk DO ..
paramk G:365 LG pal.b[8077] IF paramk DO ..
paramk G:365 LG pal.b[9086] r:=paramk
paramk G:365 SG pal.b[8064] parami,paramj,paramk,paramm:=FALSE,FALSE,FALSE,FALSE
paramk G:365 SG pal.b[9087] paramk:=b
paramm G:366 DEF palhdr.h[448] paramm=
paramm G:366 LG pal.b[9094] r:=paramm
paramm G:366 SG pal.b[8064] parami,paramj,paramk,paramm:=FALSE,FALSE,FALSE,FALSE
paramm G:366 SG pal.b[9095] paramm:=b
paramn G:367 DEF palhdr.h[449] paramn=
paramn G:367 LG pal.b[9098] r:=paramn
paramn G:367 SG pal.b[8065] paramn,paramq,paramv,paramy:=FALSE,FALSE,FALSE,FALSE
paramn G:367 SG pal.b[9099] paramn:=b
paramq G:368 DEF palhdr.h[450] paramq=
paramq G:368 LG pal.b[9102] r:=paramq
paramq G:368 SG pal.b[8065] paramn,paramq,paramv,paramy:=FALSE,FALSE,FALSE,FALSE
paramq G:368 SG pal.b[9103] paramq:=b
paramv G:369 DEF palhdr.h[451] paramv=
paramv G:369 LG pal.b[4361] IF paramv DO ..
paramv G:369 LG pal.b[4432] IF paramv DO ..
paramv G:369 LG pal.b[8556] IF paramv DO ..
paramv G:369 LG pal.b[9128] r:=paramv
paramv G:369 SG pal.b[8065] paramn,paramq,paramv,paramy:=FALSE,FALSE,FALSE,FALSE
paramv G:369 SG pal.b[9129] paramv:=b
paramy G:370 DEF palhdr.h[452] paramy=
paramy G:370 LG pal.b[2941] IF paramy DO ..
paramy G:370 LG pal.b[9139] r:=paramy
paramy G:370 SG pal.b[8065] paramn,paramq,paramv,paramy:=FALSE,FALSE,FALSE,FALSE
paramy G:370 SG pal.b[9140] paramy:=b
paramz G:371 DEF palhdr.h[453] paramz=
paramz G:371 LG pal.b[1596] IF paramz DO ..
paramz G:371 LG pal.b[9143] r:=paramz
paramz G:371 SG pal.b[8066] paramz:=TRUE
paramz G:371 SG pal.b[9144] paramz:=b
parms G:231 DEF palhdr.h[298] parms=
parms G:231 LG pal.b[8075] writef("*n# Pa'K bytes*n",timeofday(),...,...)
parms G:231 SG pal.b[8912] parms:="D"
parms G:231 SG pal.b[8913] parms:=argv!0
patch0 G:422 DEF palhdr.h[514] patch0=
patch1 G:423 DEF palhdr.h[515] patch1=
patch2 G:424 DEF palhdr.h[516] patch2=
patch3 G:425 DEF palhdr.h[517] patch3=
patch4 G:426 DEF palhdr.h[518] patch4=
patch5 G:427 DEF palhdr.h[519] patch5=
pathfindinput G:53 DEF libhdr.h[68] pathfindinput=53
pcode F:18 LF pal.b[6043] pcode(c)
pcode F:18 RT pal.b[5848] LET pcode(a)BE..
pcode1 F:19 LF pal.b[5850] pcode1(a)
pcode1 F:19 LF pal.b[5884] pcode1(a2)
pcode1 F:19 RT pal.b[5857] LET pcode1(a)BE..
peepch G:302 DEF palhdr.h[374] peepch=
peepch G:302 FN pal.b[803] LET peepch()=..
peepch G:302 LG pal.b[9304] peepch()
pframe G:347 DEF palhdr.h[426] pframe=
pframe G:347 FN pal.b[1683] LET pframe(p,q)=..
pframe G:347 LG pal.b[1688] RESULTIS pframe(p,q,t)
pframe G:347 LG pal.b[8966] wframe,pframe:=pframe,t
pframe G:347 SG pal.b[8966] wframe,pframe:=pframe,t
pmap G:348 DEF palhdr.h[427] pmap=
pmap G:348 FN pal.b[1648] LET pmap(b)=..
pmap G:348 LG pal.b[1598] pmap(paramc)
pmap G:348 LG pal.b[1603] pmap(paramc)
pmap G:348 LG pal.b[5387] pmap(paramc)
pmap G:348 LLG pal.b[8312] set_v("PMAP",@pmap)
point G:64 DEF libhdr.h[79] point=64
pol G:550 DEF palhdr.h[659] pol=
pol G:550 FN pal.b[7535] LET pol(s,p)=..
pol G:550 LLG pal.b[8231] typ!s_poly:=set_c("POL",@pol)
pollingch M:-3 DEF libhdr.h[168] pollingch=-3
polygcd G:565 DEF palhdr.h[674] polygcd=
polygcd G:565 FN pal.b[7879] LET polygcd(p,q)=..
polygcd G:565 LG pal.b[5100] polygcd(b,result2)
polygcd G:565 LG pal.b[7028] a:=polygcd(a,b)
polymapf G:557 DEF palhdr.h[666] polymapf=
polymapf G:557 FN pal.b[7635] LET polymapf(p,a,f)=..
polymapf G:557 LG pal.b[4829] RESULTIS polymapf(b,a,mul)
polymapf G:557 LG pal.b[5091] RESULTIS polymapf(a,b,div)
polymapf G:557 LG pal.b[5103] c:=polymapf(r,c,mul)
polymapf G:557 LG pal.b[7899] q:=polymapf(r,c,div)
positive G:532 DEF palhdr.h[637] positive=
positive G:532 FN pal.b[6947] LET positive(p)=..
positive G:532 LG pal.b[5052] UNLESS positive(b) DO ..
positive G:532 LG pal.b[5064] UNLESS positive(b) DO ..
positive G:532 LG pal.b[5078] UNLESS positive(b) DO ..
positive G:532 LG pal.b[6510] positive(i)
positive G:532 LG pal.b[6960] msg1(16,positive,p)
positive G:532 LG pal.b[6998] TEST positive(q) THEN .. ELSE ..
positive G:532 LG pal.b[7083] IF positive(p) DO ..
pow G:530 DEF palhdr.h[635] pow=
pow G:530 FN pal.b[5236] LET pow(a,b)=..
pow G:530 LG pal.b[10097] RESULTIS pow(a,b)
pow G:530 LG pal.b[7896] pow(l1,d0-d1+y1)
pow G:530 LLG pal.b[8286] ds("^",@pow,mk_pow,...)
prc F:25 LF pal.b[5828] prc(p2,30+y0)
prc F:25 LF pal.b[5831] prc(a,50+y0)
prc F:25 LF pal.b[5842] prc(p,y0)
prc F:25 LF pal.b[5898] prc(a,y2)
prc F:25 LF pal.b[5904] prc(a,9+y0)
prc F:25 LF pal.b[5966] prc(a,y0)
prc F:25 LF pal.b[5989] prc(h2!c,y0)
prc F:25 LF pal.b[5991] prc(h1!c,y0)
prc F:25 LF pal.b[6010] prc(h2!c,48+y0)
prc F:25 LF pal.b[6016] prc(h2!c,9+y0)
prc F:25 LF pal.b[6030] prc(h3!c,y0)
prc F:25 LF pal.b[6067] prc(c,y2)
prc F:25 LF pal.b[6082] prc(c3,y1)
prc F:25 LF pal.b[6084] prc(h1!c,y1)
prc F:25 LF pal.b[6092] prc(h1!c,10+y0)
prc F:25 LF pal.b[6094] prc(h2!c,10+y0)
prc F:25 LF pal.b[6098] prc(c,10+y0)
prc F:25 LF pal.b[6109] prc(h1!c,p+1)
prc F:25 LF pal.b[6111] prc(h2!c,p)
prc F:25 LF pal.b[6123] prc(h2!c,35+y0)
prc F:25 LF pal.b[6131] prc(h2!c,35+y0)
prc F:25 LF pal.b[6143] prc(h2!c1,getbyte(...)+y0)
prc F:25 LF pal.b[6145] prc(h2!h1!c1,getbyte(...)+y0)
prc F:25 LF pal.b[6150] prc(h2!c1,11+y0)
prc F:25 LF pal.b[6152] prc(s,50+y0)
prc F:25 LF pal.b[6154] prc(h2!h1!c1,11+y0)
prc F:25 LF pal.b[6172] prc(h1!c,38+y0)
prc F:25 LF pal.b[6174] prc(h2!c,41+y0)
prc F:25 LF pal.b[6179] prc(h1!c,36+y0)
prc F:25 LF pal.b[6195] prc(c,y0)
prc F:25 RT pal.b[5973] LET prc(c,b)BE..
prch G:473 DEF palhdr.h[571] prch=
prch G:473 FN pal.b[5753] LET prch(c)=..
prch G:473 LG pal.b[2050] prch(arg1)
prch G:473 LLG pal.b[8323] set_v("PRCH",@prch)
prfpl F:16 LF pal.b[5656] prfpl(x)
prfpl F:16 RT pal.b[5780] LET prfpl(n)BE..
prin G:472 DEF palhdr.h[570] prin=
prin G:472 FN pal.b[5619] LET prin(a)=..
prin G:472 LG pal.b[1626] prin(a)
prin G:472 LG pal.b[5886] prin(a2)
prin G:472 LG pal.b[5893] prin(a)
prin G:472 LG pal.b[5969] RESULTIS prin(a)
prin G:472 LG pal.b[5980] prin(c)
prin G:472 LG pal.b[6028] prin(h1!c)
prin G:472 LG pal.b[6188] prin(c)
prin G:472 LG pal.b[6228] f:=prin
prin G:472 LG pal.b[6267] g:=prin
prin G:472 LG pal.b[9035] writep:=prin
prin G:472 LLG pal.b[8342] set_v("PRIN",@prin)
prinbv F:21 LF pal.b[5895] prinbv(h2!a)
prinbv F:21 LF pal.b[5903] prinpars(print0,a,prinbv)
prinbv F:21 LF pal.b[6039] prinbv(h3!c)
prinbv F:21 LF pal.b[6060] prinbv(h2!c)
prinbv F:21 LF pal.b[6064] prinbv(h2!c)
prinbv F:21 LF pal.b[6075] prinbv(h2!c)
prinbv F:21 LF pal.b[6079] prinbv(h2!c3)
prinbv F:21 RT pal.b[5901] LET prinbv(a)BE..
princlo F:20 LF pal.b[6052] prinpars(princlo,c)
princlo F:20 LF pal.b[6053] princlo(c)
princlo F:20 RT pal.b[5892] LET princlo(a)BE..
prind G:480 DEF palhdr.h[578] prind=
prind G:480 FN pal.b[6264] LET prind(f)=..
prind G:480 LG pal.b[1670] prind(q!4)
prind G:480 LG pal.b[6256] prind(k)
prine G:478 DEF palhdr.h[576] prine=
prine G:478 FN pal.b[6224] LET prine(e)=..
prine G:478 LG pal.b[1669] prine(ee)
prine G:478 LG pal.b[3095] f,n:=prine,b
prine G:478 LG pal.b[6253] prine(h1!j)
prine G:478 LLG pal.b[8361] set_v("PRINE",@prine)
prinj G:479 DEF palhdr.h[577] prinj=
prinj G:479 FN pal.b[6245] LET prinj(j)=..
prinj G:479 LG pal.b[1671] prinj(jj)
prinj G:479 LLG pal.b[8317] set_v("PRINJ",@prinj)
prink G:477 DEF palhdr.h[575] prink=
prink G:477 FN pal.b[6206] LET prink(f,p,n)=..
prink G:477 LLG pal.b[8366] d("PRINK",s_code3,@prink)
prinl G:474 DEF palhdr.h[572] prinl=
prinl G:474 FN pal.b[5907] LET prinl(l)=..
prinl G:474 LG pal.b[5915] prinl(h2!p)
prinl G:474 LLG pal.b[8326] set_v("PRINL",@prinl)
prinpars F:9 LF pal.b[5903] prinpars(print0,a,prinbv)
prinpars F:9 LF pal.b[5961] prinpars(print0,a,print)
prinpars F:9 LF pal.b[6052] prinpars(princlo,c)
prinpars F:9 RT pal.b[5613] LET prinpars(f,a,b)BE..
prinpoly F:17 LF pal.b[5794] prinpoly(h2!p,f,TRUE,FALSE)
prinpoly F:17 LF pal.b[5796] prinpoly(h1!p,FALSE,TRUE,FALSE)
prinpoly F:17 LF pal.b[5823] prinpoly(p2,f,FALSE,...)
prinpoly F:17 LF pal.b[5825] prinpoly(p2,f,TRUE,FALSE)
prinpoly F:17 LF pal.b[5826] prinpoly(p2,f,FALSE,FALSE)
prinpoly F:17 LF pal.b[5994] prinpoly(c,FALSE,...,FALSE)
prinpoly F:17 LF pal.b[5999] prinpoly(zu,FALSE,FALSE,FALSE)
prinpoly F:17 RT pal.b[5785] LET prinpoly(p,f,b,c)BE..
prins F:12 LF pal.b[6121] prins(h1!tyv(c))
prins F:12 LF pal.b[6130] prins(h1!tyv(c))
prins F:12 LF pal.b[6144] (b1->prins1,prins)(h1!s,32)
prins F:12 RT pal.b[5743] LET prins(s)BE..
prins1 F:13 LF pal.b[6004] prins1(c,34)
prins1 F:13 LF pal.b[6144] (b1->prins1,prins)(h1!s,32)
prins1 F:13 RT pal.b[5747] LET prins1(s,c)BE..
print G:475 DEF palhdr.h[573] print=
print G:475 FN pal.b[5952] LET print(a)=..
print G:475 LG pal.b[5922] RESULTIS print(l)
print G:475 LG pal.b[5961] prinpars(print0,a,print)
print G:475 LG pal.b[6226] print
print G:475 LG pal.b[6288] writef("*n*n%E%Y%E",printa,f,...)
print G:475 LG pal.b[6763] print(a)
print G:475 LG pal.b[7301] writef("*n# Ar' %P: %E*n",h1!c,print,a)
print G:475 LG pal.b[7311] writef("*n# Do' val %E*n",f,print,arg1)
print G:475 LLG pal.b[8357] set_v("PRINT",@print)
print0 F:23 LF pal.b[5903] prinpars(print0,a,prinbv)
print0 F:23 LF pal.b[5961] prinpars(print0,a,print)
print0 F:23 RT pal.b[5929] LET print0(p,f)BE..
printa G:476 DEF palhdr.h[574] printa=
printa G:476 FN pal.b[6194] LET printa(c)=..
printa G:476 LG pal.b[1633] printa(b)
printa G:476 LG pal.b[3774] writef("*n# Er' on: %E*n",printa,s)
printa G:476 LG pal.b[5423] printa(a)
printa G:476 LG pal.b[5460] writef("*n# +:'E) = %E*n",printa,a,...)
printa G:476 LG pal.b[5476] writef("*n# **:'E) = %E*n",printa,a,...)
printa G:476 LG pal.b[5494] writef("*n# /:'E) = %E*n",printa,a,...)
printa G:476 LG pal.b[5513] writef("*n# RE'E) = %E*n",printa,a,...)
printa G:476 LG pal.b[5528] writef("*n# Q:'%P : %P*n",printa,a,...)
printa G:476 LG pal.b[6265] printa
printa G:476 LG pal.b[6288] writef("*n*n%E%Y%E",printa,f,...)
printa G:476 LLG pal.b[8322] set_v("PRINTA",@printa)
prios F:13 FN pal.b[8025] LET prios(n,a,b,c)=..
prios F:13 LF pal.b[7983] p1:=prios(s_diadop,p1,p2,p3)
prios F:13 LF pal.b[7990] p1:=prios(s_relop,p1,p2,p3)
prios F:13 LF pal.b[8019] RESULTIS h2!linkword(s_glo,a,...)
prios F:13 LF pal.b[8265] set_z(!typ!s_seq,"<>",...,...)
prios1 F:12 FN pal.b[8022] LET prios1(n,a)=..
prios1 F:12 LF pal.b[8003] n:=prios1(n,p)
prios1 F:12 LF pal.b[8247] set_z(!a_qu,"qu",...,...)
prnum F:15 LF pal.b[5983] prnum(c)
prnum F:15 RT pal.b[5758] LET prnum(p)BE..
prs F:11 LF pal.b[5704] prs(x,wch)
prs F:11 LF pal.b[5744] prs(s,wch)
prs F:11 LF pal.b[5749] prs(s,wch1)
prs F:11 LF pal.b[5964] prs(a,wch)
prs F:11 RT pal.b[5733] LET prs(s,f)BE..
psetio G:743 DEF palhdr.h[872] psetio=
psetio G:743 LG pal.b[8961] setio,psetio:=psetio,t
psetio G:743 LG pal.b[9034] psetio()
psetio G:743 RT pal.b[9030] LET psetio()BE..
psetio G:743 SG pal.b[8961] setio,psetio:=psetio,t
pseudorempoly G:560 DEF palhdr.h[669] pseudorempoly=
pseudorempoly G:560 FN pal.b[7760] LET pseudorempoly(p,q)=..
pseudorempoly G:560 LG pal.b[5559] pseudorempoly
pseudorempoly G:560 LG pal.b[7887] pseudorempoly(p,q)
pseudorempoly G:560 SG pal.b[5560] pseudorempoly,ddpseu:=ddpseu|signbit,t|signbit
put G:519 DEF palhdr.h[623] put=
put G:519 FN pal.b[6629] LET put(n,v,e)=..
put G:519 LG pal.b[6631] msg1(16,put,e)
put G:519 LLG pal.b[8354] d("PUT",s_code3,@put)
put_index_record G:74 DEF libhdr.h[89] put_index_record=74
put_record G:72 DEF libhdr.h[87] put_record=72
putbyte G:268 DEF palhdr.h[336] putbyte=
putbyte G:268 LG pal.b[6870] putbyte(gg,c1,v!i)
putbyte G:268 LG pal.b[8084] putbyte(buffp+buffl-2,i,getbyte(...))
putbyte G:268 LG pal.b[8090] putbyte(n,i,getbyte(...))
putbyte G:268 LG pal.b[879] putbyte(s,p,v!p)
putbyte G:268 LG pal.b[880] putbyte(s,i,x)
putbyte G:268 LG pal.b[9333] putbyte(a,str1,rch())
putbyte G:268 LG pal.b[9334] putbyte(a,str1+1,ch)
putbyte G:268 LG pal.b[9337] putbyte(a,str1+1,0)
putbyte G:268 LG pal.b[9440] putbyte(gg,s2,s1)
putbyte G:268 RT pal.b[39] LET putbyte(s,i,byte)BE..
putword G:33 DEF libhdr.h[48] putword=33
putword G:548 DEF palhdr.h[656] putword=
putword G:548 FN pal.b[6326] LET putword(b)=..
putword G:548 LG pal.b[6332] msg1(13,putword)
q_endread G:295 DEF palhdr.h[367] q_endread=
q_endread G:295 LG pal.b[9223] q_endread(q_input)
q_endread G:295 LG pal.b[9367] q_endread(q_input)
q_endread G:295 RT pal.b[763] LET q_endread(s)BE..
q_endwrite G:296 DEF palhdr.h[368] q_endwrite=
q_endwrite G:296 RT pal.b[776] LET q_endwrite(s)BE..
q_input G:291 DEF palhdr.h[363] q_input=
q_input G:291 LG pal.b[3762] -q_input,-q_output
q_input G:291 LG pal.b[6589] s1,s2:=-q_input,-rch
q_input G:291 LG pal.b[6604] -q_input,-rch
q_input G:291 LG pal.b[747] UNLESS q_input=s|s=0 DO ..
q_input G:291 LG pal.b[748] UNLESS q_input=0 DO ..
q_input G:291 LG pal.b[764] TEST q_input=s THEN .. ELSE ..
q_input G:291 LG pal.b[771] UNLESS q_input=0 DO ..
q_input G:291 LG pal.b[772] selectinput(q_input)
q_input G:291 LG pal.b[9209] .. REPEATUNTIL q_input=0
q_input G:291 LG pal.b[9217] UNLESS q_input=0 DO ..
q_input G:291 LG pal.b[9223] q_endread(q_input)
q_input G:291 LG pal.b[9367] q_endread(q_input)
q_input G:291 LG pal.b[9453] IF q_input=0 DO ..
q_input G:291 SG pal.b[742] q_input:=0
q_input G:291 SG pal.b[750] q_input:=s
q_input G:291 SG pal.b[766] q_input:=0
q_output G:292 DEF palhdr.h[364] q_output=
q_output G:292 LG pal.b[1496] selectoutput(q_output)
q_output G:292 LG pal.b[3762] -q_input,-q_output
q_output G:292 LG pal.b[4258] selectoutput(q_output)
q_output G:292 LG pal.b[755] UNLESS q_output=s|s=0 DO ..
q_output G:292 LG pal.b[756] UNLESS chc=0|q_output=0 DO ..
q_output G:292 LG pal.b[778] TEST q_output=s THEN .. ELSE ..
q_output G:292 LG pal.b[784] UNLESS q_output=0 DO ..
q_output G:292 LG pal.b[785] selectoutput(q_output)
q_output G:292 SG pal.b[732] q_output:=0
q_output G:292 SG pal.b[758] q_output:=s
q_output G:292 SG pal.b[780] q_output:=0
q_selinput G:293 DEF palhdr.h[365] q_selinput=
q_selinput G:293 LG pal.b[2045] q_selinput(h2!c-y0)
q_selinput G:293 LG pal.b[3770] q_selinput(-q1)
q_selinput G:293 LG pal.b[5343] q_selinput(sysin)
q_selinput G:293 LG pal.b[6590] q_selinput(r-y0)
q_selinput G:293 LG pal.b[6593] q_selinput(-s1)
q_selinput G:293 LG pal.b[6605] q_selinput(s-y0)
q_selinput G:293 LG pal.b[6608] q_selinput(-s1)
q_selinput G:293 LG pal.b[743] q_selinput(sysin)
q_selinput G:293 RT pal.b[746] LET q_selinput(s)BE..
q_seloutput G:294 DEF palhdr.h[366] q_seloutput=
q_seloutput G:294 LG pal.b[1504] q_seloutput(sysout)
q_seloutput G:294 LG pal.b[2049] q_seloutput(h2!c-y0)
q_seloutput G:294 LG pal.b[3771] q_seloutput(-q2)
q_seloutput G:294 LG pal.b[739] q_seloutput(sysout)
q_seloutput G:294 RT pal.b[754] LET q_seloutput(s)BE..
randno G:34 DEF libhdr.h[49] randno=34
random G:269 DEF palhdr.h[339] random=
randseed G:127 DEF libhdr.h[143] randseed=127
rat G:539 DEF palhdr.h[645] rat=
rat G:539 FN pal.b[6779] LET rat(a)=..
rat G:539 LLG pal.b[8333] set_v("RATIONAL",@rat)
ratapprox G:493 DEF palhdr.h[594] ratapprox=
ratapprox G:493 LLG pal.b[8345] set_c("RATAPPROX",@ratapprox)
rbase G:303 DEF palhdr.h[375] rbase=
rbase G:303 FN pal.b[1311] LET rbase(base)=..
rbase G:303 LG pal.b[1305] rbase(10)
rbase G:303 LG pal.b[9401] s1:=rbase(s1)&p_addr
rbv G:464 DEF palhdr.h[561] rbv=
rbv G:464 FN pal.b[9718] LET rbv(s)=..
rbv G:464 LG pal.b[9524] rbv(s_relop+y0)
rbv G:464 LG pal.b[9736] d:=rbv(s)
rbv G:464 LG pal.b[9752] rbv(s)
rbv G:464 LG pal.b[9757] rbv(s)
rbvlist G:465 DEF palhdr.h[562] rbvlist=
rbvlist G:465 FN pal.b[9751] LET rbvlist(s)=..
rbvlist G:465 LG pal.b[9516] rbvlist(s_dot+y0)
rbvlist G:465 LG pal.b[9680] h2!d:=rbvlist(s_relop+y0)
rbvlist G:465 LG pal.b[9711] rbvlist(s)
rbvlist G:465 LG pal.b[9728] d:=rbvlist(s_rpar+y0)
rch G:299 DEF palhdr.h[371] rch=
rch G:299 LG pal.b[1303] rch()
rch G:299 LG pal.b[1304] rch()
rch G:299 LG pal.b[1316] rch()
rch G:299 LG pal.b[5610] rch()+y0
rch G:299 LG pal.b[6589] s1,s2:=-q_input,-rch
rch G:299 LG pal.b[6595] IF rch=rch1 DO ..
rch G:299 LG pal.b[6604] -q_input,-rch
rch G:299 LG pal.b[6610] IF rch=rch1 DO ..
rch G:299 LG pal.b[9090] r:=rch=rch1
rch G:299 LG pal.b[9198] IF rch=rch1 DO ..
rch G:299 LG pal.b[9202] IF rch=rch1 DO ..
rch G:299 LG pal.b[9204] rch()
rch G:299 LG pal.b[9263] rch()
rch G:299 LG pal.b[9266] rch()
rch G:299 LG pal.b[9280] s0,buffp!s0:=s0+1,rch()
rch G:299 LG pal.b[9309] rch()
rch G:299 LG pal.b[9315] rch()
rch G:299 LG pal.b[9333] putbyte(a,str1,rch())
rch G:299 LG pal.b[9344] rch()
rch G:299 LG pal.b[9374] rch()
rch G:299 LG pal.b[9389] s1:=rch()
rch G:299 LG pal.b[9393] rch()
rch G:299 LG pal.b[9404] s1:=rch()
rch G:299 LG pal.b[9426] rch()
rch G:299 LG pal.b[9428] rch()
rch G:299 LG pal.b[9442] rch()
rch G:299 LG pal.b[9444] rch()
rch G:299 SG pal.b[5344] rch:=rch1
rch G:299 SG pal.b[6591] rch:=rch0
rch G:299 SG pal.b[6594] rch:=-s2
rch G:299 SG pal.b[6606] rch:=rch0
rch G:299 SG pal.b[6609] rch:=-s2
rch G:299 SG pal.b[741] ch,rch:=endstreamch,rch0
rch G:299 SG pal.b[9091] rch:=b->rch1,rch0
rch0 G:300 DEF palhdr.h[372] rch0=
rch0 G:300 FN pal.b[788] LET rch0()=..
rch0 G:300 LG pal.b[6591] rch:=rch0
rch0 G:300 LG pal.b[6606] rch:=rch0
rch0 G:300 LG pal.b[741] ch,rch:=endstreamch,rch0
rch0 G:300 LG pal.b[795] rch0()
rch0 G:300 LG pal.b[9091] rch:=b->rch1,rch0
rch1 G:301 DEF palhdr.h[373] rch1=
rch1 G:301 FN pal.b[794] LET rch1()=..
rch1 G:301 LG pal.b[5344] rch:=rch1
rch1 G:301 LG pal.b[6595] IF rch=rch1 DO ..
rch1 G:301 LG pal.b[6610] IF rch=rch1 DO ..
rch1 G:301 LG pal.b[9090] r:=rch=rch1
rch1 G:301 LG pal.b[9091] rch:=b->rch1,rch0
rch1 G:301 LG pal.b[9198] IF rch=rch1 DO ..
rch1 G:301 LG pal.b[9202] IF rch=rch1 DO ..
rch1 G:301 LG pal.b[9219] rch1()
rdargs G:102 DEF libhdr.h[118] rdargs=102
rdargs G:102 DEF palhdr.h[30] rdargs=102
rdargs G:102 LG pal.b[8908] UNLESS rdargs("parms",argv,50) DO ..
rdch G:38 DEF libhdr.h[53] rdch=38
rdch G:38 DEF palhdr.h[20] rdch=38
rdch G:38 LG pal.b[751] ch:=rdch()
rdch G:38 LG pal.b[790] ch:=rdch()
rdch G:38 LG pal.b[804] rdch()
rdef G:462 DEF palhdr.h[559] rdef=
rdef G:462 LG pal.b[9488] rdef(y0,e1)
rdef G:462 LG pal.b[9593] rdef(y0,e2)
rdef G:462 LG pal.b[9676] rdef(y0,d)
rdef G:462 LG pal.b[9683] rdef(3+y0,d)
rdef G:462 LG pal.b[9692] rdef(y0,d)
rdef G:462 LG pal.b[9700] rdef(6+y0,d)
rdef G:462 RT pal.b[9672] LET rdef(n,d)BE..
rditem G:103 DEF libhdr.h[119] rditem=103
rds G:469 DEF palhdr.h[567] rds=
rds G:469 FN pal.b[5596] LET rds(s)=..
rds G:469 LLG pal.b[8242] typ!s_rds:=set_f("RDS",@rds)
rea G:471 DEF palhdr.h[569] rea=
rea G:471 FN pal.b[5610] LET rea()=..
rea G:471 LG pal.b[2046] arg1:=rea()
rea G:471 LLG pal.b[8308] d("READ",s_code0,@rea)
readblock G:274 DEF palhdr.h[346] readblock=
readn G:251 DEF palhdr.h[319] readn=
readn G:251 FN pal.b[1300] LET readn()=..
readn G:251 LG pal.b[9316] s2:=s2+readn()
readn G:83 DEF libhdr.h[98] readn=83
readrec G:215 DEF palhdr.h[277] readrec=
readsn G:304 DEF palhdr.h[376] readsn=
readsn G:304 FN pal.b[1328] LET readsn(p,i)=..
readsn G:304 LG pal.b[9073] readsn(p,j)
readsn G:304 LG pal.b[9108] readsn(p,j)&~3
readsn G:304 LG pal.b[9115] readsn(p,j)
readsn G:304 LG pal.b[9121] ssz:=readsn(p,j)
readsn G:304 LG pal.b[9125] ksq:=readsn(p,j)
readsn G:304 LG pal.b[9134] readsn(p,j)
readwords G:44 DEF libhdr.h[59] readwords=44
readx G:459 DEF palhdr.h[556] readx=
readx G:459 FN pal.b[9451] LET readx()=..
readx G:459 LG pal.b[5345] readx()
readx G:459 LG pal.b[6607] s:=readx()
readx G:459 LG pal.b[9201] readx()
readx G:459 LLG pal.b[8320] d("READX",s_code0,@readx)
rec G:570 DEF palhdr.h[680] rec=
rec G:570 FN pal.b[9790] LET rec(a,b)=..
rec G:570 LG pal.b[10111] e:=rec(a,e)
rec G:570 LG pal.b[10128] f:=rec(a,f)
rec G:570 LG pal.b[10136] f:=rec(a,f)
rec G:570 LG pal.b[10149] f:=rec(a,f)
rec G:570 LG pal.b[9518] e:=rec(e1,e2)
rec G:570 LG pal.b[9684] h3!d:=rec(h2!d,h3!d)
rec G:570 LLG pal.b[8256] typ!s_rec:=du("rec",s_code2,...,s_rec)
rec0 G:338 DEF palhdr.h[415] rec0=
rec0 G:338 LG pal.b[4374] rec0()
rec0 G:338 LG pal.b[4393] rec0()
rec0 G:338 RT pal.b[4403] LET rec0()BE..
rec1 G:339 DEF palhdr.h[416] rec1=
recip G:533 DEF palhdr.h[638] recip=
recip G:533 FN pal.b[6966] LET recip(p)=..
recip G:533 LG pal.b[5246] a:=recip(a)
recip G:533 LG pal.b[7007] recip(lcoef)
recordnote G:70 DEF libhdr.h[85] recordnote=70
recordpoint G:69 DEF libhdr.h[84] recordpoint=69
region G:325 DEF palhdr.h[398] region=
region G:325 LG pal.b[8075] writef("*n# Pa'K bytes*n",timeofday(),...,...)
region G:325 LG pal.b[8078] writef("# Ver'f region",loadpoint+4,...,...)
region G:325 SG pal.b[8074] region:=(stackend+pagesize&pagemask)-(loadpoint&pagemask)
renamefile G:77 DEF libhdr.h[92] renamefile=77
result2 G:10 DEF libhdr.h[25] result2=10
result2 G:10 DEF palhdr.h[17] result2=10
result2 G:10 LG pal.b[3152] result2<fvaru
result2 G:10 LG pal.b[4016] RESULTIS result2+y0
result2 G:10 LG pal.b[4017] TEST result2<0 THEN .. ELSE ..
result2 G:10 LG pal.b[4018] result2,c,sg:=-result2,-c,ysg
result2 G:10 LG pal.b[4020] RESULTIS getx(s_numj,z,...)+sg
result2 G:10 LG pal.b[4040] gw3:=gl2+result2
result2 G:10 LG pal.b[4045] gw2:=t+result2
result2 G:10 LG pal.b[4080] gw3:=gw3+result2
result2 G:10 LG pal.b[4089] gw2:=gw2+result2
result2 G:10 LG pal.b[4109] gw2:=gw2+result2
result2 G:10 LG pal.b[4120] gw3:=gw3+result2
result2 G:10 LG pal.b[4147] result2:=result2+bMODc
result2 G:10 LG pal.b[4148] IF result2>=c DO ..
result2 G:10 LG pal.b[4149] result2:=result2-c
result2 G:10 LG pal.b[4182] h2!n:=sdiv(result2,h2!n,gl1)
result2 G:10 LG pal.b[4183] h3!n:=sdiv(result2,h3!n,gl1)
result2 G:10 LG pal.b[4186] result2:=-result2
result2 G:10 LG pal.b[4891] IF result2=0 DO ..
result2 G:10 LG pal.b[4893] ga1:=igcd(b+ny0,result2)
result2 G:10 LG pal.b[4928] IF result2=y0 DO ..
result2 G:10 LG pal.b[5096] IF result2=y0 DO ..
result2 G:10 LG pal.b[5099] IF result2>0&!result2=s_poly&h3!result2=h3!b DO ..
result2 G:10 LG pal.b[5100] polygcd(b,result2)
result2 G:10 LG pal.b[5196] RESULTIS result2+y0
result2 G:10 LG pal.b[5207] RESULTIS result2
result2 G:10 LG pal.b[5224] RESULTIS result2
result2 G:10 LG pal.b[5484] result2,lcoef,ldeg
result2 G:10 LG pal.b[5510] IF result2=y0 DO ..
result2 G:10 LG pal.b[7099] RESULTIS igcd(n+ny0,result2)
result2 G:10 LG pal.b[7466] ga4:=result2
result2 G:10 LG pal.b[7469] RESULTIS ga4>result2
result2 G:10 SG pal.b[3237] result2:=gseqf&maxint
result2 G:10 SG pal.b[4018] result2,c,sg:=-result2,-c,ysg
result2 G:10 SG pal.b[4147] result2:=result2+bMODc
result2 G:10 SG pal.b[4149] result2:=result2-c
result2 G:10 SG pal.b[4166] result2:=0
result2 G:10 SG pal.b[4174] result2:=h2!nMODgl1
result2 G:10 SG pal.b[4177] result2:=h3!nMODgl1
result2 G:10 SG pal.b[4186] result2:=-result2
result2 G:10 SG pal.b[5492] result2,lcoef,ldeg:=d1,d2,d3
result2 G:10 SG pal.b[5495] result2,lcoef,ldeg:=d1,d2,d3
result2 G:10 SG pal.b[7743] lcoef,ldeg,result2:=q,h3!v,p
result2 G:10 SG pal.b[7754] lcoef,ldeg,result2:=q,h3!v,u
resumeco G:21 DEF libhdr.h[36] resumeco=21
retu G:580 DEF palhdr.h[690] retu=
retu G:580 FN pal.b[9820] LET retu(a)=..
retu G:580 LLG pal.b[8260] typ!s_retu:=dv("return",s_codev,...,...)
returncode G:11 DEF libhdr.h[26] returncode=11
rev G:515 DEF palhdr.h[619] rev=
rev G:515 FN pal.b[6562] LET rev(p)=..
rev G:515 LG pal.b[3311] rev(a)
rev G:515 LG pal.b[3599] b:=rev(b)
rev G:515 LG pal.b[381] 2!ae:=rev(h2!p)
rev G:515 LLG pal.b[8365] set_v("REV",@rev)
revd G:516 DEF palhdr.h[620] revd=
revd G:516 FN pal.b[6570] LET revd(p)=..
revd G:516 LG pal.b[9609] e:=revd(e)
revd G:516 LG pal.b[9703] h2!d,h3!d:=d2,revd(d3)
revf F:3 FN pal.b[3113] LET revf(c,d)=..
rewind G:223 DEF palhdr.h[288] rewind=
rewindstream G:65 DEF libhdr.h[80] rewindstream=65
rexp G:461 DEF palhdr.h[558] rexp=
rexp G:461 FN pal.b[9478] LET rexp(n)=..
rexp G:461 LG pal.b[9456] rexp(y0)
rexp G:461 LG pal.b[9473] -3!@n:=rexp
rexp G:461 LG pal.b[9491] h1!e1:=rexp(y1)
rexp G:461 LG pal.b[9495] e:=rexp(9+y0)
rexp G:461 LG pal.b[9498] e1:=rexp(9+y0)
rexp G:461 LG pal.b[9508] rexp(rprio)
rexp G:461 LG pal.b[9525] rexp(8+y0)
rexp G:461 LG pal.b[9528] e2:=rexp(8+y0)
rexp G:461 LG pal.b[9530] e3:=rexp(8+y0)
rexp G:461 LG pal.b[9543] e:=rexp(6+y0)
rexp G:461 LG pal.b[9560] e:=rexp(6+y0)
rexp G:461 LG pal.b[9569] rexp(rprio)
rexp G:461 LG pal.b[9572] e:=rexp(y0)
rexp G:461 LG pal.b[9601] e2:=rexp(n)
rexp G:461 LG pal.b[9607] e2:=rexp(8+y0)
rexp G:461 LG pal.b[9613] rexp(9+y0)
rexp G:461 LG pal.b[9615] e2:=rexp(9+y0)
rexp G:461 LG pal.b[9622] rexp(rprio)
rexp G:461 LG pal.b[9626] rexp(rprio)
rexp G:461 LG pal.b[9635] rexp(rprio)
rexp G:461 LG pal.b[9641] e2:=rexp(y0)
rexp G:461 LG pal.b[9649] rexp(rprio)
rexp G:461 LG pal.b[9710] RESULTIS rexp(n)
rexq G:460 DEF palhdr.h[557] rexq=
rexq G:460 FN pal.b[9472] LET rexq(n)=..
rexq G:460 LG pal.b[9532] e:=rexq(rprio)
rexq G:460 LG pal.b[9535] e4:=rexq(rprio)
rexq G:460 LG pal.b[9545] rexq(rprio)
rexq G:460 LG pal.b[9549] e2:=rexq(rprio)
rexq G:460 LG pal.b[9564] e1:=rexq(rprio)
rexq G:460 LG pal.b[9713] RESULTIS rexq(n)
rfndef G:463 DEF palhdr.h[560] rfndef=
rfndef G:463 FN pal.b[9708] LET rfndef(s,n)=..
rfndef G:463 LG pal.b[9513] e:=rfndef(s_dot+y0,y2)
rfndef G:463 LG pal.b[9517] rfndef(s_dot+y0,y2)
rfndef G:463 LG pal.b[9681] h3!d:=rfndef(s_relop+y0,y1)
rfndef G:463 LG pal.b[9714] n:=rfndef(s,n)
root G:440 DEF palhdr.h[534] root=
root G:440 LLG pal.b[6305] @root|signbit
root G:440 LLG pal.b[6317] @root|signbit
root G:440 LLG pal.b[6327] h1!b,@root|signbit
rootnode G:9 DEF libhdr.h[24] rootnode=9
rootnode G:9 DEF palhdr.h[16] rootnode=9
rootnode G:9 LG pal.b[8918] loadpoint:=rootnode!rtn_membase
rootnode G:9 LG pal.b[8919] endpoint:=loadpoint+rootnode!rtn_memsize
rootnodeaddr M:100 DEF libhdr.h[208] rootnodeaddr=100
rp G:458 DEF palhdr.h[555] rp=
rp G:458 FN pal.b[9196] LET rp()=..
rp G:458 LG pal.b[6592] rp()
rp G:458 LG pal.b[8984] rp()
rp G:458 LG pal.b[9224] longjump(flevel(rp),ll_sy)
rprio S:3 DEF pal.b[9190] rprio=0
rprio S:3 LL pal.b[9508] rexp(rprio)
rprio S:3 LL pal.b[9532] e:=rexq(rprio)
rprio S:3 LL pal.b[9534] UNLESS rprio=0 DO ..
rprio S:3 LL pal.b[9535] e4:=rexq(rprio)
rprio S:3 LL pal.b[9545] rexq(rprio)
rprio S:3 LL pal.b[9548] UNLESS rprio=0 DO ..
rprio S:3 LL pal.b[9549] e2:=rexq(rprio)
rprio S:3 LL pal.b[9564] e1:=rexq(rprio)
rprio S:3 LL pal.b[9569] rexp(rprio)
rprio S:3 LL pal.b[9622] rexp(rprio)
rprio S:3 LL pal.b[9626] rexp(rprio)
rprio S:3 LL pal.b[9635] rexp(rprio)
rprio S:3 LL pal.b[9649] rexp(rprio)
rprio S:3 SL pal.b[9361] lprio,rprio,sym:=getbyte(s1,13)+y0,getbyte(...)+y0,getbyte(s1,15)
rprio S:3 SL pal.b[9379] lprio,rprio,sym:=11+y0,11+y0,s_diadop
rprio S:3 SL pal.b[9501] mfn,rprio:=mqu,35+y0
rprio S:3 SL pal.b[9531] rprio:=ignore()
rprio S:3 SL pal.b[9533] rprio:=ignore1()
rprio S:3 SL pal.b[9544] rprio:=ignore()
rprio S:3 SL pal.b[9547] rprio:=ignore1()
rprio S:3 SL pal.b[9563] rprio:=ignore()
rs G:467 DEF palhdr.h[564] rs=
rs G:467 FN pal.b[9417] LET rs(gg)=..
rs G:467 LG pal.b[9382] s0:=rs(34)
rsym G:466 DEF palhdr.h[563] rsym=
rsym G:466 LG pal.b[9243] rsym(FALSE)
rsym G:466 LG pal.b[9253] rsym(FALSE)
rsym G:466 LG pal.b[9371] rsym(FALSE)
rsym G:466 LG pal.b[9373] rsym(TRUE)
rsym G:466 LG pal.b[9481] rsym(FALSE)
rsym G:466 LG pal.b[9512] rsym(FALSE)
rsym G:466 LG pal.b[9515] rsym(FALSE)
rsym G:466 LG pal.b[9523] rsym(FALSE)
rsym G:466 LG pal.b[9577] rsym(TRUE)
rsym G:466 LG pal.b[9584] rsym(FALSE)
rsym G:466 LG pal.b[9638] rsym(FALSE)
rsym G:466 LG pal.b[9654] rsym(TRUE)
rsym G:466 LG pal.b[9659] rsym(TRUE)
rsym G:466 LG pal.b[9666] rsym(FALSE)
rsym G:466 LG pal.b[9673] rsym(FALSE)
rsym G:466 LG pal.b[9678] rsym(FALSE)
rsym G:466 LG pal.b[9727] rsym(FALSE)
rsym G:466 LG pal.b[9735] rsym(FALSE)
rsym G:466 LG pal.b[9738] rsym(TRUE)
rsym G:466 LG pal.b[9742] rsym(FALSE)
rsym G:466 LG pal.b[9744] rsym(FALSE)
rsym G:466 LG pal.b[9756] rsym(FALSE)
rsym G:466 RT pal.b[9260] LET rsym(b)BE..
rtails F:6 LF pal.b[8536] rtails(i)
rtails F:6 LF pal.b[8545] rtails(i)
rtails F:6 RT pal.b[8574] LET rtails(i)BE..
rtails1 F:7 LF pal.b[8620] msg0(1,rtails1)
rtails1 F:7 LF pal.b[8624] rtails1(a,b0)
rtails1 F:7 LF pal.b[8804] rtails1(a,!s2)
rtails1 F:7 LF pal.b[8830] rtails1(a,t2)
rtails1 F:7 LF pal.b[8883] rtails1(a,b)
rtails1 F:7 RT pal.b[8590] LET rtails1(a,b)BE..
rtime G:399 DEF palhdr.h[488] rtime=
rtime G:399 LG pal.b[4248] rtime:=rtime+time()-t
rtime G:399 LG pal.b[4254] writef("%M# %' %V+%V s",s,...,rtime)
rtime G:399 LG pal.b[6756] writef("*n*n# T'V+%V s*n*n",a,...,rtime)
rtime G:399 SG pal.b[4248] rtime:=rtime+time()-t
rtime G:399 SG pal.b[8056] rtime:=0
rtn_abortcode M:27 DEF libhdr.h[244] rtn_abortcode=
rtn_adjclock M:33 DEF libhdr.h[262] rtn_adjclock=
rtn_blib M:19 DEF libhdr.h[233] rtn_blib=
rtn_blklist M:4 DEF libhdr.h[215] rtn_blklist=
rtn_boot M:17 DEF libhdr.h[231] rtn_boot=
rtn_boottrace M:39 DEF libhdr.h[277] rtn_boottrace=
rtn_bptaddr M:9 DEF libhdr.h[222] rtn_bptaddr=
rtn_bptinstr M:10 DEF libhdr.h[223] rtn_bptinstr=
rtn_clkintson M:6 DEF libhdr.h[218] rtn_clkintson=
rtn_clwkq M:12 DEF libhdr.h[226] rtn_clwkq=
rtn_context M:28 DEF libhdr.h[245] rtn_context=
rtn_crntask M:3 DEF libhdr.h[214] rtn_crntask=
rtn_days M:40 DEF libhdr.h[280] rtn_days=
rtn_dbgvars M:11 DEF libhdr.h[224] rtn_dbgvars=
rtn_dcountv M:34 DEF libhdr.h[264] rtn_dcountv=
rtn_devtab M:1 DEF libhdr.h[212] rtn_devtab=
rtn_dumpflag M:25 DEF libhdr.h[241] rtn_dumpflag=
rtn_envlist M:26 DEF libhdr.h[242] rtn_envlist=
rtn_hdrsvar M:37 DEF libhdr.h[273] rtn_hdrsvar=
rtn_idletcb M:32 DEF libhdr.h[261] rtn_idletcb=
rtn_info M:15 DEF libhdr.h[229] rtn_info=
rtn_insadebug M:8 DEF libhdr.h[220] rtn_insadebug=
rtn_intflag M:24 DEF libhdr.h[240] rtn_intflag=
rtn_keyboard M:20 DEF libhdr.h[234] rtn_keyboard=
rtn_klib M:18 DEF libhdr.h[232] rtn_klib=
rtn_lastch M:7 DEF libhdr.h[219] rtn_lastch=
rtn_lastg M:30 DEF libhdr.h[254] rtn_lastg=
rtn_lastp M:29 DEF libhdr.h[253] rtn_lastp=
rtn_lastst M:31 DEF libhdr.h[255] rtn_lastst=
rtn_mc0 M:42 DEF libhdr.h[283] rtn_mc0=
rtn_mc1 M:43 DEF libhdr.h[285] rtn_mc1=
rtn_mc2 M:44 DEF libhdr.h[286] rtn_mc2=
rtn_mc3 M:45 DEF libhdr.h[287] rtn_mc3=
rtn_membase M:13 DEF libhdr.h[227] rtn_membase=
rtn_membase M:13 DEF palhdr.h[6] rtn_membase=13
rtn_membase M:13 MAN pal.b[8918] loadpoint:=rootnode!rtn_membase
rtn_memsize M:14 DEF libhdr.h[228] rtn_memsize=
rtn_memsize M:14 DEF palhdr.h[7] rtn_memsize=
rtn_memsize M:14 MAN pal.b[8919] endpoint:=loadpoint+rootnode!rtn_memsize
rtn_msecs M:41 DEF libhdr.h[281] rtn_msecs=
rtn_pathvar M:36 DEF libhdr.h[271] rtn_pathvar=
rtn_rootvar M:35 DEF libhdr.h[269] rtn_rootvar=
rtn_screen M:21 DEF libhdr.h[235] rtn_screen=
rtn_scriptsvar M:38 DEF libhdr.h[275] rtn_scriptsvar=
rtn_sys M:16 DEF libhdr.h[230] rtn_sys=
rtn_tallyv M:5 DEF libhdr.h[216] rtn_tallyv=
rtn_tasktab M:0 DEF libhdr.h[211] rtn_tasktab=0
rtn_tcblist M:2 DEF libhdr.h[213] rtn_tcblist=
rtn_upb M:50 DEF libhdr.h[289] rtn_upb=50
rtn_vecstatsv M:22 DEF libhdr.h[237] rtn_vecstatsv=
rtn_vecstatsvupb M:23 DEF libhdr.h[238] rtn_vecstatsvupb=
rvv G:497 DEF palhdr.h[599] rvv=
rvv G:497 FN pal.b[6430] LET rvv(p)=..
rvv G:497 LG pal.b[6362] v!i:=rvv(h2!a1)
rvv G:497 LG pal.b[6550] h3!t:=rvv(h2!t)
rx F:44 LAB pal.b[9348] rx:s1:=h2!s0
rx F:44 LF pal.b[9298] GOTO rx
s0 F:4 FN pal.b[7975] LET s0(s)=..
s0 F:4 LF pal.b[7981] s:=s0(s)
s0 F:4 LF pal.b[7988] s:=s0(s)
s0 F:4 LF pal.b[7995] s:=s0(s)
s0 F:4 LF pal.b[8001] s:=s0(s)
s0 F:4 LF pal.b[8008] s:=s0(s)
s0 F:4 LF pal.b[8013] s0(s)
s0 F:4 LF pal.b[8018] s0(s)
s0 F:4 LF pal.b[8044] s0(s)
s0 F:4 LF pal.b[8050] s:=s0(s)
s0 S:1 DEF pal.b[5583] s0=0
s0 S:1 LL pal.b[5708] writef(s0,s1)
s0 S:1 LL pal.b[5726] writes(s0)
s0 S:1 LL pal.b[5880] wch(getbyte(s0,i))
s0 S:1 LL pal.b[6139] b:=b>(s0&63)+y0
s0 S:1 LL pal.b[6142] s0>63|s0<6
s0 S:1 SL pal.b[5621] s0,s1:=zero,0
s0 S:1 SL pal.b[5626] s0:="NIL"
s0 S:1 SL pal.b[5629] s0:="TRUE"
s0 S:1 SL pal.b[5650] s0:="#unset#"
s0 S:1 SL pal.b[5660] s0,s1:="#%Nrat#",h3!x
s0 S:1 SL pal.b[5665] s0:="#stream#"
s0 S:1 SL pal.b[5676] s0,s1:="%A",h2!x
s0 S:1 SL pal.b[5679] s0,s1:="#%N-tuple#",h3!x-y0
s0 S:1 SL pal.b[5682] s0,s1:="#%N-xtuple#",h3!x-y0
s0 S:1 SL pal.b[5684] s0,s1:="#poly%N#",h3!x-y0
s0 S:1 SL pal.b[5687] s0,s1:="#term%N#",h3!x-y0
s0 S:1 SL pal.b[5690] s0,s1:="#hcode(%P)#",h3!x
s0 S:1 SL pal.b[5692] s0:="#codez(%P)#"
s0 S:1 SL pal.b[5694] s0:="#code(%P)#"
s0 S:1 SL pal.b[5707] s0,s1:="#G%N",h2!x-y0
s0 S:1 SL pal.b[5715] s0:="#fn#"
s0 S:1 SL pal.b[5718] s0:="#jfn#"
s0 S:1 SL pal.b[5721] s0:="#kfn#"
s0 S:1 SL pal.b[5723] s0:="#env#"
s0 S:1 SL pal.b[5725] s0:="#jval#"
s0 S:1 SL pal.b[5875] s0:=i-@ll_zc+ocm
s0 S:1 SL pal.b[6138] s0:=getbyte(s,12)&127
s0 S:4 DEF pal.b[9191] s0=0
s0 S:4 LL pal.b[9278] IF s0=buffl DO ..
s0 S:4 LL pal.b[9280] s0,buffp!s0:=s0+1,rch()
s0 S:4 LL pal.b[9283] TEST s0>0 THEN .. ELSE ..
s0 S:4 LL pal.b[9285] !buffp:=s0
s0 S:4 LL pal.b[9287] IF alphc&h1!s0=z DO ..
s0 S:4 LL pal.b[9293] k2,k3:=h2!s0,h3!s0
s0 S:4 LL pal.b[9294] h2!s0,h3!s0:=k2&lwc,k3&lwc
s0 S:4 LL pal.b[9295] s1:=findword(s0)
s0 S:4 LL pal.b[9299] h2!s0,h3!s0:=k2,k3
s0 S:4 LL pal.b[9301] s0:=name(s0)
s0 S:4 LL pal.b[9306] IF s0>numwi DO ..
s0 S:4 LL pal.b[9326] TEST s0>numwi THEN .. ELSE ..
s0 S:4 LL pal.b[9327] !buffp:=s0
s0 S:4 LL pal.b[9336] TEST s0=0 THEN .. ELSE ..
s0 S:4 LL pal.b[9339] IF s0=0 DO ..
s0 S:4 LL pal.b[9348] s1:=h2!s0
s0 S:4 LL pal.b[9377] s1:=s0
s0 S:4 LL pal.b[9421] UNTIL ch=s0 DO ..
s0 S:4 LL pal.b[9582] e:=s0
s0 S:4 LL pal.b[9655] e2,e:=e,s0
s0 S:4 LL pal.b[9664] e2:=s0
s0 S:4 LL pal.b[9739] d:=s0
s0 S:4 SL pal.b[9269] s0,s1:=0,0
s0 S:4 SL pal.b[9280] s0,buffp!s0:=s0+1,rch()
s0 S:4 SL pal.b[9286] s0:=string(buffp)
s0 S:4 SL pal.b[9297] s0:=s1
s0 S:4 SL pal.b[9301] s0:=name(s0)
s0 S:4 SL pal.b[9322] sym,s0:=s_flt,getx(s_flt,0,...)
s0 S:4 SL pal.b[9328] s0:=number(buffp)
s0 S:4 SL pal.b[9329] s0:=s1+y0
s0 S:4 SL pal.b[9335] s0:=findword(a)
s0 S:4 SL pal.b[9338] s0:=findword(a)
s0 S:4 SL pal.b[9350] s0:=s1
s0 S:4 SL pal.b[9382] s0:=rs(34)
s0 S:4 SL pal.b[9386] s0:=h2!s1
s0 S:4 SL pal.b[9412] sym,s0:=s_num,s1+y0
s0 S:4 SL pal.b[9419] s0,gg:=gg,@gg|signbit
s1 S:2 DEF pal.b[5584] s1=0
s1 S:2 LL pal.b[5661] IF s1<0 DO ..
s1 S:2 LL pal.b[5662] s1:=s1-y0
s1 S:2 LL pal.b[5708] writef(s0,s1)
s1 S:2 SL pal.b[5621] s0,s1:=zero,0
s1 S:2 SL pal.b[5660] s0,s1:="#%Nrat#",h3!x
s1 S:2 SL pal.b[5662] s1:=s1-y0
s1 S:2 SL pal.b[5676] s0,s1:="%A",h2!x
s1 S:2 SL pal.b[5679] s0,s1:="#%N-tuple#",h3!x-y0
s1 S:2 SL pal.b[5682] s0,s1:="#%N-xtuple#",h3!x-y0
s1 S:2 SL pal.b[5684] s0,s1:="#poly%N#",h3!x-y0
s1 S:2 SL pal.b[5687] s0,s1:="#term%N#",h3!x-y0
s1 S:2 SL pal.b[5690] s0,s1:="#hcode(%P)#",h3!x
s1 S:2 SL pal.b[5695] s1:=h2!x
s1 S:2 SL pal.b[5707] s0,s1:="#G%N",h2!x-y0
s1 S:5 DEF pal.b[9192] s1=0
s1 S:5 LL pal.b[9276] s1:=s1*10+ch-48
s1 S:5 LL pal.b[9296] IF s1~=0&h3!h2!s1<0 DO ..
s1 S:5 LL pal.b[9297] s0:=s1
s1 S:5 LL pal.b[9308] s1,s2:=Op26,0
s1 S:5 LL pal.b[9313] s1:=s1#*#1e1#+(Op26)
s1 S:5 LL pal.b[9319] s1:=s1#*#1e1
s1 S:5 LL pal.b[9321] s1:=s1#/#1e1
s1 S:5 LL pal.b[9322] sym,s0:=s_flt,getx(s_flt,0,...)
s1 S:5 LL pal.b[9329] s0:=s1+y0
s1 S:5 LL pal.b[9350] s0:=s1
s1 S:5 LL pal.b[9352] IF h3!s1>=0 DO ..
s1 S:5 LL pal.b[9355] mfn:=h2!s1
s1 S:5 LL pal.b[9361] lprio,rprio,sym:=getbyte(s1,13)+y0,getbyte(...)+y0,getbyte(s1,15)
s1 S:5 LL pal.b[9375] s1:=mqu(s1)
s1 S:5 LL pal.b[9386] s0:=h2!s1
s1 S:5 LL pal.b[9390] SWITCHON s1 INTO..
s1 S:5 LL pal.b[9401] s1:=rbase(s1)&p_addr
s1 S:5 LL pal.b[9412] sym,s0:=s_num,s1+y0
s1 S:5 LL pal.b[9440] putbyte(gg,s2,s1)
s1 S:5 LL pal.b[9568] mfn,s1
s1 S:5 LL pal.b[9621] mfn,s1
s1 S:5 LL pal.b[9625] mfn,s1
s1 S:5 LL pal.b[9634] mfn,s1
s1 S:5 SL pal.b[9269] s0,s1:=0,0
s1 S:5 SL pal.b[9276] s1:=s1*10+ch-48
s1 S:5 SL pal.b[9295] s1:=findword(s0)
s1 S:5 SL pal.b[9308] s1,s2:=Op26,0
s1 S:5 SL pal.b[9313] s1:=s1#*#1e1#+(Op26)
s1 S:5 SL pal.b[9319] s1:=s1#*#1e1
s1 S:5 SL pal.b[9321] s1:=s1#/#1e1
s1 S:5 SL pal.b[9348] s1:=h2!s0
s1 S:5 SL pal.b[9375] s1:=mqu(s1)
s1 S:5 SL pal.b[9377] s1:=s0
s1 S:5 SL pal.b[9389] s1:=rch()
s1 S:5 SL pal.b[9396] s1:=2
s1 S:5 SL pal.b[9398] s1:=8
s1 S:5 SL pal.b[9400] s1:=16
s1 S:5 SL pal.b[9401] s1:=rbase(s1)&p_addr
s1 S:5 SL pal.b[9404] s1:=rch()
s1 S:5 SL pal.b[9406] s1:=10
s1 S:5 SL pal.b[9408] s1:=32
s1 S:5 SL pal.b[9410] s1:=endstreamch
s1 S:5 SL pal.b[9424] s1:=ch
s1 S:5 SL pal.b[9431] s1:=10
s1 S:5 SL pal.b[9433] s1:=32
s1 S:5 SL pal.b[9435] s1:=endstreamch
s1 S:5 SL pal.b[9436] s1:=ch
s2 S:6 DEF pal.b[9193] s2=0
s2 S:6 LL pal.b[9312] s2:=s2-1
s2 S:6 LL pal.b[9316] s2:=s2+readn()
s2 S:6 LL pal.b[9317] TEST s2>0 THEN .. ELSE ..
s2 S:6 LL pal.b[9318] UNTIL s2=0 DO ..
s2 S:6 LL pal.b[9319] s2:=s2-1
s2 S:6 LL pal.b[9320] UNTIL s2=0 DO ..
s2 S:6 LL pal.b[9321] s2:=s2+1
s2 S:6 LL pal.b[9438] IF s2>str2 DO ..
s2 S:6 LL pal.b[9440] putbyte(gg,s2,s1)
s2 S:6 LL pal.b[9441] s2:=s2+1
s2 S:6 SL pal.b[9308] s1,s2:=Op26,0
s2 S:6 SL pal.b[9312] s2:=s2-1
s2 S:6 SL pal.b[9316] s2:=s2+readn()
s2 S:6 SL pal.b[9319] s2:=s2-1
s2 S:6 SL pal.b[9321] s2:=s2+1
s2 S:6 SL pal.b[9420] s2:=maxint
s2 S:6 SL pal.b[9439] s2,h1!gg,gg:=str1,getx(s_string,...),h1!gg
s2 S:6 SL pal.b[9441] s2:=s2+1
s_a1a M:68 DEF palhdr.h[134] s_a1a=68
s_a1a M:68 MAN pal.b[1799] CASE s_a1a:.. 
s_a1a M:68 MAN pal.b[3200] CASE s_a1a:.. 
s_a1a M:68 MAN pal.b[3369] CASE s_a1a:.. 
s_a1a M:68 MAN pal.b[6161] CASE s_a1a:.. 
s_a1a M:68 MAN pal.b[9983] sg:=s_a1a
s_a1e M:70 DEF palhdr.h[136] s_a1e=70
s_a1e M:70 MAN pal.b[1825] CASE s_a1e:.. 
s_a1e M:70 MAN pal.b[3458] CASE s_a1e:.. 
s_a1e M:70 MAN pal.b[6163] CASE s_a1e:.. 
s_a1e M:70 MAN pal.b[9022] fff!s_a1e:=ff_a1e
s_a1e M:70 MAN pal.b[9997] sg:=s_a1e
s_a2a M:74 DEF palhdr.h[140] s_a2a=74
s_a2a M:74 MAN pal.b[1839] CASE s_a2a:.. 
s_a2a M:74 MAN pal.b[3202] CASE s_a2a:.. 
s_a2a M:74 MAN pal.b[3371] CASE s_a2a:.. 
s_a2a M:74 MAN pal.b[6134] CASE s_a2a:.. 
s_a2a M:74 MAN pal.b[9936] sg:=s_a2a
s_a2e M:76 DEF palhdr.h[142] s_a2e=76
s_a2e M:76 MAN pal.b[10004] sg:=s_a2e
s_a2e M:76 MAN pal.b[1856] CASE s_a2e:.. 
s_a2e M:76 MAN pal.b[3196] CASE s_a2e:.. 
s_a2e M:76 MAN pal.b[3483] CASE s_a2e:.. 
s_a2e M:76 MAN pal.b[6136] CASE s_a2e:.. 
s_a2e M:76 MAN pal.b[9026] fff!s_a2e:=ff_a2e
s_a2e M:76 MAN pal.b[9928] sg:=s_a2e
s_aa M:62 DEF palhdr.h[127] s_aa=62
s_aa M:62 MAN pal.b[1809] CASE s_aa:.. 
s_aa M:62 MAN pal.b[2955] CASE s_aa:.. 
s_aa M:62 MAN pal.b[3625] CASE s_aa:.. 
s_aa M:62 MAN pal.b[3653] CASE s_aa:.. 
s_aa M:62 MAN pal.b[6126] CASE s_aa:.. 
s_aa M:62 MAN pal.b[7143] CASE s_aa:.. 
s_aa M:62 MAN pal.b[7190] CASE s_aa:.. 
s_aa M:62 MAN pal.b[8268] typ!s_aa:=dv("@",s_codev,...,...)
s_aa M:62 MAN pal.b[9023] fff!s_aa:=ff_a1e
s_aa M:62 MAN pal.b[9504] CASE s_aa:.. 
s_aa M:62 MAN pal.b[9645] CASE s_aa:.. 
s_aa M:62 MAN pal.b[9733] CASE s_aa:.. 
s_aa M:62 MAN pal.b[9849] get4(s_aa,0,a,lvv)
s_aa M:62 MAN pal.b[9882] CASE s_aa:.. 
s_aa1 M:67 DEF palhdr.h[133] s_aa1=67
s_aa1 M:67 MAN pal.b[1796] CASE s_aa1:.. 
s_aa1 M:67 MAN pal.b[3199] CASE s_aa1:.. 
s_aa1 M:67 MAN pal.b[3368] CASE s_aa1:.. 
s_aa1 M:67 MAN pal.b[6160] CASE s_aa1:.. 
s_aa1 M:67 MAN pal.b[9984] sg:=s_aa1
s_aa2 M:73 DEF palhdr.h[139] s_aa2=73
s_aa2 M:73 MAN pal.b[1817] CASE s_aa2:.. 
s_aa2 M:73 MAN pal.b[3201] CASE s_aa2:.. 
s_aa2 M:73 MAN pal.b[3370] CASE s_aa2:.. 
s_aa2 M:73 MAN pal.b[6133] CASE s_aa2:.. 
s_aa2 M:73 MAN pal.b[9937] sg:=s_aa2
s_aaa M:77 DEF palhdr.h[143] s_aaa=77
s_aaa M:77 MAN pal.b[1874] CASE s_aaa:.. 
s_aaa M:77 MAN pal.b[3203] CASE s_aaa:.. 
s_aaa M:77 MAN pal.b[3372] CASE s_aaa:.. 
s_aaa M:77 MAN pal.b[6166] CASE s_aaa:.. 
s_aaa M:77 MAN pal.b[9945] sg:=s_aaa
s_aclos M:43 DEF palhdr.h[106] s_aclos=43
s_aclos M:43 MAN pal.b[10015] sg:=s_aclos
s_aclos M:43 MAN pal.b[1754] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[2204] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[3145] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[3330] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[3410] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[374] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[394] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[5711] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[6047] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[7276] CASE s_aclos:.. 
s_aclos M:43 MAN pal.b[9916] CASE s_aclos:.. 
s_aea M:78 DEF palhdr.h[144] s_aea=78
s_aea M:78 MAN pal.b[1866] CASE s_aea:.. 
s_aea M:78 MAN pal.b[3204] CASE s_aea:.. 
s_aea M:78 MAN pal.b[3373] CASE s_aea:.. 
s_aea M:78 MAN pal.b[6167] CASE s_aea:.. 
s_aea M:78 MAN pal.b[9944] sg:=s_aea
s_and M:136 DEF palhdr.h[209] s_and=136
s_and M:136 MAN pal.b[8364] set_p("and",s_and)
s_and M:136 MAN pal.b[9696] CASE s_and:.. 
s_and M:136 MAN pal.b[9702] .. REPEATWHILE sym=s_and
s_ap1 M:69 DEF palhdr.h[135] s_ap1=69
s_ap1 M:69 MAN pal.b[1810] CASE s_ap1:.. 
s_ap1 M:69 MAN pal.b[3457] CASE s_ap1:.. 
s_ap1 M:69 MAN pal.b[6162] CASE s_ap1:.. 
s_ap1 M:69 MAN pal.b[9998] sg:=s_ap1
s_ap2 M:75 DEF palhdr.h[141] s_ap2=75
s_ap2 M:75 MAN pal.b[10005] sg:=s_ap2
s_ap2 M:75 MAN pal.b[1821] CASE s_ap2:.. 
s_ap2 M:75 MAN pal.b[3195] CASE s_ap2:.. 
s_ap2 M:75 MAN pal.b[3482] CASE s_ap2:.. 
s_ap2 M:75 MAN pal.b[6135] CASE s_ap2:.. 
s_ap2 M:75 MAN pal.b[9929] sg:=s_ap2
s_apple M:66 DEF palhdr.h[132] s_apple=66
s_apple M:66 MAN pal.b[1787] CASE s_apple:.. 
s_apple M:66 MAN pal.b[3198] CASE s_apple:.. 
s_apple M:66 MAN pal.b[3367] CASE s_apple:.. 
s_apple M:66 MAN pal.b[6159] CASE s_apple:.. 
s_apple M:66 MAN pal.b[9969] sg:=s_apple
s_apply M:65 DEF palhdr.h[131] s_apply=65
s_apply M:65 MAN pal.b[1783] CASE s_apply:.. 
s_apply M:65 MAN pal.b[3197] CASE s_apply:.. 
s_apply M:65 MAN pal.b[3366] CASE s_apply:.. 
s_apply M:65 MAN pal.b[6158] CASE s_apply:.. 
s_apply M:65 MAN pal.b[8271] FOR i=s_apply TO s_aqe DO..
s_apply M:65 MAN pal.b[9970] sg:=s_apply
s_apq M:79 DEF palhdr.h[145] s_apq=79
s_apq M:79 MAN pal.b[1879] CASE s_apq:.. 
s_apq M:79 MAN pal.b[3205] CASE s_apq:.. 
s_apq M:79 MAN pal.b[3374] CASE s_apq:.. 
s_apq M:79 MAN pal.b[6168] CASE s_apq:.. 
s_apq M:79 MAN pal.b[9960] sg:=s_apq
s_apv M:71 DEF palhdr.h[137] s_apv=71
s_apv M:71 MAN pal.b[10182] WHILE a>0&h3!a=null&(!a=s_apv|!a=s_ave) DO ..
s_apv M:71 MAN pal.b[1814] CASE s_apv:.. 
s_apv M:71 MAN pal.b[3463] CASE s_apv:.. 
s_apv M:71 MAN pal.b[6164] CASE s_apv:.. 
s_apv M:71 MAN pal.b[9991] sg:=s_apv
s_apz M:64 DEF palhdr.h[130] s_apz=64
s_apz M:64 MAN pal.b[1780] CASE s_apz:.. 
s_apz M:64 MAN pal.b[6157] CASE s_apz:.. 
s_apz M:64 MAN pal.b[8270] typ!s_apz:=set_c("AP",@ap1)
s_apz M:64 MAN pal.b[8271] typ!i:=typ!s_apz
s_apz M:64 MAN pal.b[8450] fff!s_apz:=0
s_apz M:64 MAN pal.b[9909] h3!a:=get4(s_apz,a,b,...)
s_aqe M:80 DEF palhdr.h[146] s_aqe=80
s_aqe M:80 MAN pal.b[1882] CASE s_aqe:.. 
s_aqe M:80 MAN pal.b[3206] CASE s_aqe:.. 
s_aqe M:80 MAN pal.b[3375] CASE s_aqe:.. 
s_aqe M:80 MAN pal.b[6169] CASE s_aqe:.. 
s_aqe M:80 MAN pal.b[8271] FOR i=s_apply TO s_aqe DO..
s_aqe M:80 MAN pal.b[9959] sg:=s_aqe
s_ave M:72 DEF palhdr.h[138] s_ave=72
s_ave M:72 MAN pal.b[10182] WHILE a>0&h3!a=null&(!a=s_apv|!a=s_ave) DO ..
s_ave M:72 MAN pal.b[1831] CASE s_ave:.. 
s_ave M:72 MAN pal.b[3464] CASE s_ave:.. 
s_ave M:72 MAN pal.b[6165] CASE s_ave:.. 
s_ave M:72 MAN pal.b[9024] fff!s_ave:=ff_ave
s_ave M:72 MAN pal.b[9990] sg:=s_ave
s_bcplf M:15 DEF palhdr.h[76] s_bcplf=15
s_bcplf M:15 MAN pal.b[2053] CASE s_bcplf:.. 
s_bcplf M:15 MAN pal.b[4672] CASE s_bcplf:.. 
s_bcplf M:15 MAN pal.b[5673] CASE s_bcplf:.. 
s_bcplf M:15 MAN pal.b[6663] RESULTIS get4(s_bcplf,0,...,...)
s_bcplf M:15 MAN pal.b[6710] CASE s_bcplf:.. 
s_bcplf M:15 MAN pal.b[7377] CASE s_bcplf:.. 
s_bcplf M:15 MAN pal.b[8037] d(s,s_bcplf,f)
s_bcplf M:15 MAN pal.b[8237] typ!s_bcplf:=set_v("BCPLF",@bcplf)
s_bcplr M:16 DEF palhdr.h[77] s_bcplr=16
s_bcplr M:16 MAN pal.b[2057] CASE s_bcplr:.. 
s_bcplr M:16 MAN pal.b[4673] CASE s_bcplr:.. 
s_bcplr M:16 MAN pal.b[5674] CASE s_bcplr:.. 
s_bcplr M:16 MAN pal.b[6668] RESULTIS get4(s_bcplr,0,...,...)
s_bcplr M:16 MAN pal.b[6711] CASE s_bcplr:.. 
s_bcplr M:16 MAN pal.b[7378] CASE s_bcplr:.. 
s_bcplr M:16 MAN pal.b[8040] d(s,s_bcplr,f)
s_bcplr M:16 MAN pal.b[8238] typ!s_bcplr:=set_v("BCPLR",@bcplr)
s_bcplv M:17 DEF palhdr.h[78] s_bcplv=17
s_bcplv M:17 MAN pal.b[2062] CASE s_bcplv:.. 
s_bcplv M:17 MAN pal.b[4674] CASE s_bcplv:.. 
s_bcplv M:17 MAN pal.b[5675] CASE s_bcplv:.. 
s_bcplv M:17 MAN pal.b[6673] RESULTIS get4(s_bcplv,0,...,...)
s_bcplv M:17 MAN pal.b[6712] CASE s_bcplv:.. 
s_bcplv M:17 MAN pal.b[7379] CASE s_bcplv:.. 
s_bcplv M:17 MAN pal.b[8239] typ!s_bcplv:=set_v("BCPLV",@bcplv)
s_bcplv M:17 MAN pal.b[8318] d("INPUT",s_bcplv,@input)
s_bcplv M:17 MAN pal.b[8324] d("OUTPUT",s_bcplv,@output)
s_by M:148 DEF palhdr.h[221] s_by=148
s_by M:148 MAN pal.b[8297] set_p("by",s_by)
s_by M:148 MAN pal.b[9529] IF sym=s_by DO ..
s_cd M:14 DEF palhdr.h[74] s_cd=14
s_cd M:14 MAN pal.b[1718] CASE s_cd:.. 
s_cd M:14 MAN pal.b[3270] CASE s_cd:.. 
s_cd M:14 MAN pal.b[3281] c:=get4(s_cd,c,zsy,ll)
s_cd M:14 MAN pal.b[3282] c:=get4(s_cd,c,...,ll_glz)
s_cd M:14 MAN pal.b[3321] c:=get4(s_cd,c,n,l)
s_cd M:14 MAN pal.b[3325] c:=get4(s_cd,c,n,l)
s_cd M:14 MAN pal.b[3335] c:=get4(s_cd,c,z,ll_st)
s_cd M:14 MAN pal.b[3341] c:=get4(s_cd,c,z,ll_st)
s_cd M:14 MAN pal.b[3342] c:=get4(s_cd,c,...,ll_rec1)
s_cd M:14 MAN pal.b[3349] c:=get4(s_cd,c,z,ll_st)
s_cd M:14 MAN pal.b[3350] c:=get4(s_cd,c,...,ll_dash)
s_cd M:14 MAN pal.b[3356] c:=get4(s_cd,c,z,ll_st)
s_cd M:14 MAN pal.b[3357] c:=get4(s_cd,c,z,ll_rsc)
s_cd M:14 MAN pal.b[3362] c:=get4(s_cd,c,...,ll_bind)
s_cd M:14 MAN pal.b[3363] c:=get4(s_cd,c,z,ll_svc)
s_cd M:14 MAN pal.b[3392] c:=get4(s_cd,c,v,ll)
s_cd M:14 MAN pal.b[3403] c:=get4(s_cd,c,v,ll)
s_cd M:14 MAN pal.b[3438] c:=get4(s_cd,c,v,l)
s_cd M:14 MAN pal.b[3439] c:=get4(s_cd,c,...,ll)
s_cd M:14 MAN pal.b[3451] c:=get4(s_cd,c,z,ll)
s_cd M:14 MAN pal.b[3459] c:=get4(s_cd,c,z,ll_st)
s_cd M:14 MAN pal.b[3460] c:=get4(s_cd,c,...,ll_ap1)
s_cd M:14 MAN pal.b[3465] c:=get4(s_cd,c,z,ll_st)
s_cd M:14 MAN pal.b[3478] c:=get4(s_cd,c,a3,ll)
s_cd M:14 MAN pal.b[3507] c:=get4(s_cd,c,a3,ll)
s_cd M:14 MAN pal.b[3517] c:=get4(s_cd,c,z,ll_st)
s_cd M:14 MAN pal.b[3524] get4(s_cd,zsy,zsy,ll_cond)
s_cd M:14 MAN pal.b[3546] RESULTIS get4(s_cd,c,a,ll)
s_cd M:14 MAN pal.b[3558] RESULTIS get4(s_cd,c,z,ll_st)
s_cd M:14 MAN pal.b[3566] RESULTIS get4(s_cd,t1,t2,ll_cond)
s_cd M:14 MAN pal.b[3570] RESULTIS get4(s_cd,t1,...,...)
s_cd M:14 MAN pal.b[3603] c:=get4(s_cd,c,...,ll)
s_cd M:14 MAN pal.b[3610] c:=get4(s_cd,c,z,ll_bvf1)
s_cd M:14 MAN pal.b[3615] c:=get4(s_cd,c,z,ll_bvfz)
s_cd M:14 MAN pal.b[3619] c:=get4(s_cd,c,b2,ll_bvfe)
s_cd M:14 MAN pal.b[3621] c:=get4(s_cd,c,z,ll_bvf)
s_cd M:14 MAN pal.b[3624] RESULTIS get4(s_cd,c,z,ll_bvfa)
s_cd M:14 MAN pal.b[3629] RESULTIS get4(s_cd,c,...,ll)
s_cd M:14 MAN pal.b[3633] RESULTIS get4(s_cd,c,b,ll_binde)
s_cd M:14 MAN pal.b[5694] CASE s_cd:.. 
s_cd M:14 MAN pal.b[5853] !kk:=s_cd
s_cd M:14 MAN pal.b[5861] UNLESS a0=s_cd DO ..
s_cd M:14 MAN pal.b[5882] TEST a2>0&(!a2=s_cd|!a2<0) THEN .. ELSE ..
s_cd M:14 MAN pal.b[6042] CASE s_cd:.. 
s_cd M:14 MAN pal.b[8217] zc:=get4(s_cd,z,z,ll_zc)
s_cd M:14 MAN pal.b[8235] FOR i=s_cdy TO s_cd DO..
s_cdx M:11 DEF palhdr.h[71] s_cdx=11
s_cdx M:11 MAN pal.b[2022] CASE s_cdx:.. 
s_cdx M:11 MAN pal.b[3161] ll:=s_cdx
s_cdx M:11 MAN pal.b[3408] CASE s_cdx:.. 
s_cdx M:11 MAN pal.b[5689] CASE s_cdx:.. 
s_cdx M:11 MAN pal.b[6037] CASE s_cdx:.. 
s_cdx M:11 MAN pal.b[8234] typ!s_cdx:=set_v("FLATTEN",@flatten)
s_cdx M:11 MAN pal.b[8236] typ!i:=typ!s_cdx
s_cdx M:11 MAN pal.b[9914] CASE s_cdx:.. 
s_cdy M:12 DEF palhdr.h[72] s_cdy=12
s_cdy M:12 MAN pal.b[2028] CASE s_cdy:.. 
s_cdy M:12 MAN pal.b[3160] ll:=s_cdy
s_cdy M:12 MAN pal.b[3395] CASE s_cdy:.. 
s_cdy M:12 MAN pal.b[5690] CASE s_cdy:.. 
s_cdy M:12 MAN pal.b[6038] CASE s_cdy:.. 
s_cdy M:12 MAN pal.b[8235] FOR i=s_cdy TO s_cd DO..
s_cdy M:12 MAN pal.b[9911] CASE s_cdy:.. 
s_cdz M:13 DEF palhdr.h[73] s_cdz=13
s_cdz M:13 MAN pal.b[2034] CASE s_cdz:.. 
s_cdz M:13 MAN pal.b[3156] ll:=s_cdz
s_cdz M:13 MAN pal.b[3385] CASE s_cdz:.. 
s_cdz M:13 MAN pal.b[3672] TEST !v=s_cdz THEN .. ELSE ..
s_cdz M:13 MAN pal.b[5692] CASE s_cdz:.. 
s_cdz M:13 MAN pal.b[6034] CASE s_cdz:.. 
s_clos M:42 DEF palhdr.h[105] s_clos=42
s_clos M:42 MAN pal.b[10013] sg:=s_clos
s_clos M:42 MAN pal.b[1753] CASE s_clos:.. 
s_clos M:42 MAN pal.b[2199] CASE s_clos:.. 
s_clos M:42 MAN pal.b[3144] CASE s_clos:.. 
s_clos M:42 MAN pal.b[3329] CASE s_clos:.. 
s_clos M:42 MAN pal.b[373] CASE s_clos:.. 
s_clos M:42 MAN pal.b[407] CASE s_clos:.. 
s_clos M:42 MAN pal.b[5710] CASE s_clos:.. 
s_clos M:42 MAN pal.b[6046] CASE s_clos:.. 
s_clos M:42 MAN pal.b[6810] IF s_clos<=!a&!a<=s_kclos DO ..
s_clos M:42 MAN pal.b[7140] w:=get4(s_clos,e,z,w)
s_clos M:42 MAN pal.b[7187] w:=get4(s_clos,e,z,w)
s_clos M:42 MAN pal.b[7275] CASE s_clos:.. 
s_clos M:42 MAN pal.b[8254] FOR i=s_clos TO s_fclos DO..
s_clos M:42 MAN pal.b[9016] FOR i=s_clos TO s_fclos DO..
s_clos2 M:44 DEF palhdr.h[107] s_clos2=44
s_clos2 M:44 MAN pal.b[10018] sg:=s_clos2
s_clos2 M:44 MAN pal.b[1755] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[2211] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[3146] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[3331] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[3416] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[378] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[395] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[5712] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[6048] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[7277] CASE s_clos2:.. 
s_clos2 M:44 MAN pal.b[9933] CASE s_clos2:.. 
s_code0 M:21 DEF palhdr.h[80] s_code0=21
s_code0 M:21 MAN pal.b[2070] CASE s_code0:.. 
s_code0 M:21 MAN pal.b[4676] CASE s_code0:.. 
s_code0 M:21 MAN pal.b[5668] CASE s_code0:.. 
s_code0 M:21 MAN pal.b[6657] s:=s_code0+s
s_code0 M:21 MAN pal.b[6705] CASE s_code0:.. 
s_code0 M:21 MAN pal.b[7381] CASE s_code0:.. 
s_code0 M:21 MAN pal.b[8241] FOR i=s_code0 TO s_code4 DO..
s_code0 M:21 MAN pal.b[8241] typ!i:=typ!s_code0
s_code0 M:21 MAN pal.b[8244] typ!s_gensy:=d("GENSYM",s_code0,@gensym)
s_code0 M:21 MAN pal.b[8308] d("READ",s_code0,@rea)
s_code0 M:21 MAN pal.b[8320] d("READX",s_code0,@readx)
s_code1 M:22 DEF palhdr.h[81] s_code1=22
s_code1 M:22 MAN pal.b[2071] CASE s_code1:.. 
s_code1 M:22 MAN pal.b[4677] CASE s_code1:.. 
s_code1 M:22 MAN pal.b[5669] CASE s_code1:.. 
s_code1 M:22 MAN pal.b[6706] CASE s_code1:.. 
s_code1 M:22 MAN pal.b[7382] CASE s_code1:.. 
s_code1 M:22 MAN pal.b[8028] d(s,s_code1,f)
s_code1 M:22 MAN pal.b[9920] CASE s_code1:.. 
s_code2 M:23 DEF palhdr.h[82] s_code2=23
s_code2 M:23 MAN pal.b[2075] CASE s_code2:.. 
s_code2 M:23 MAN pal.b[3413] CASE s_code2:.. 
s_code2 M:23 MAN pal.b[4678] CASE s_code2:.. 
s_code2 M:23 MAN pal.b[5670] CASE s_code2:.. 
s_code2 M:23 MAN pal.b[6707] CASE s_code2:.. 
s_code2 M:23 MAN pal.b[7383] CASE s_code2:.. 
s_code2 M:23 MAN pal.b[7973] get4(s_code2,0,...,...)
s_code2 M:23 MAN pal.b[8034] d(s,s_code2,f)
s_code2 M:23 MAN pal.b[8253] a_fclos:=du("lambda",s_code2,...,s_fclos)
s_code2 M:23 MAN pal.b[8256] typ!s_rec:=du("rec",s_code2,...,s_rec)
s_code2 M:23 MAN pal.b[8266] typ!s_colon:=du(":",s_code2,...,s_colon)
s_code2 M:23 MAN pal.b[9922] CASE s_code2:.. 
s_code3 M:24 DEF palhdr.h[83] s_code3=24
s_code3 M:24 MAN pal.b[2083] CASE s_code3:.. 
s_code3 M:24 MAN pal.b[4679] CASE s_code3:.. 
s_code3 M:24 MAN pal.b[5671] CASE s_code3:.. 
s_code3 M:24 MAN pal.b[6708] CASE s_code3:.. 
s_code3 M:24 MAN pal.b[7384] CASE s_code3:.. 
s_code3 M:24 MAN pal.b[8258] typ!s_let:=du("let",s_code3,...,s_let)
s_code3 M:24 MAN pal.b[8261] typ!s_cond:=du("->",s_code3,...,s_cond)
s_code3 M:24 MAN pal.b[8335] d("TRAP",s_code3,@trap)
s_code3 M:24 MAN pal.b[8354] d("PUT",s_code3,@put)
s_code3 M:24 MAN pal.b[8366] d("PRINK",s_code3,@prink)
s_code4 M:25 DEF palhdr.h[84] s_code4=25
s_code4 M:25 MAN pal.b[2089] CASE s_code4:.. 
s_code4 M:25 MAN pal.b[4680] CASE s_code4:.. 
s_code4 M:25 MAN pal.b[5672] CASE s_code4:.. 
s_code4 M:25 MAN pal.b[6656] s:=s_code4
s_code4 M:25 MAN pal.b[6709] CASE s_code4:.. 
s_code4 M:25 MAN pal.b[7385] CASE s_code4:.. 
s_code4 M:25 MAN pal.b[8241] FOR i=s_code0 TO s_code4 DO..
s_codev M:20 DEF palhdr.h[79] s_codev=20
s_codev M:20 MAN pal.b[2067] CASE s_codev:.. 
s_codev M:20 MAN pal.b[4675] CASE s_codev:.. 
s_codev M:20 MAN pal.b[5667] CASE s_codev:.. 
s_codev M:20 MAN pal.b[6704] CASE s_codev:.. 
s_codev M:20 MAN pal.b[7380] CASE s_codev:.. 
s_codev M:20 MAN pal.b[8031] d(s,s_codev,f)
s_codev M:20 MAN pal.b[8240] typ!s_codev:=set_v("CODE",@code)
s_codev M:20 MAN pal.b[8246] a_qu:=dv("'",s_codev,...,...)
s_codev M:20 MAN pal.b[8260] typ!s_retu:=dv("return",s_codev,...,...)
s_codev M:20 MAN pal.b[8268] typ!s_aa:=dv("@",s_codev,...,...)
s_codev M:20 MAN pal.b[8269] typ!s_zz:=dv("!",s_codev,...,...)
s_codev M:20 MAN pal.b[8289] dv("~",s_codev,...,...)
s_codev M:20 MAN pal.b[8383] dv("$",s_codev,...,...)
s_codev M:20 MAN pal.b[9918] CASE s_codev:.. 
s_colon M:59 DEF palhdr.h[124] s_colon=59
s_colon M:59 MAN pal.b[10156] WHILE b1>0&!b1=s_colon DO ..
s_colon M:59 MAN pal.b[10160] RESULTIS get4(s_colon,a,b,b1)
s_colon M:59 MAN pal.b[10167] WHILE f2>0&!f2=s_colon DO ..
s_colon M:59 MAN pal.b[10174] e:=get4(s_colon,h1!f,e,...)
s_colon M:59 MAN pal.b[10187] WHILE b2>0&!b2=s_colon DO ..
s_colon M:59 MAN pal.b[10189] WHILE c2>0&!c2=s_colon DO ..
s_colon M:59 MAN pal.b[10202] a:=get4(s_colon,h1!b,a,...)
s_colon M:59 MAN pal.b[10205] a:=get4(s_colon,h1!c,a,...)
s_colon M:59 MAN pal.b[10216] h2!b:=get4(s_colon,a,...,0)
s_colon M:59 MAN pal.b[10218] b:=get4(s_colon,a,b,0)
s_colon M:59 MAN pal.b[10293] CASE s_colon:.. 
s_colon M:59 MAN pal.b[1930] CASE s_colon:.. 
s_colon M:59 MAN pal.b[1937] .. REPEATWHILE c>0&!c=s_colon
s_colon M:59 MAN pal.b[6026] CASE s_colon:.. 
s_colon M:59 MAN pal.b[8266] typ!s_colon:=du(":",s_code2,...,s_colon)
s_colon M:59 MAN pal.b[9598] CASE s_colon:.. 
s_cond M:54 DEF palhdr.h[118] s_cond=54
s_cond M:54 MAN pal.b[10199] sg:=s_cond
s_cond M:54 MAN pal.b[10256] h2!a:=get4(s_cond,h2!a,b,c)
s_cond M:54 MAN pal.b[10264] h2!b:=get4(s_cond,a,...,c)
s_cond M:54 MAN pal.b[10267] h2!c:=get4(s_cond,a,b,...)
s_cond M:54 MAN pal.b[10269] a:=get4(s_cond,a,b,c)
s_cond M:54 MAN pal.b[10286] CASE s_cond:.. 
s_cond M:54 MAN pal.b[1897] CASE s_cond:.. 
s_cond M:54 MAN pal.b[3207] CASE s_cond:.. 
s_cond M:54 MAN pal.b[3520] CASE s_cond:.. 
s_cond M:54 MAN pal.b[6086] CASE s_cond:.. 
s_cond M:54 MAN pal.b[8261] typ!s_cond:=du("->",s_code3,...,s_cond)
s_cond M:54 MAN pal.b[8262] typ!i:=typ!s_cond
s_cond M:54 MAN pal.b[9495] CASE s_cond:.. 
s_cond M:54 MAN pal.b[9611] CASE s_cond:.. 
s_conda M:55 DEF palhdr.h[119] s_conda=55
s_conda M:55 MAN pal.b[10198] sg:=s_conda
s_conda M:55 MAN pal.b[10287] CASE s_conda:.. 
s_conda M:55 MAN pal.b[1900] CASE s_conda:.. 
s_conda M:55 MAN pal.b[3208] CASE s_conda:.. 
s_conda M:55 MAN pal.b[3521] CASE s_conda:.. 
s_conda M:55 MAN pal.b[6087] CASE s_conda:.. 
s_conda M:55 MAN pal.b[8262] FOR i=s_conda TO s_condb DO..
s_condb M:56 DEF palhdr.h[120] s_condb=56
s_condb M:56 MAN pal.b[10197] sg:=s_condb
s_condb M:56 MAN pal.b[10288] CASE s_condb:.. 
s_condb M:56 MAN pal.b[1901] CASE s_condb:.. 
s_condb M:56 MAN pal.b[3209] CASE s_condb:.. 
s_condb M:56 MAN pal.b[3522] CASE s_condb:.. 
s_condb M:56 MAN pal.b[6088] CASE s_condb:.. 
s_condb M:56 MAN pal.b[8262] FOR i=s_conda TO s_condb DO..
s_condb M:56 MAN pal.b[9019] fff!s_condb:=ff_condb
s_dash M:61 DEF palhdr.h[126] s_dash=61
s_dash M:61 MAN pal.b[1762] CASE s_dash:.. 
s_dash M:61 MAN pal.b[2958] CASE s_dash:.. 
s_dash M:61 MAN pal.b[3348] CASE s_dash:.. 
s_dash M:61 MAN pal.b[3632] CASE s_dash:.. 
s_dash M:61 MAN pal.b[3658] CASE s_dash:.. 
s_dash M:61 MAN pal.b[6176] CASE s_dash:.. 
s_dash M:61 MAN pal.b[7153] CASE s_dash:.. 
s_dash M:61 MAN pal.b[7200] CASE s_dash:.. 
s_dash M:61 MAN pal.b[8267] typ!s_dash:=set_v("DF",@mdash)
s_dash M:61 MAN pal.b[9021] fff!s_dash:=ff_dash
s_dash M:61 MAN pal.b[9262] sym:=s_dash
s_dash M:61 MAN pal.b[9501] CASE s_dash:.. 
s_dash M:61 MAN pal.b[9638] CASE s_dash:.. 
s_dash M:61 MAN pal.b[9639] .. REPEATWHILE sym=s_dash
s_dash M:61 MAN pal.b[9743] WHILE sym=s_dash DO ..
s_dash M:61 MAN pal.b[9775] IF a>0&...=s_name|!a=s_gensy|!a=s_dash DO ..
s_dash M:61 MAN pal.b[9833] IF !a=s_dash DO ..
s_dash M:61 MAN pal.b[9836] RESULTIS get4(s_dash,a,n,difr)
s_diadop M:131 DEF palhdr.h[204] s_diadop=131
s_diadop M:131 MAN pal.b[7983] p1:=prios(s_diadop,p1,p2,p3)
s_diadop M:131 MAN pal.b[8265] set_z(!typ!s_seq,"<>",...,...)
s_diadop M:131 MAN pal.b[8371] set_q("|",mk_logor,s_diadop,...)
s_diadop M:131 MAN pal.b[8372] set_q("&",mk_logand,s_diadop,...)
s_diadop M:131 MAN pal.b[9379] lprio,rprio,sym:=11+y0,11+y0,s_diadop
s_diadop M:131 MAN pal.b[9567] CASE s_diadop:.. 
s_diadop M:131 MAN pal.b[9631] CASE s_diadop:.. 
s_dlr M:147 DEF palhdr.h[220] s_dlr=147
s_dlr M:147 MAN pal.b[8383] dv("$",s_codev,...,...)
s_dlr M:147 MAN pal.b[9507] CASE s_dlr:.. 
s_dlr M:147 MAN pal.b[9648] CASE s_dlr:.. 
s_dlr M:147 MAN pal.b[9731] CASE s_dlr:.. 
s_do M:127 DEF palhdr.h[200] s_do=127
s_do M:127 MAN pal.b[8293] set_p("do",s_do)
s_do M:127 MAN pal.b[9239] TEST sym=s_do THEN .. ELSE ..
s_dot M:142 DEF palhdr.h[215] s_dot=142
s_dot M:142 MAN pal.b[8379] set_p(".",s_dot)
s_dot M:142 MAN pal.b[9372] TEST sym=s_dot THEN .. ELSE ..
s_dot M:142 MAN pal.b[9513] e:=rfndef(s_dot+y0,y2)
s_dot M:142 MAN pal.b[9516] rbvlist(s_dot+y0)
s_dot M:142 MAN pal.b[9517] rfndef(s_dot+y0,y2)
s_dot M:142 MAN pal.b[9575] CASE s_dot:.. 
s_dot M:142 MAN pal.b[9657] CASE s_dot:.. 
s_dot M:142 MAN pal.b[9738] CASE s_dot:.. 
s_e M:41 DEF palhdr.h[104] s_e=41
s_e M:41 MAN pal.b[1742] CASE s_e:.. 
s_e M:41 MAN pal.b[1761] e:=get4(s_e,e,zsy,...)
s_e M:41 MAN pal.b[1765] e:=get4(s_e,e,zsy,...)
s_e M:41 MAN pal.b[1805] e:=get4(s_e,h1!c,arg1,...)
s_e M:41 MAN pal.b[1850] e:=get4(s_e,h1!c,a2,...)
s_e M:41 MAN pal.b[1851] e:=get4(s_e,e,arg1,...)
s_e M:41 MAN pal.b[1926] e:=get4(s_e,e,arg1,...)
s_e M:41 MAN pal.b[1934] get4(s_e,ze,zsy,z)
s_e M:41 MAN pal.b[1936] e:=get4(s_e,e,a,...)
s_e M:41 MAN pal.b[2036] e:=get4(s_e,ze,arg1,...)
s_e M:41 MAN pal.b[2189] UNLESS c1>0&!c1=s_e DO ..
s_e M:41 MAN pal.b[2194] CASE s_e:.. 
s_e M:41 MAN pal.b[2207] e:=get4(s_e,h1!c,arg1,...)
s_e M:41 MAN pal.b[2306] e:=get4(s_e,h1!c,arg1,...)
s_e M:41 MAN pal.b[2346] e:=get4(s_e,h1!c,v,...)
s_e M:41 MAN pal.b[2347] e:=get4(s_e,e,arg1,...)
s_e M:41 MAN pal.b[2536] e:=get4(s_e,e,arg1,...)
s_e M:41 MAN pal.b[2551] e:=get4(s_e,e,...,...)
s_e M:41 MAN pal.b[2571] e:=get4(s_e,e,...,...)
s_e M:41 MAN pal.b[2578] e:=get4(s_e,e,arg1,...)
s_e M:41 MAN pal.b[2586] e:=get4(s_e,t,v,...)
s_e M:41 MAN pal.b[2587] e:=get4(s_e,e,arg1,...)
s_e M:41 MAN pal.b[2728] e:=get4(s_e,e,zsy,...)
s_e M:41 MAN pal.b[2813] e:=get4(s_e,ze,arg1,...)
s_e M:41 MAN pal.b[2821] e:=get4(s_e,ze,arg1,...)
s_e M:41 MAN pal.b[2828] e:=get4(s_e,ze,arg1,...)
s_e M:41 MAN pal.b[2973] e:=get4(s_e,e,zsy,...)
s_e M:41 MAN pal.b[3049] e:=get4(s_e,e,zsy,...)
s_e M:41 MAN pal.b[3288] IF !g=s_e DO ..
s_e M:41 MAN pal.b[3513] CASE s_e:.. 
s_e M:41 MAN pal.b[5723] CASE s_e:.. 
s_e M:41 MAN pal.b[6114] CASE s_e:.. 
s_e M:41 MAN pal.b[6225] IF e>0&!e=s_e DO ..
s_e M:41 MAN pal.b[6620] e:=g_np(e,s_e)
s_e M:41 MAN pal.b[6630] UNLESS e>=yloc&g_np(e,s_e)~=z DO ..
s_e M:41 MAN pal.b[6633] h1!e:=get4(s_e,h1!e,v,n)
s_e M:41 MAN pal.b[7153] RESULTIS get4(s_e,k,w,v)
s_e M:41 MAN pal.b[7200] k:=get4(s_e,k,w,v)
s_e M:41 MAN pal.b[7228] k:=get4(s_e,k,...,...)
s_e M:41 MAN pal.b[8218] ze:=get4(s_e,z,z,z)
s_e M:41 MAN pal.b[8252] typ!s_e:=ze
s_e M:41 MAN pal.b[9015] fff!s_e:=ff_e
s_e M:41 MAN pal.b[9207] IF v>0&!v=s_e DO ..
s_eclos M:45 DEF palhdr.h[108] s_eclos=45
s_eclos M:45 MAN pal.b[10019] sg:=s_eclos
s_eclos M:45 MAN pal.b[1756] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[2212] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[3147] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[3332] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[3417] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[379] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[396] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[5713] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[6049] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[7278] CASE s_eclos:.. 
s_eclos M:45 MAN pal.b[9941] CASE s_eclos:.. 
s_else M:130 DEF palhdr.h[203] s_else=130
s_else M:130 MAN pal.b[8296] set_p("else",s_else)
s_else M:130 MAN pal.b[9251] UNLESS sym=s_else DO ..
s_fclos M:46 DEF palhdr.h[109] s_fclos=46
s_fclos M:46 MAN pal.b[10020] sg:=s_fclos
s_fclos M:46 MAN pal.b[1757] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[2224] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[3148] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[3333] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[3422] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[397] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[5714] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[6050] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[7279] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[8253] a_fclos:=du("lambda",s_code2,...,s_fclos)
s_fclos M:46 MAN pal.b[8254] FOR i=s_clos TO s_fclos DO..
s_fclos M:46 MAN pal.b[9016] FOR i=s_clos TO s_fclos DO..
s_fclos M:46 MAN pal.b[9511] CASE s_fclos:.. 
s_fclos M:46 MAN pal.b[9949] CASE s_fclos:.. 
s_fin M:143 DEF palhdr.h[216] s_fin=143
s_fin M:143 MAN pal.b[8310] set_p("fin",s_fin)
s_fin M:143 MAN pal.b[9341] sym:=s_fin
s_fin M:143 MAN pal.b[9367] CASE s_fin:.. 
s_flt M:2 DEF palhdr.h[60] s_flt=2
s_flt M:2 MAN pal.b[1413] CASE s_flt:.. 
s_flt M:2 MAN pal.b[179] CASE s_flt:.. 
s_flt M:2 MAN pal.b[180] RESULTIS getx(s_flt,0,...,0)
s_flt M:2 MAN pal.b[3179] CASE s_flt:.. 
s_flt M:2 MAN pal.b[320] CASE s_flt:.. 
s_flt M:2 MAN pal.b[321] RESULTIS getx(s_flt,0,...,0)
s_flt M:2 MAN pal.b[3258] CASE s_flt:.. 
s_flt M:2 MAN pal.b[341] UNLESS s_flt<=p0&p0<=s_poly DO ..
s_flt M:2 MAN pal.b[409] CASE s_flt:.. 
s_flt M:2 MAN pal.b[448] CASE s_flt:.. 
s_flt M:2 MAN pal.b[4661] CASE s_flt:.. 
s_flt M:2 MAN pal.b[4750] CASE s_flt:.. 
s_flt M:2 MAN pal.b[4750] RESULTIS getx(s_flt,0,...,0)
s_flt M:2 MAN pal.b[486] CASE s_flt:.. 
s_flt M:2 MAN pal.b[516] CASE s_flt:.. 
s_flt M:2 MAN pal.b[5170] CASE s_flt:.. 
s_flt M:2 MAN pal.b[5172] RESULTIS getx(s_flt,0,...,0)
s_flt M:2 MAN pal.b[518] RESULTIS s_flt
s_flt M:2 MAN pal.b[5214] CASE s_flt:.. 
s_flt M:2 MAN pal.b[546] CASE s_flt:.. 
s_flt M:2 MAN pal.b[5652] CASE s_flt:.. 
s_flt M:2 MAN pal.b[569] CASE s_flt:.. 
s_flt M:2 MAN pal.b[611] CASE s_flt:.. 
s_flt M:2 MAN pal.b[635] CASE s_flt:.. 
s_flt M:2 MAN pal.b[643] RESULTIS s_flt
s_flt M:2 MAN pal.b[649] RESULTIS s_flt
s_flt M:2 MAN pal.b[650] CASE s_flt:.. 
s_flt M:2 MAN pal.b[651] RESULTIS s_flt
s_flt M:2 MAN pal.b[6703] CASE s_flt:.. 
s_flt M:2 MAN pal.b[676] CASE s_flt:.. 
s_flt M:2 MAN pal.b[6941] CASE s_flt:.. 
s_flt M:2 MAN pal.b[6941] RESULTIS getx(s_flt,0,...,0)
s_flt M:2 MAN pal.b[6959] CASE s_flt:.. 
s_flt M:2 MAN pal.b[7009] CASE s_flt:.. 
s_flt M:2 MAN pal.b[7011] RESULTIS getx(s_flt,0,...,0)
s_flt M:2 MAN pal.b[7047] CASE s_flt:.. 
s_flt M:2 MAN pal.b[7066] RESULTIS getx(s_flt,0,...,0)
s_flt M:2 MAN pal.b[7071] CASE s_flt:.. 
s_flt M:2 MAN pal.b[7074] RESULTIS getx(s_flt,0,...,0)
s_flt M:2 MAN pal.b[7371] CASE s_flt:.. 
s_flt M:2 MAN pal.b[7481] CASE s_flt:.. 
s_flt M:2 MAN pal.b[7929] CASE s_flt:.. 
s_flt M:2 MAN pal.b[8230] FOR i=s_flt TO s_ratl DO..
s_flt M:2 MAN pal.b[9322] sym,s0:=s_flt,getx(s_flt,0,...)
s_flt M:2 MAN pal.b[9580] CASE s_flt:.. 
s_flt M:2 MAN pal.b[9662] CASE s_flt:.. 
s_for M:126 DEF palhdr.h[199] s_for=126
s_for M:126 MAN pal.b[8303] set_p("for",s_for)
s_for M:126 MAN pal.b[9523] CASE s_for:.. 
s_fpl M:3 DEF palhdr.h[61] s_fpl=3
s_fpl M:3 MAN pal.b[1414] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[182] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[3180] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[323] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[3259] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[410] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[450] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[4665] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[4751] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[487] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[511] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[5173] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[5215] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[547] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[5656] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[570] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[612] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[652] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[661] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[671] RESULTIS s_fpl
s_fpl M:3 MAN pal.b[683] RESULTIS s_fpl
s_fpl M:3 MAN pal.b[6934] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[6954] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[6986] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[7048] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[7072] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[7372] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[7482] CASE s_fpl:.. 
s_fpl M:3 MAN pal.b[7932] CASE s_fpl:.. 
s_gensy M:31 DEF palhdr.h[92] s_gensy=31
s_gensy M:31 MAN pal.b[1729] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[3127] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[3186] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[3285] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[3630] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[3656] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[4649] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[5706] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[6887] RESULTIS get4(s_gensy,0,gensymn,0)
s_gensy M:31 MAN pal.b[6890] get4(s_gensy,0,n,0)
s_gensy M:31 MAN pal.b[7151] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[7198] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[7268] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[7362] CASE s_gensy:.. 
s_gensy M:31 MAN pal.b[8244] typ!s_gensy:=d("GENSYM",s_code0,@gensym)
s_gensy M:31 MAN pal.b[9012] FOR i=s_gensy TO s_name DO..
s_gensy M:31 MAN pal.b[9775] IF a>0&...=s_name|!a=s_gensy|!a=s_dash DO ..
s_glg M:34 DEF palhdr.h[95] s_glg=34
s_glg M:34 MAN pal.b[1724] CASE s_glg:.. 
s_glg M:34 MAN pal.b[2016] CASE s_glg:.. 
s_glg M:34 MAN pal.b[3135] CASE s_glg:.. 
s_glg M:34 MAN pal.b[3189] CASE s_glg:.. 
s_glg M:34 MAN pal.b[3254] CASE s_glg:.. 
s_glg M:34 MAN pal.b[4652] CASE s_glg:.. 
s_glg M:34 MAN pal.b[5700] CASE s_glg:.. 
s_glg M:34 MAN pal.b[6006] CASE s_glg:.. 
s_glg M:34 MAN pal.b[6899] RESULTIS get4(s_glg,n,v,z)
s_glg M:34 MAN pal.b[7154] CASE s_glg:.. 
s_glg M:34 MAN pal.b[7202] CASE s_glg:.. 
s_glg M:34 MAN pal.b[7272] CASE s_glg:.. 
s_glg M:34 MAN pal.b[7365] CASE s_glg:.. 
s_glg M:34 MAN pal.b[9010] FOR i=s_glg TO s_qu DO..
s_glo M:35 DEF palhdr.h[96] s_glo=35
s_glo M:35 MAN pal.b[1725] CASE s_glo:.. 
s_glo M:35 MAN pal.b[2016] CASE s_glo:.. 
s_glo M:35 MAN pal.b[2640] arg1:=!arg1<=s_glo
s_glo M:35 MAN pal.b[3136] CASE s_glo:.. 
s_glo M:35 MAN pal.b[3190] CASE s_glo:.. 
s_glo M:35 MAN pal.b[3255] CASE s_glo:.. 
s_glo M:35 MAN pal.b[4653] CASE s_glo:.. 
s_glo M:35 MAN pal.b[5701] CASE s_glo:.. 
s_glo M:35 MAN pal.b[6798] RESULTIS !a<=s_glo
s_glo M:35 MAN pal.b[7155] CASE s_glo:.. 
s_glo M:35 MAN pal.b[7157] !v:=s_glo
s_glo M:35 MAN pal.b[7203] CASE s_glo:.. 
s_glo M:35 MAN pal.b[7205] !v:=s_glo
s_glo M:35 MAN pal.b[7273] CASE s_glo:.. 
s_glo M:35 MAN pal.b[7366] CASE s_glo:.. 
s_glo M:35 MAN pal.b[7984] RESULTIS h2!linkword(s_glo,s,...)
s_glo M:35 MAN pal.b[7991] RESULTIS h2!linkword(s_glo,s,...)
s_glo M:35 MAN pal.b[7997] RESULTIS h2!linkword(s_glo,s,...)
s_glo M:35 MAN pal.b[8004] RESULTIS h2!linkword(s_glo,s,...)
s_glo M:35 MAN pal.b[8009] RESULTIS h2!linkword(s_glo,s,...)
s_glo M:35 MAN pal.b[8014] RESULTIS h2!linkword(s_glo,a,...)
s_glo M:35 MAN pal.b[8019] RESULTIS h2!linkword(s_glo,a,...)
s_glo M:35 MAN pal.b[8046] RESULTIS h2!linkword(s_glo,a,...)
s_glo M:35 MAN pal.b[8447] fff!s_glo:=0
s_glz M:33 DEF palhdr.h[94] s_glz=33
s_glz M:33 MAN pal.b[1723] CASE s_glz:.. 
s_glz M:33 MAN pal.b[2015] CASE s_glz:.. 
s_glz M:33 MAN pal.b[3188] CASE s_glz:.. 
s_glz M:33 MAN pal.b[3278] CASE s_glz:.. 
s_glz M:33 MAN pal.b[4651] CASE s_glz:.. 
s_glz M:33 MAN pal.b[5699] CASE s_glz:.. 
s_glz M:33 MAN pal.b[6880] RESULTIS linkword(s_glz,a,zsy,z)
s_glz M:33 MAN pal.b[7157] CASE s_glz:.. 
s_glz M:33 MAN pal.b[7205] CASE s_glz:.. 
s_glz M:33 MAN pal.b[7271] CASE s_glz:.. 
s_glz M:33 MAN pal.b[7364] CASE s_glz:.. 
s_glz M:33 MAN pal.b[8248] FOR i=s_glz TO s_qu DO..
s_glz M:33 MAN pal.b[8446] fff!s_glz:=0
s_glz M:33 MAN pal.b[9009] fff!s_glz:=msg3
s_if M:121 DEF palhdr.h[194] s_if=121
s_if M:121 MAN pal.b[8298] set_p("if",s_if)
s_in M:135 DEF palhdr.h[208] s_in=135
s_in M:135 MAN pal.b[8351] set_p("in",s_in)
s_in M:135 MAN pal.b[9490] TEST sym=s_in THEN .. ELSE ..
s_infix M:141 DEF palhdr.h[214] s_infix=141
s_infix M:141 MAN pal.b[8381] set_p("%",s_infix)
s_infix M:141 MAN pal.b[9370] CASE s_infix:.. 
s_j M:81 DEF palhdr.h[148] s_j=81
s_j M:81 MAN pal.b[1701] j,m:=zj,s_j
s_j M:81 MAN pal.b[1745] CASE s_j:.. 
s_j M:81 MAN pal.b[1892] m:=s_j
s_j M:81 MAN pal.b[1951] CASE s_j:.. 
s_j M:81 MAN pal.b[2168] CASE s_j:.. 
s_j M:81 MAN pal.b[2234] m:=s_j
s_j M:81 MAN pal.b[2242] m:=s_j
s_j M:81 MAN pal.b[3515] CASE s_j:.. 
s_j M:81 MAN pal.b[3752] j,m:=zj,s_j
s_j M:81 MAN pal.b[5725] CASE s_j:.. 
s_j M:81 MAN pal.b[6116] CASE s_j:.. 
s_j M:81 MAN pal.b[8208] m:=s_j
s_j M:81 MAN pal.b[8220] zj:=get4(s_j,ze,z,z)
s_j M:81 MAN pal.b[8272] FOR i=s_j TO s_mb DO..
s_jclos M:47 DEF palhdr.h[110] s_jclos=47
s_jclos M:47 MAN pal.b[2191] arg1:=get4(s_jclos,z,c,arg1)
s_jclos M:47 MAN pal.b[2231] CASE s_jclos:.. 
s_jclos M:47 MAN pal.b[402] CASE s_jclos:.. 
s_jclos M:47 MAN pal.b[5717] CASE s_jclos:.. 
s_kclos M:48 DEF palhdr.h[111] s_kclos=48
s_kclos M:48 MAN pal.b[1935] get4(s_kclos,e1,j,...)
s_kclos M:48 MAN pal.b[2239] CASE s_kclos:.. 
s_kclos M:48 MAN pal.b[5720] CASE s_kclos:.. 
s_kclos M:48 MAN pal.b[6810] IF s_clos<=!a&!a<=s_kclos DO ..
s_let M:51 DEF palhdr.h[115] s_let=51
s_let M:51 MAN pal.b[1909] CASE s_let:.. 
s_let M:51 MAN pal.b[3353] CASE s_let:.. 
s_let M:51 MAN pal.b[6069] CASE s_let:.. 
s_let M:51 MAN pal.b[8258] typ!s_let:=du("let",s_code3,...,s_let)
s_let M:51 MAN pal.b[8259] typ!i:=typ!s_let
s_let M:51 MAN pal.b[9485] CASE s_let:.. 
s_let M:51 MAN pal.b[9489] .. REPEATWHILE sym=s_let
s_let M:51 MAN pal.b[9809] sg:=s_let
s_leta M:52 DEF palhdr.h[116] s_leta=52
s_leta M:52 MAN pal.b[1912] CASE s_leta:.. 
s_leta M:52 MAN pal.b[3354] CASE s_leta:.. 
s_leta M:52 MAN pal.b[6070] CASE s_leta:.. 
s_leta M:52 MAN pal.b[8259] FOR i=s_leta TO s_letb DO..
s_leta M:52 MAN pal.b[9808] sg:=s_leta
s_leta M:52 MAN pal.b[9817] !a:=s_leta
s_letb M:53 DEF palhdr.h[117] s_letb=53
s_letb M:53 MAN pal.b[1921] CASE s_letb:.. 
s_letb M:53 MAN pal.b[3355] CASE s_letb:.. 
s_letb M:53 MAN pal.b[6071] CASE s_letb:.. 
s_letb M:53 MAN pal.b[8259] FOR i=s_leta TO s_letb DO..
s_letb M:53 MAN pal.b[9807] sg:=s_letb
s_letb M:53 MAN pal.b[9816] !a:=s_letb
s_loc M:10 DEF palhdr.h[69] s_loc=10
s_loc M:10 MAN pal.b[1408] CASE s_loc:.. 
s_loc M:10 MAN pal.b[1715] CASE s_loc:.. 
s_loc M:10 MAN pal.b[2019] CASE s_loc:.. 
s_loc M:10 MAN pal.b[2529] arg1:=get4(s_loc,arg1,...)+yloc
s_loc M:10 MAN pal.b[3125] CASE s_loc:.. 
s_loc M:10 MAN pal.b[3192] CASE s_loc:.. 
s_loc M:10 MAN pal.b[3268] CASE s_loc:.. 
s_loc M:10 MAN pal.b[3425] CASE s_loc:.. 
s_loc M:10 MAN pal.b[3578] CASE s_loc:.. 
s_loc M:10 MAN pal.b[3596] CASE s_loc:.. 
s_loc M:10 MAN pal.b[3646] CASE s_loc:.. 
s_loc M:10 MAN pal.b[446] CASE s_loc:.. 
s_loc M:10 MAN pal.b[456] RESULTIS s_loc
s_loc M:10 MAN pal.b[463] CASE s_loc:.. 
s_loc M:10 MAN pal.b[4654] CASE s_loc:.. 
s_loc M:10 MAN pal.b[478] CASE s_loc:.. 
s_loc M:10 MAN pal.b[488] RESULTIS s_loc
s_loc M:10 MAN pal.b[504] CASE s_loc:.. 
s_loc M:10 MAN pal.b[519] RESULTIS s_loc
s_loc M:10 MAN pal.b[535] CASE s_loc:.. 
s_loc M:10 MAN pal.b[548] RESULTIS s_loc
s_loc M:10 MAN pal.b[5646] CASE s_loc:.. 
s_loc M:10 MAN pal.b[564] CASE s_loc:.. 
s_loc M:10 MAN pal.b[590] RESULTIS s_loc
s_loc M:10 MAN pal.b[5956] CASE s_loc:.. 
s_loc M:10 MAN pal.b[6024] CASE s_loc:.. 
s_loc M:10 MAN pal.b[606] CASE s_loc:.. 
s_loc M:10 MAN pal.b[632] RESULTIS s_loc
s_loc M:10 MAN pal.b[6427] p>=yloc->p,get4(s_loc,...)+yloc
s_loc M:10 MAN pal.b[646] CASE s_loc:.. 
s_loc M:10 MAN pal.b[658] RESULTIS s_loc
s_loc M:10 MAN pal.b[6698] CASE s_loc:.. 
s_loc M:10 MAN pal.b[674] CASE s_loc:.. 
s_loc M:10 MAN pal.b[687] RESULTIS s_loc
s_loc M:10 MAN pal.b[6932] CASE s_loc:.. 
s_loc M:10 MAN pal.b[6952] CASE s_loc:.. 
s_loc M:10 MAN pal.b[696] RESULTIS s_loc
s_loc M:10 MAN pal.b[6984] CASE s_loc:.. 
s_loc M:10 MAN pal.b[7045] CASE s_loc:.. 
s_loc M:10 MAN pal.b[7069] CASE s_loc:.. 
s_loc M:10 MAN pal.b[7123] CASE s_loc:.. 
s_loc M:10 MAN pal.b[7144] w:=get4(s_loc,w,...)+yloc
s_loc M:10 MAN pal.b[7174] CASE s_loc:.. 
s_loc M:10 MAN pal.b[7191] w:=get4(s_loc,w,...)+yloc
s_loc M:10 MAN pal.b[7360] CASE s_loc:.. 
s_loc M:10 MAN pal.b[8233] typ!s_loc:=set_d("LV",@lvv)
s_loc M:10 MAN pal.b[8444] fff!s_loc:=0
s_loc M:10 MAN pal.b[9870] CASE s_loc:.. 
s_loc M:10 MAN pal.b[9952] CASE s_loc:.. 
s_lpar M:133 DEF palhdr.h[206] s_lpar=133
s_lpar M:133 MAN pal.b[8369] set_p("(",s_lpar)
s_lpar M:133 MAN pal.b[9572] CASE s_lpar:.. 
s_lpar M:133 MAN pal.b[9641] CASE s_lpar:.. 
s_lpar M:133 MAN pal.b[9676] CASE s_lpar:.. 
s_lpar M:133 MAN pal.b[9727] CASE s_lpar:.. 
s_ma1 M:91 DEF palhdr.h[160] s_ma1=91
s_ma1 M:91 MAN pal.b[2178] CASE s_ma1:.. 
s_ma1 M:91 MAN pal.b[2297] CASE s_ma1:.. 
s_ma2l M:94 DEF palhdr.h[163] s_ma2l=94
s_ma2l M:94 MAN pal.b[2181] CASE s_ma2l:.. 
s_ma2l M:94 MAN pal.b[2330] CASE s_ma2l:.. 
s_ma2r M:95 DEF palhdr.h[164] s_ma2r=95
s_ma2r M:95 MAN pal.b[2182] CASE s_ma2r:.. 
s_ma2r M:95 MAN pal.b[2335] CASE s_ma2r:.. 
s_maa M:90 DEF palhdr.h[159] s_maa=90
s_maa M:90 MAN pal.b[2177] CASE s_maa:.. 
s_maa M:90 MAN pal.b[2284] CASE s_maa:.. 
s_mal M:86 DEF palhdr.h[155] s_mal=86
s_mal M:86 MAN pal.b[1995] CASE s_mal:.. 
s_mal M:86 MAN pal.b[2173] CASE s_mal:.. 
s_maq M:98 DEF palhdr.h[167] s_maq=98
s_maq M:98 MAN pal.b[2185] CASE s_maq:.. 
s_maq M:98 MAN pal.b[2372] CASE s_maq:.. 
s_mar M:87 DEF palhdr.h[156] s_mar=87
s_mar M:87 MAN pal.b[2000] CASE s_mar:.. 
s_mar M:87 MAN pal.b[2174] CASE s_mar:.. 
s_mb M:120 DEF palhdr.h[192] s_mb=120
s_mb M:120 MAN pal.b[10215] IF b>0&!b=s_mb DO ..
s_mb M:120 MAN pal.b[10219] b:=get4(s_mb,!gseq,b,0)
s_mb M:120 MAN pal.b[10227] IF !a=s_mb DO ..
s_mb M:120 MAN pal.b[10228] IF b>0&!b=s_mb DO ..
s_mb M:120 MAN pal.b[10234] IF b>0&!b=s_mb DO ..
s_mb M:120 MAN pal.b[10238] a:=get4(s_mb,!gseq,a,0)
s_mb M:120 MAN pal.b[10247] IF !a=s_mb DO ..
s_mb M:120 MAN pal.b[10248] IF b>0&!b=s_mb DO ..
s_mb M:120 MAN pal.b[10252] IF c>0&!c=s_mb DO ..
s_mb M:120 MAN pal.b[10259] IF b>0&!b=s_mb DO ..
s_mb M:120 MAN pal.b[10260] IF c>0&!c=s_mb DO ..
s_mb M:120 MAN pal.b[10266] IF c>0&!c=s_mb DO ..
s_mb M:120 MAN pal.b[10270] a:=get4(s_mb,!gseq,a,0)
s_mb M:120 MAN pal.b[10296] CASE s_mb:.. 
s_mb M:120 MAN pal.b[1722] CASE s_mb:.. 
s_mb M:120 MAN pal.b[3233] WHILE !n=s_mb DO ..
s_mb M:120 MAN pal.b[3320] get4(s_mb,f,zsy,z)
s_mb M:120 MAN pal.b[3452] get4(s_mb,f,zsy,z)
s_mb M:120 MAN pal.b[3508] get4(s_mb,f,zsy,z)
s_mb M:120 MAN pal.b[3525] !a,h1!a,h2!a,h3!a:=s_mb,!gseqf,n,get4(...)
s_mb M:120 MAN pal.b[3535] CASE s_mb:.. 
s_mb M:120 MAN pal.b[3658] RESULTIS get4(s_mb,e,zsy,v)
s_mb M:120 MAN pal.b[7184] f:=get4(s_mb,f,...)+yfj
s_mb M:120 MAN pal.b[7323] h1!s:=get4(s_mb,s1,b,n)
s_mb M:120 MAN pal.b[7326] h1!s:=get4(s_mb,z,b,n)
s_mb M:120 MAN pal.b[8215] zu:=get4(s_mb,0,0,zsy)
s_mb M:120 MAN pal.b[8216] zsq:=get4(s_mb,zsy+p_tagp,...,...)
s_mb M:120 MAN pal.b[8272] FOR i=s_j TO s_mb DO..
s_mb M:120 MAN palhdr.h[240] typsz=s_mb
s_mcc M:83 DEF palhdr.h[151] s_mcc=83
s_mcc M:83 MAN pal.b[1962] CASE s_mcc:.. 
s_mcc M:83 MAN pal.b[2170] CASE s_mcc:.. 
s_mcf M:84 DEF palhdr.h[152] s_mcf=84
s_mcf M:84 MAN pal.b[1970] CASE s_mcf:.. 
s_mcf M:84 MAN pal.b[2171] CASE s_mcf:.. 
s_mck M:85 DEF palhdr.h[153] s_mck=85
s_mck M:85 MAN pal.b[1979] CASE s_mck:.. 
s_mck M:85 MAN pal.b[2172] CASE s_mck:.. 
s_mcond M:100 DEF palhdr.h[169] s_mcond=100
s_mcond M:100 MAN pal.b[2187] CASE s_mcond:.. 
s_mcond M:100 MAN pal.b[2395] CASE s_mcond:.. 
s_mf1 M:92 DEF palhdr.h[161] s_mf1=92
s_mf1 M:92 MAN pal.b[2179] CASE s_mf1:.. 
s_mf1 M:92 MAN pal.b[2312] CASE s_mf1:.. 
s_mf1a M:93 DEF palhdr.h[162] s_mf1a=93
s_mf1a M:93 MAN pal.b[2180] CASE s_mf1a:.. 
s_mf1a M:93 MAN pal.b[2310] CASE s_mf1a:.. 
s_mf2l M:96 DEF palhdr.h[165] s_mf2l=96
s_mf2l M:96 MAN pal.b[2183] CASE s_mf2l:.. 
s_mf2l M:96 MAN pal.b[2357] CASE s_mf2l:.. 
s_mf2r M:97 DEF palhdr.h[166] s_mf2r=97
s_mf2r M:97 MAN pal.b[2184] CASE s_mf2r:.. 
s_mf2r M:97 MAN pal.b[2362] CASE s_mf2r:.. 
s_mlet M:99 DEF palhdr.h[168] s_mlet=99
s_mlet M:99 MAN pal.b[2186] CASE s_mlet:.. 
s_mlet M:99 MAN pal.b[2382] CASE s_mlet:.. 
s_mma1 M:110 DEF palhdr.h[181] s_mma1=110
s_mma1 M:110 MAN pal.b[1796] f,m,c:=get4(m,...)+yfj,s_mma1,h2!c
s_mma1 M:110 MAN pal.b[2300] CASE s_mma1:.. 
s_mma2l M:113 DEF palhdr.h[184] s_mma2l=113
s_mma2l M:113 MAN pal.b[1818] f,m,c:=get4(m,...)+yfj,s_mma2l,h2!h1!c1
s_mma2l M:113 MAN pal.b[2324] CASE s_mma2l:.. 
s_mma2r M:114 DEF palhdr.h[185] s_mma2r=114
s_mma2r M:114 MAN pal.b[2327] m:=s_mma2r
s_mma2r M:114 MAN pal.b[2332] m:=s_mma2r
s_mma2r M:114 MAN pal.b[2338] CASE s_mma2r:.. 
s_mmaa M:109 DEF palhdr.h[180] s_mmaa=109
s_mmaa M:109 MAN pal.b[1874] f,m,c:=get4(m,...)+yfj,s_mmaa,h2!c
s_mmaa M:109 MAN pal.b[2287] CASE s_mmaa:.. 
s_mmal M:105 DEF palhdr.h[176] s_mmal=105
s_mmal M:105 MAN pal.b[1784] f,m,c:=get4(m,...)+yfj,s_mmal,h1!c
s_mmal M:105 MAN pal.b[1994] CASE s_mmal:.. 
s_mmal M:105 MAN pal.b[2108] f,m:=get4(m,...)+yfj,s_mmal
s_mmaq M:117 DEF palhdr.h[188] s_mmaq=117
s_mmaq M:117 MAN pal.b[1879] f,m,c:=get4(m,...)+yfj,s_mmaq,h2!c
s_mmaq M:117 MAN pal.b[2375] CASE s_mmaq:.. 
s_mmar M:106 DEF palhdr.h[177] s_mmar=106
s_mmar M:106 MAN pal.b[2003] CASE s_mmar:.. 
s_mmcc M:102 DEF palhdr.h[172] s_mmcc=102
s_mmcc M:102 MAN pal.b[1965] CASE s_mmcc:.. 
s_mmcc M:102 MAN pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
s_mmcc M:102 MAN pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
s_mmcc M:102 MAN pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
s_mmcc M:102 MAN pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
s_mmcc M:102 MAN pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
s_mmcf M:103 DEF palhdr.h[173] s_mmcf=103
s_mmcf M:103 MAN pal.b[1973] CASE s_mmcf:.. 
s_mmcf M:103 MAN pal.b[1982] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2420] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2445] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2450] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2455] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2460] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2476] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2482] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2556] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2663] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2700] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2709] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2754] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
s_mmcf M:103 MAN pal.b[2763] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2781] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
s_mmcf M:103 MAN pal.b[2791] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2808] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
s_mmcf M:103 MAN pal.b[2818] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2835] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
s_mmcf M:103 MAN pal.b[2845] f:=get4(s_mmcf,f,...)+yfj
s_mmcf M:103 MAN pal.b[2869] f:=get4(s_mmcf,...,...)+yfj
s_mmcf M:103 MAN pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
s_mmck M:104 DEF palhdr.h[174] s_mmck=104
s_mmck M:104 MAN pal.b[1985] CASE s_mmck:.. 
s_mmck M:104 MAN pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
s_mmck M:104 MAN pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
s_mmck M:104 MAN pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
s_mmck M:104 MAN pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
s_mmcond M:119 DEF palhdr.h[190] s_mmcond=119
s_mmcond M:119 MAN pal.b[1897] f,m,c:=get4(m,...)+yfj,s_mmcond,h1!c
s_mmcond M:119 MAN pal.b[2399] CASE s_mmcond:.. 
s_mmf1 M:111 DEF palhdr.h[182] s_mmf1=111
s_mmf1 M:111 MAN pal.b[1810] f,m,c:=get4(m,...)+yfj,s_mmf1,h2!c
s_mmf1 M:111 MAN pal.b[2317] CASE s_mmf1:.. 
s_mmf1a M:112 DEF palhdr.h[183] s_mmf1a=112
s_mmf1a M:112 MAN pal.b[1814] f,m,c:=get4(m,...)+yfj,s_mmf1a,h2!c
s_mmf1a M:112 MAN pal.b[2315] CASE s_mmf1a:.. 
s_mmf2l M:115 DEF palhdr.h[186] s_mmf2l=115
s_mmf2l M:115 MAN pal.b[1822] f,m,c:=get4(m,...)+yfj,s_mmf2l,h2!h1!c1
s_mmf2l M:115 MAN pal.b[2351] CASE s_mmf2l:.. 
s_mmf2r M:116 DEF palhdr.h[187] s_mmf2r=116
s_mmf2r M:116 MAN pal.b[1762] f,m,c:=get4(m,...)+yfj,s_mmf2r,h1!c
s_mmf2r M:116 MAN pal.b[1942] f,m:=get4(m,...)+yfj,s_mmf2r
s_mmf2r M:116 MAN pal.b[2354] m:=s_mmf2r
s_mmf2r M:116 MAN pal.b[2359] m:=s_mmf2r
s_mmf2r M:116 MAN pal.b[2365] CASE s_mmf2r:.. 
s_mmlet M:118 DEF palhdr.h[189] s_mmlet=118
s_mmlet M:118 MAN pal.b[1909] f,m,c:=get4(m,...)+yfj,s_mmlet,h3!c
s_mmlet M:118 MAN pal.b[2385] CASE s_mmlet:.. 
s_mms M:107 DEF palhdr.h[178] s_mms=107
s_mms M:107 MAN pal.b[1772] f,m,c:=get4(m,...)+yfj,s_mms,h1!c
s_mms M:107 MAN pal.b[2251] CASE s_mms:.. 
s_mmt M:108 DEF palhdr.h[179] s_mmt=108
s_mmt M:108 MAN pal.b[1876] f,m,c:=get4(m,...)+yfj,s_mmt,h2!c
s_mmt M:108 MAN pal.b[2257] CASE s_mmt:.. 
s_mmt M:108 MAN pal.b[2268] m,c:=s_mmt,h2!c
s_mmt M:108 MAN pal.b[2281] m,c:=s_mmt,h2!c
s_ms M:88 DEF palhdr.h[157] s_ms=88
s_ms M:88 MAN pal.b[2175] CASE s_ms:.. 
s_ms M:88 MAN pal.b[2248] CASE s_ms:.. 
s_mt M:89 DEF palhdr.h[158] s_mt=89
s_mt M:89 MAN pal.b[2176] CASE s_mt:.. 
s_mt M:89 MAN pal.b[2271] CASE s_mt:.. 
s_mz M:101 DEF palhdr.h[171] s_mz=101
s_mz M:101 MAN pal.b[1746] IF m>=s_mz DO ..
s_mz M:101 MAN pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[1894] m:=s_mz
s_mz M:101 MAN pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[1957] CASE s_mz:.. 
s_mz M:101 MAN pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
s_mz M:101 MAN pal.b[2719] IF m>=s_mz DO ..
s_mz M:101 MAN pal.b[3716] IF t>=s_mz DO ..
s_mz M:101 MAN pal.b[3724] TEST !k>=s_mz THEN .. ELSE ..
s_mz M:101 MAN pal.b[3739] WHILE !g>=s_mz DO ..
s_mz M:101 MAN palhdr.h[239] mtypsz=s_mz-1
s_mz M:101 MAN palhdr.h[241] jgap=s_mz-s_z
s_name M:32 DEF palhdr.h[93] s_name=32
s_name M:32 MAN pal.b[1730] CASE s_name:.. 
s_name M:32 MAN pal.b[3128] CASE s_name:.. 
s_name M:32 MAN pal.b[3187] CASE s_name:.. 
s_name M:32 MAN pal.b[3286] CASE s_name:.. 
s_name M:32 MAN pal.b[3631] CASE s_name:.. 
s_name M:32 MAN pal.b[3657] CASE s_name:.. 
s_name M:32 MAN pal.b[4650] CASE s_name:.. 
s_name M:32 MAN pal.b[5697] CASE s_name:.. 
s_name M:32 MAN pal.b[6312] c0!g:=get4(s_name,z,a,z)
s_name M:32 MAN pal.b[6333] c0!g:=get4(s_name,z,b,z)
s_name M:32 MAN pal.b[7152] CASE s_name:.. 
s_name M:32 MAN pal.b[7199] CASE s_name:.. 
s_name M:32 MAN pal.b[7269] CASE s_name:.. 
s_name M:32 MAN pal.b[7363] CASE s_name:.. 
s_name M:32 MAN pal.b[7527] IF !n=s_name DO ..
s_name M:32 MAN pal.b[8245] typ!s_name:=set_v("NAME",@name)
s_name M:32 MAN pal.b[8445] fff!s_name:=0
s_name M:32 MAN pal.b[9012] FOR i=s_gensy TO s_name DO..
s_name M:32 MAN pal.b[9353] sym:=s_name
s_name M:32 MAN pal.b[9376] checkfor(s_name,8)
s_name M:32 MAN pal.b[9582] CASE s_name:.. 
s_name M:32 MAN pal.b[9599] UNLESS !e=s_name DO ..
s_name M:32 MAN pal.b[9664] CASE s_name:.. 
s_name M:32 MAN pal.b[9739] CASE s_name:.. 
s_name M:32 MAN pal.b[9775] IF a>0&...=s_name|!a=s_gensy|!a=s_dash DO ..
s_nil M:144 DEF palhdr.h[217] s_nil=144
s_nil M:144 MAN pal.b[8290] set_p("nil",s_nil)
s_nil M:144 MAN pal.b[9583] CASE s_nil:.. 
s_nil M:144 MAN pal.b[9665] CASE s_nil:.. 
s_nil M:144 MAN pal.b[9740] CASE s_nil:.. 
s_null M:145 DEF palhdr.h[218] s_null=145
s_null M:145 MAN pal.b[8289] dv("~",s_codev,...,...)
s_null M:145 MAN pal.b[9506] CASE s_null:.. 
s_null M:145 MAN pal.b[9647] CASE s_null:.. 
s_num M:0 DEF palhdr.h[58] s_num=0
s_num M:0 MAN pal.b[194] CASE s_num:.. 
s_num M:0 MAN pal.b[443] RESULTIS s_num
s_num M:0 MAN pal.b[4752] CASE s_num:.. 
s_num M:0 MAN pal.b[4869] CASE s_num:.. 
s_num M:0 MAN pal.b[7020] CASE s_num:.. 
s_num M:0 MAN pal.b[7424] CASE s_num:.. 
s_num M:0 MAN pal.b[86] CASE s_num:.. 
s_num M:0 MAN pal.b[9325] sym:=s_num
s_num M:0 MAN pal.b[9412] sym,s0:=s_num,s1+y0
s_num M:0 MAN pal.b[9579] CASE s_num:.. 
s_num M:0 MAN pal.b[9661] CASE s_num:.. 
s_numj M:4 DEF palhdr.h[62] s_numj=4
s_numj M:4 MAN pal.b[1410] CASE s_numj:.. 
s_numj M:4 MAN pal.b[197] CASE s_numj:.. 
s_numj M:4 MAN pal.b[3181] CASE s_numj:.. 
s_numj M:4 MAN pal.b[3260] CASE s_numj:.. 
s_numj M:4 MAN pal.b[3829] RESULTIS getx(s_numj,z,...)+sg
s_numj M:4 MAN pal.b[3846] h1!c0:=getx(s_numj,zsy,gw2,gw1)
s_numj M:4 MAN pal.b[3866] h1!c0:=getx(s_numj,zsy,0,0)
s_numj M:4 MAN pal.b[3869] h1!c0:=getx(s_numj,z,0,1)
s_numj M:4 MAN pal.b[3872] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
s_numj M:4 MAN pal.b[3891] c:=getx(s_numj,c,gw2,gw1)
s_numj M:4 MAN pal.b[3905] h1!s0:=getx(s_numj,zsy,numbb,numbb)
s_numj M:4 MAN pal.b[3914] h1!s0:=getx(s_numj,h1!a,gw2,gw1)
s_numj M:4 MAN pal.b[3953] RESULTIS getx(s_numj,...,...)+sg
s_numj M:4 MAN pal.b[3957] RESULTIS getx(s_numj,...,...)+sg
s_numj M:4 MAN pal.b[3959] getx(s_numj,zsy,0,gw1)
s_numj M:4 MAN pal.b[3970] h1!c0:=getx(s_numj,zsy,0,0)
s_numj M:4 MAN pal.b[3973] h1!c0:=getx(s_numj,z,0,1)
s_numj M:4 MAN pal.b[3976] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
s_numj M:4 MAN pal.b[3981] RESULTIS getx(s_numj,...,...)+sg
s_numj M:4 MAN pal.b[3990] RESULTIS getx(s_numj,a,...)+sg
s_numj M:4 MAN pal.b[3991] getx(s_numj,zsy,numbb,gw1)
s_numj M:4 MAN pal.b[4002] h1!c0:=getx(s_numj,zsy,numbb,numbb)
s_numj M:4 MAN pal.b[4007] h1!c0:=getx(s_numj,h1!a,gw2,gw1)
s_numj M:4 MAN pal.b[4020] RESULTIS getx(s_numj,z,...)+sg
s_numj M:4 MAN pal.b[4051] h1!n0:=getx(s_numj,zsy,gw2,gw3)
s_numj M:4 MAN pal.b[4056] h1!n0:=getx(s_numj,z,0,gl2)
s_numj M:4 MAN pal.b[4062] getx(s_numj,zsy,...)+((aXORb)&ysg)
s_numj M:4 MAN pal.b[4067] c:=getx(s_numj,c,0,0)
s_numj M:4 MAN pal.b[4069] c:=getx(s_numj,c,0,0)
s_numj M:4 MAN pal.b[411] CASE s_numj:.. 
s_numj M:4 MAN pal.b[4170] n:=getx(s_numj,n,...,...)
s_numj M:4 MAN pal.b[454] CASE s_numj:.. 
s_numj M:4 MAN pal.b[465] CASE s_numj:.. 
s_numj M:4 MAN pal.b[4684] CASE s_numj:.. 
s_numj M:4 MAN pal.b[4753] CASE s_numj:.. 
s_numj M:4 MAN pal.b[475] RESULTIS s_numj
s_numj M:4 MAN pal.b[480] CASE s_numj:.. 
s_numj M:4 MAN pal.b[480] RESULTIS s_numj
s_numj M:4 MAN pal.b[4882] CASE s_numj:.. 
s_numj M:4 MAN pal.b[506] CASE s_numj:.. 
s_numj M:4 MAN pal.b[5195] CASE s_numj:.. 
s_numj M:4 MAN pal.b[5202] CASE s_numj:.. 
s_numj M:4 MAN pal.b[5206] CASE s_numj:.. 
s_numj M:4 MAN pal.b[5216] CASE s_numj:.. 
s_numj M:4 MAN pal.b[537] CASE s_numj:.. 
s_numj M:4 MAN pal.b[5654] CASE s_numj:.. 
s_numj M:4 MAN pal.b[566] CASE s_numj:.. 
s_numj M:4 MAN pal.b[5983] CASE s_numj:.. 
s_numj M:4 MAN pal.b[608] CASE s_numj:.. 
s_numj M:4 MAN pal.b[653] CASE s_numj:.. 
s_numj M:4 MAN pal.b[6714] CASE s_numj:.. 
s_numj M:4 MAN pal.b[6752] RESULTIS getx(s_numj,z,...)+v
s_numj M:4 MAN pal.b[677] CASE s_numj:.. 
s_numj M:4 MAN pal.b[6849] v:=getx(s_numj,z,n,m)
s_numj M:4 MAN pal.b[6858] v:=getx(s_numj,v,n,m)
s_numj M:4 MAN pal.b[6935] CASE s_numj:.. 
s_numj M:4 MAN pal.b[6956] CASE s_numj:.. 
s_numj M:4 MAN pal.b[6987] CASE s_numj:.. 
s_numj M:4 MAN pal.b[7021] CASE s_numj:.. 
s_numj M:4 MAN pal.b[7073] CASE s_numj:.. 
s_numj M:4 MAN pal.b[7387] CASE s_numj:.. 
s_numj M:4 MAN pal.b[7425] CASE s_numj:.. 
s_numj M:4 MAN pal.b[7933] CASE s_numj:.. 
s_numj M:4 MAN pal.b[89] CASE s_numj:.. 
s_or M:129 DEF palhdr.h[202] s_or=129
s_or M:129 MAN pal.b[8295] set_p("or",s_or)
s_or M:129 MAN pal.b[9249] TEST sym=s_or THEN .. ELSE ..
s_poly M:8 DEF palhdr.h[66] s_poly=8
s_poly M:8 MAN pal.b[1427] CASE s_poly:.. 
s_poly M:8 MAN pal.b[1436] r:=get4(s_poly,zsy,...,...)
s_poly M:8 MAN pal.b[1459] t:=get4(s_poly,t,...)+(p1&ysg)
s_poly M:8 MAN pal.b[169] TEST u>0&!u=s_poly THEN .. ELSE ..
s_poly M:8 MAN pal.b[175] CASE s_poly:.. 
s_poly M:8 MAN pal.b[2152] CASE s_poly:.. 
s_poly M:8 MAN pal.b[302] TEST u>0&!u=s_poly THEN .. ELSE ..
s_poly M:8 MAN pal.b[308] CASE s_poly:.. 
s_poly M:8 MAN pal.b[3185] CASE s_poly:.. 
s_poly M:8 MAN pal.b[3264] CASE s_poly:.. 
s_poly M:8 MAN pal.b[341] UNLESS s_flt<=p0&p0<=s_poly DO ..
s_poly M:8 MAN pal.b[415] CASE s_poly:.. 
s_poly M:8 MAN pal.b[452] CASE s_poly:.. 
s_poly M:8 MAN pal.b[4694] CASE s_poly:.. 
s_poly M:8 MAN pal.b[4828] CASE s_poly:.. 
s_poly M:8 MAN pal.b[484] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5087] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5099] IF result2>0&!result2=s_poly&h3!result2=h3!b DO ..
s_poly M:8 MAN pal.b[5122] IF b>0&!b=s_poly&h3!b=h3!a DO ..
s_poly M:8 MAN pal.b[513] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5152] IF b2>0&!b2=s_poly&h3!b2=h3!a DO ..
s_poly M:8 MAN pal.b[5197] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5208] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5210] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5219] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5414] IF !a=s_poly DO ..
s_poly M:8 MAN pal.b[544] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5684] CASE s_poly:.. 
s_poly M:8 MAN pal.b[575] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5797] TEST !p=s_poly THEN .. ELSE ..
s_poly M:8 MAN pal.b[581] RESULTIS s_poly
s_poly M:8 MAN pal.b[5820] TEST !p2=s_poly|!p2=s_ratp THEN .. ELSE ..
s_poly M:8 MAN pal.b[593] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5994] CASE s_poly:.. 
s_poly M:8 MAN pal.b[5998] !zu,h1!zu,h2!zu:=s_poly,c,zj
s_poly M:8 MAN pal.b[603] RESULTIS s_poly
s_poly M:8 MAN pal.b[616] RESULTIS s_poly
s_poly M:8 MAN pal.b[617] CASE s_poly:.. 
s_poly M:8 MAN pal.b[624] RESULTIS s_poly
s_poly M:8 MAN pal.b[630] RESULTIS s_poly
s_poly M:8 MAN pal.b[656] CASE s_poly:.. 
s_poly M:8 MAN pal.b[6792] IF !a=s_poly DO ..
s_poly M:8 MAN pal.b[685] CASE s_poly:.. 
s_poly M:8 MAN pal.b[6936] CASE s_poly:.. 
s_poly M:8 MAN pal.b[7006] CASE s_poly:.. 
s_poly M:8 MAN pal.b[7024] CASE s_poly:.. 
s_poly M:8 MAN pal.b[7394] CASE s_poly:.. 
s_poly M:8 MAN pal.b[7479] CASE s_poly:.. 
s_poly M:8 MAN pal.b[7522] RESULTIS get4(s_poly,q,p,n)
s_poly M:8 MAN pal.b[7536] p:=g_np(p,s_poly)
s_poly M:8 MAN pal.b[7537] RESULTIS get4(s_poly,...,...)+(p&ysg)
s_poly M:8 MAN pal.b[7560] get4(s_poly,zsy,...,...)
s_poly M:8 MAN pal.b[7616] get4(s_poly,zsy,...,...)
s_poly M:8 MAN pal.b[7642] get4(s_poly,zsy,...)+(p&ysg)
s_poly M:8 MAN pal.b[7662] get4(s_poly,zsy,...,...)
s_poly M:8 MAN pal.b[7750] u:=get4(s_poly,u,...,...)
s_poly M:8 MAN pal.b[7753] r:=get4(s_poly,r,...,...)
s_poly M:8 MAN pal.b[7797] u:=get4(s_poly,u,...,...)
s_poly M:8 MAN pal.b[7863] get4(s_poly,zsy,...)+(a&ysg)
s_poly M:8 MAN pal.b[7888] UNLESS r>0&!r=s_poly&h3!r=h3!q DO ..
s_poly M:8 MAN pal.b[7946] CASE s_poly:.. 
s_poly M:8 MAN pal.b[8231] typ!s_poly:=set_c("POL",@pol)
s_poly M:8 MAN pal.b[8232] typ!s_polyj:=typ!s_poly
s_polyj M:9 DEF palhdr.h[67] s_polyj=9
s_polyj M:9 MAN pal.b[1439] t:=get4(s_polyj,zsy,...)+(p1&ysg)
s_polyj M:9 MAN pal.b[1458] get4(s_polyj,z,y1,...)
s_polyj M:9 MAN pal.b[5686] CASE s_polyj:.. 
s_polyj M:9 MAN pal.b[5996] CASE s_polyj:.. 
s_polyj M:9 MAN pal.b[7520] get4(s_polyj,z,y1,y1)
s_polyj M:9 MAN pal.b[7568] get4(s_polyj,zsy,...)+sg
s_polyj M:9 MAN pal.b[7577] get4(s_polyj,zsy,...)+(q&ysg)
s_polyj M:9 MAN pal.b[7588] f:=get4(s_polyj,zsy,...)+(p&ysg)
s_polyj M:9 MAN pal.b[7625] h1!r:=get4(s_polyj,p,a,y0)
s_polyj M:9 MAN pal.b[7646] r:=get4(s_polyj,zsy,...)+(p&ysg)
s_polyj M:9 MAN pal.b[7684] t:=get4(s_polyj,r1a,t,q3)
s_polyj M:9 MAN pal.b[7732] r:=get4(s_polyj,r,rr,k)
s_polyj M:9 MAN pal.b[7813] q:=get4(s_polyj,q,y0,q3)
s_polyj M:9 MAN pal.b[7818] q:=get4(s_polyj,q,t,q3)
s_polyj M:9 MAN pal.b[7833] q:=get4(s_polyj,q,t,zsy)
s_polyj M:9 MAN pal.b[7868] s:=get4(s_polyj,zsy,...)+(a&ysg)
s_polyj M:9 MAN pal.b[7871] h1!rr:=get4(s_polyj,z,...)XORrr&ysg
s_polyj M:9 MAN pal.b[8232] typ!s_polyj:=typ!s_poly
s_polyj M:9 MAN pal.b[9007] FOR i=s_string TO s_polyj DO..
s_pp M:146 DEF palhdr.h[219] s_pp=146
s_pp M:146 MAN pal.b[8316] dy("true",TRUE,s_pp)
s_pp M:146 MAN pal.b[8362] dy("E",ze,s_pp)
s_pp M:146 MAN pal.b[8363] dy("J",zj,s_pp)
s_pp M:146 MAN pal.b[9386] CASE s_pp:.. 
s_pp M:146 MAN pal.b[9578] CASE s_pp:.. 
s_pp M:146 MAN pal.b[9660] CASE s_pp:.. 
s_q2 M:139 DEF palhdr.h[212] s_q2=139
s_q2 M:139 MAN pal.b[8377] set_p("*"",s_q2)
s_q2 M:139 MAN pal.b[9382] CASE s_q2:.. 
s_qr M:149 DEF palhdr.h[222] s_qr=149
s_qr M:149 MAN pal.b[8380] set_p("?",s_qr)
s_qr M:149 MAN pal.b[9652] CASE s_qr:.. 
s_qu M:36 DEF palhdr.h[97] s_qu=36
s_qu M:36 MAN pal.b[1726] CASE s_qu:.. 
s_qu M:36 MAN pal.b[2016] CASE s_qu:.. 
s_qu M:36 MAN pal.b[3191] CASE s_qu:.. 
s_qu M:36 MAN pal.b[3256] CASE s_qu:.. 
s_qu M:36 MAN pal.b[3585] CASE s_qu:.. 
s_qu M:36 MAN pal.b[3652] CASE s_qu:.. 
s_qu M:36 MAN pal.b[6125] CASE s_qu:.. 
s_qu M:36 MAN pal.b[6713] CASE s_qu:.. 
s_qu M:36 MAN pal.b[7140] CASE s_qu:.. 
s_qu M:36 MAN pal.b[7187] CASE s_qu:.. 
s_qu M:36 MAN pal.b[8246] a_qu:=dv("'",s_codev,...,...)
s_qu M:36 MAN pal.b[8247] set_z(!a_qu,"qu",...,...)
s_qu M:36 MAN pal.b[8248] FOR i=s_glz TO s_qu DO..
s_qu M:36 MAN pal.b[9010] FOR i=s_glg TO s_qu DO..
s_qu M:36 MAN pal.b[9502] CASE s_qu:.. 
s_qu M:36 MAN pal.b[9644] CASE s_qu:.. 
s_qu M:36 MAN pal.b[9732] CASE s_qu:.. 
s_qu M:36 MAN pal.b[9823] get4(s_qu,0,a,0)
s_qu M:36 MAN pal.b[9881] CASE s_qu:.. 
s_ratl M:6 DEF palhdr.h[64] s_ratl=6
s_ratl M:6 MAN pal.b[107] sg:=s_ratl
s_ratl M:6 MAN pal.b[113] RESULTIS get4(s_ratl,h1!b,a,0)
s_ratl M:6 MAN pal.b[136] sg:=s_ratl
s_ratl M:6 MAN pal.b[140] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[1412] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[171] sg:=s_ratl
s_ratl M:6 MAN pal.b[221] sg:=s_ratl
s_ratl M:6 MAN pal.b[230] sg:=s_ratl
s_ratl M:6 MAN pal.b[236] RESULTIS get4(s_ratl,h1!a,b,0)
s_ratl M:6 MAN pal.b[240] RESULTIS get4(s_ratl,h1!b,a,0)
s_ratl M:6 MAN pal.b[263] sg:=s_ratl
s_ratl M:6 MAN pal.b[267] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[304] sg:=s_ratl
s_ratl M:6 MAN pal.b[3183] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[3262] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[413] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[451] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[4771] sg:=s_ratl
s_ratl M:6 MAN pal.b[4788] sg:=s_ratl
s_ratl M:6 MAN pal.b[4804] sg:=s_ratl
s_ratl M:6 MAN pal.b[4806] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[4811] RESULTIS get4(s_ratl,h1!b,a,0)
s_ratl M:6 MAN pal.b[4822] RESULTIS get4(s_ratl,b,c,0)
s_ratl M:6 MAN pal.b[482] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[4889] RESULTIS get4(s_ratl,b,a,0)
s_ratl M:6 MAN pal.b[4903] sg:=s_ratl
s_ratl M:6 MAN pal.b[4909] RESULTIS get4(s_ratl,b,a,0)
s_ratl M:6 MAN pal.b[4920] sg:=s_ratl
s_ratl M:6 MAN pal.b[4926] RESULTIS get4(s_ratl,b,a,0)
s_ratl M:6 MAN pal.b[4937] sg:=s_ratl
s_ratl M:6 MAN pal.b[4960] sg:=s_ratl
s_ratl M:6 MAN pal.b[4979] sg:=s_ratl
s_ratl M:6 MAN pal.b[4999] sg:=s_ratl
s_ratl M:6 MAN pal.b[5019] sg:=s_ratl
s_ratl M:6 MAN pal.b[5040] sg:=s_ratl
s_ratl M:6 MAN pal.b[5043] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[5054] RESULTIS get4(s_ratl,b,a,0)
s_ratl M:6 MAN pal.b[5066] RESULTIS get4(s_ratl,b,a,0)
s_ratl M:6 MAN pal.b[5080] RESULTIS get4(s_ratl,b,c,0)
s_ratl M:6 MAN pal.b[515] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[515] RESULTIS s_ratl
s_ratl M:6 MAN pal.b[5218] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[522] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[532] RESULTIS s_ratl
s_ratl M:6 MAN pal.b[542] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[542] RESULTIS s_ratl
s_ratl M:6 MAN pal.b[5659] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[568] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[5986] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[610] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[654] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[679] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[6938] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[6957] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[6988] RESULTIS get4(s_ratl,p,y1,0)
s_ratl M:6 MAN pal.b[6989] RESULTIS get4(s_ratl,pXORysg,ym,0)
s_ratl M:6 MAN pal.b[6997] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[7004] RESULTIS get4(s_ratl,q,p,0)
s_ratl M:6 MAN pal.b[7050] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[7075] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[7471] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[7942] CASE s_ratl:.. 
s_ratl M:6 MAN pal.b[8230] FOR i=s_flt TO s_ratl DO..
s_ratl M:6 MAN pal.b[8472] fff!s_ratl:=0
s_ratl M:6 MAN pal.b[8515] fff!s_ratl
s_ratl M:6 MAN pal.b[8522] fff!s_ratl:=0
s_ratl M:6 MAN pal.b[8784] UNLESS !a=s_ratl DO ..
s_ratl M:6 MAN palhdr.h[238] mm3=s_ratl
s_ratn M:5 DEF palhdr.h[63] s_ratn=5
s_ratn M:5 MAN pal.b[106] sg:=s_ratn
s_ratn M:5 MAN pal.b[135] sg:=s_ratn
s_ratn M:5 MAN pal.b[1411] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[168] sg:=s_ratn
s_ratn M:5 MAN pal.b[212] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[220] sg:=s_ratn
s_ratn M:5 MAN pal.b[229] sg:=s_ratn
s_ratn M:5 MAN pal.b[262] sg:=s_ratn
s_ratn M:5 MAN pal.b[301] sg:=s_ratn
s_ratn M:5 MAN pal.b[3182] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[3261] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[412] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[455] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[4667] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[4756] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[4770] sg:=s_ratn
s_ratn M:5 MAN pal.b[4787] sg:=s_ratn
s_ratn M:5 MAN pal.b[4803] sg:=s_ratn
s_ratn M:5 MAN pal.b[481] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[4880] RESULTIS get4(s_ratn,...+y0,...,0)
s_ratn M:5 MAN pal.b[4902] sg:=s_ratn
s_ratn M:5 MAN pal.b[4919] sg:=s_ratn
s_ratn M:5 MAN pal.b[491] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[4936] sg:=s_ratn
s_ratn M:5 MAN pal.b[4940] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[4959] sg:=s_ratn
s_ratn M:5 MAN pal.b[4978] sg:=s_ratn
s_ratn M:5 MAN pal.b[4998] sg:=s_ratn
s_ratn M:5 MAN pal.b[5018] sg:=s_ratn
s_ratn M:5 MAN pal.b[501] RESULTIS s_ratn
s_ratn M:5 MAN pal.b[5039] sg:=s_ratn
s_ratn M:5 MAN pal.b[510] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[510] RESULTIS s_ratn
s_ratn M:5 MAN pal.b[5217] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[541] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[5658] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[567] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[5985] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[609] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[648] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[6782] IF s_ratn<=!a&!a<=s_ratp DO ..
s_ratn M:5 MAN pal.b[678] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[6937] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[6937] RESULTIS get4(s_ratn,h1!p,...,0)
s_ratn M:5 MAN pal.b[6955] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[6977] RESULTIS get4(s_ratn,signbit-p,ym,0)
s_ratn M:5 MAN pal.b[6980] RESULTIS get4(s_ratn,p,y1,0)
s_ratn M:5 MAN pal.b[6990] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[6996] RESULTIS get4(s_ratn,q,p,0)
s_ratn M:5 MAN pal.b[7049] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[7074] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[7373] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[7435] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[7936] CASE s_ratn:.. 
s_ratn M:5 MAN pal.b[98] CASE s_ratn:.. 
s_ratp M:7 DEF palhdr.h[65] s_ratp=7
s_ratp M:7 MAN pal.b[1417] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[141] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[170] RESULTIS get4(s_ratp,u,a,...)
s_ratp M:7 MAN pal.b[268] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[303] RESULTIS get4(s_ratp,u,a,...)
s_ratp M:7 MAN pal.b[3184] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[3263] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[414] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[453] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[4831] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[4836] RESULTIS get4(s_ratp,h1!b,a,...)
s_ratp M:7 MAN pal.b[483] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[4847] RESULTIS get4(s_ratp,c,a,...)
s_ratp M:7 MAN pal.b[5107] RESULTIS get4(s_ratp,b,a,...)
s_ratp M:7 MAN pal.b[5112] RESULTIS get4(s_ratp,b,a,...)
s_ratp M:7 MAN pal.b[5114] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[5128] RESULTIS get4(s_ratp,b,a,...)
s_ratp M:7 MAN pal.b[512] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[5130] RESULTIS get4(s_ratp,a1,a,...)
s_ratp M:7 MAN pal.b[5159] RESULTIS get4(s_ratp,b2,b,...)
s_ratp M:7 MAN pal.b[5162] RESULTIS get4(s_ratp,h1!a,b,...)
s_ratp M:7 MAN pal.b[5408] IF !a=s_ratp DO ..
s_ratp M:7 MAN pal.b[543] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[551] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[561] RESULTIS s_ratp
s_ratp M:7 MAN pal.b[5660] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[574] RESULTIS s_ratp
s_ratp M:7 MAN pal.b[5791] TEST !p=s_ratp THEN .. ELSE ..
s_ratp M:7 MAN pal.b[580] RESULTIS s_ratp
s_ratp M:7 MAN pal.b[5820] TEST !p2=s_poly|!p2=s_ratp THEN .. ELSE ..
s_ratp M:7 MAN pal.b[582] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[589] RESULTIS s_ratp
s_ratp M:7 MAN pal.b[5993] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[625] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[631] RESULTIS s_ratp
s_ratp M:7 MAN pal.b[655] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[6782] IF s_ratn<=!a&!a<=s_ratp DO ..
s_ratp M:7 MAN pal.b[6790] IF !a=s_ratp DO ..
s_ratp M:7 MAN pal.b[684] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[6939] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[7005] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[7008] RESULTIS get4(s_ratp,p,q,...)
s_ratp M:7 MAN pal.b[7054] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[7480] CASE s_ratp:.. 
s_ratp M:7 MAN pal.b[7940] CASE s_ratp:.. 
s_rds M:26 DEF palhdr.h[86] s_rds=26
s_rds M:26 MAN pal.b[2045] CASE s_rds:.. 
s_rds M:26 MAN pal.b[4670] CASE s_rds:.. 
s_rds M:26 MAN pal.b[5600] RESULTIS get4(s_rds,0,n,0)
s_rds M:26 MAN pal.b[5664] CASE s_rds:.. 
s_rds M:26 MAN pal.b[6701] CASE s_rds:.. 
s_rds M:26 MAN pal.b[7375] CASE s_rds:.. 
s_rds M:26 MAN pal.b[8242] typ!s_rds:=set_f("RDS",@rds)
s_rec M:49 DEF palhdr.h[113] s_rec=49
s_rec M:49 MAN pal.b[1761] CASE s_rec:.. 
s_rec M:49 MAN pal.b[3339] CASE s_rec:.. 
s_rec M:49 MAN pal.b[6055] CASE s_rec:.. 
s_rec M:49 MAN pal.b[6818] IF s_rec<=!a&!a<=s_zz DO ..
s_rec M:49 MAN pal.b[8256] typ!s_rec:=du("rec",s_code2,...,s_rec)
s_rec M:49 MAN pal.b[8257] typ!s_reca:=typ!s_rec
s_rec M:49 MAN pal.b[9515] CASE s_rec:.. 
s_rec M:49 MAN pal.b[9683] CASE s_rec:.. 
s_rec M:49 MAN pal.b[9796] sg:=s_rec
s_reca M:50 DEF palhdr.h[114] s_reca=50
s_reca M:50 MAN pal.b[1765] CASE s_reca:.. 
s_reca M:50 MAN pal.b[3340] CASE s_reca:.. 
s_reca M:50 MAN pal.b[6056] CASE s_reca:.. 
s_reca M:50 MAN pal.b[8257] typ!s_reca:=typ!s_rec
s_reca M:50 MAN pal.b[9018] fff!s_reca:=ff_reca
s_reca M:50 MAN pal.b[9795] sg:=s_reca
s_relop M:132 DEF palhdr.h[205] s_relop=132
s_relop M:132 MAN pal.b[7990] p1:=prios(s_relop,p1,p2,p3)
s_relop M:132 MAN pal.b[8373] set_q("~=",mk_ne,s_relop,...)
s_relop M:132 MAN pal.b[8374] set_q(">=",mk_ge,s_relop,...)
s_relop M:132 MAN pal.b[8375] set_q("<=",mk_le,s_relop,...)
s_relop M:132 MAN pal.b[8376] set_q("<",mk_lt,s_relop,...)
s_relop M:132 MAN pal.b[9524] rbv(s_relop+y0)
s_relop M:132 MAN pal.b[9618] CASE s_relop:.. 
s_relop M:132 MAN pal.b[9624] WHILE sym=s_relop DO ..
s_relop M:132 MAN pal.b[9680] h2!d:=rbvlist(s_relop+y0)
s_relop M:132 MAN pal.b[9681] h3!d:=rfndef(s_relop+y0,y1)
s_repeat M:125 DEF palhdr.h[198] s_repeat=125
s_repeat M:125 MAN pal.b[8302] set_p("repeat",s_repeat)
s_retu M:60 DEF palhdr.h[125] s_retu=60
s_retu M:60 MAN pal.b[1889] CASE s_retu:.. 
s_retu M:60 MAN pal.b[6118] CASE s_retu:.. 
s_retu M:60 MAN pal.b[8260] typ!s_retu:=dv("return",s_codev,...,...)
s_retu M:60 MAN pal.b[9503] CASE s_retu:.. 
s_retu M:60 MAN pal.b[9820] get4(s_retu,0,a,0)
s_rpar M:134 DEF palhdr.h[207] s_rpar=134
s_rpar M:134 MAN pal.b[8370] set_p(")",s_rpar)
s_rpar M:134 MAN pal.b[9228] UNLESS sym=s_rpar DO ..
s_rpar M:134 MAN pal.b[9728] d:=rbvlist(s_rpar+y0)
s_seq M:57 DEF palhdr.h[122] s_seq=57
s_seq M:57 MAN pal.b[10171] sg:=s_seq
s_seq M:57 MAN pal.b[10232] h2!a:=get4(s_seq,h2!a,b,0)
s_seq M:57 MAN pal.b[10235] h2!b:=get4(s_seq,a,...,0)
s_seq M:57 MAN pal.b[10237] a:=get4(s_seq,a,b,0)
s_seq M:57 MAN pal.b[10246] a:=get4(s_seq,z,a,0)
s_seq M:57 MAN pal.b[10282] CASE s_seq:.. 
s_seq M:57 MAN pal.b[1772] CASE s_seq:.. 
s_seq M:57 MAN pal.b[3215] CASE s_seq:.. 
s_seq M:57 MAN pal.b[3531] CASE s_seq:.. 
s_seq M:57 MAN pal.b[6100] CASE s_seq:.. 
s_seq M:57 MAN pal.b[8263] typ!s_seq:=ds(";",@mseq,seq,...)
s_seq M:57 MAN pal.b[8264] typ!s_seqa:=typ!s_seq
s_seq M:57 MAN pal.b[8265] set_z(!typ!s_seq,"<>",...,...)
s_seqa M:58 DEF palhdr.h[123] s_seqa=58
s_seqa M:58 MAN pal.b[10170] sg:=s_seqa
s_seqa M:58 MAN pal.b[10283] CASE s_seqa:.. 
s_seqa M:58 MAN pal.b[1775] CASE s_seqa:.. 
s_seqa M:58 MAN pal.b[3216] CASE s_seqa:.. 
s_seqa M:58 MAN pal.b[3532] CASE s_seqa:.. 
s_seqa M:58 MAN pal.b[6101] CASE s_seqa:.. 
s_seqa M:58 MAN pal.b[8264] typ!s_seqa:=typ!s_seq
s_seqa M:58 MAN pal.b[9020] fff!s_seqa:=ff_seqa
s_sh1 M:140 DEF palhdr.h[213] s_sh1=140
s_sh1 M:140 MAN pal.b[8378] set_p("#",s_sh1)
s_sh1 M:140 MAN pal.b[9389] CASE s_sh1:.. 
s_string M:1 DEF palhdr.h[59] s_string=1
s_string M:1 MAN pal.b[3178] CASE s_string:.. 
s_string M:1 MAN pal.b[3257] CASE s_string:.. 
s_string M:1 MAN pal.b[4686] CASE s_string:.. 
s_string M:1 MAN pal.b[5703] CASE s_string:.. 
s_string M:1 MAN pal.b[5734] IF s>0&!s=s_string DO ..
s_string M:1 MAN pal.b[5963] CASE s_string:.. 
s_string M:1 MAN pal.b[6003] CASE s_string:.. 
s_string M:1 MAN pal.b[6339] IF s1>0&!s1=s_string DO ..
s_string M:1 MAN pal.b[6723] CASE s_string:.. 
s_string M:1 MAN pal.b[6869] c1,h1!gg,gg:=str1,getx(s_string,...),h1!gg
s_string M:1 MAN pal.b[6879] IF a>0&!a=s_string DO ..
s_string M:1 MAN pal.b[690] CASE s_string:.. 
s_string M:1 MAN pal.b[694] IF q>0&!q=s_string DO ..
s_string M:1 MAN pal.b[695] RESULTIS s_string
s_string M:1 MAN pal.b[7388] CASE s_string:.. 
s_string M:1 MAN pal.b[7483] CASE s_string:.. 
s_string M:1 MAN pal.b[8221] zs:=get4(s_string,z,0,0)
s_string M:1 MAN pal.b[8228] typ!s_string:=set_f("STRING",@string)
s_string M:1 MAN pal.b[9007] FOR i=s_string TO s_polyj DO..
s_string M:1 MAN pal.b[9332] getx(s_string,z,0,0)
s_string M:1 MAN pal.b[9383] sym:=s_string
s_string M:1 MAN pal.b[9439] s2,h1!gg,gg:=str1,getx(s_string,...),h1!gg
s_string M:1 MAN pal.b[9581] CASE s_string:.. 
s_string M:1 MAN pal.b[9663] CASE s_string:.. 
s_then M:128 DEF palhdr.h[201] s_then=128
s_then M:128 MAN pal.b[8294] set_p("then",s_then)
s_then M:128 MAN pal.b[9241] UNLESS sym=s_then DO ..
s_tra M:40 DEF palhdr.h[102] s_tra=40
s_tra M:40 MAN pal.b[1720] CASE s_tra:.. 
s_tra M:40 MAN pal.b[4658] CASE s_tra:.. 
s_tra M:40 MAN pal.b[5643] CASE s_tra:.. 
s_tra M:40 MAN pal.b[6021] CASE s_tra:.. 
s_tra M:40 MAN pal.b[7280] h3!a:=get4(s_tra,f,...,b)
s_tra M:40 MAN pal.b[7291] IF a3>0&!a3=s_tra DO ..
s_tra M:40 MAN pal.b[7370] CASE s_tra:.. 
s_tra M:40 MAN pal.b[8251] typ!s_tra:=set_c("TRACE",@trace)
s_tra M:40 MAN pal.b[8449] fff!s_tra:=0
s_tuple M:38 DEF palhdr.h[99] s_tuple=38
s_tuple M:38 MAN pal.b[10016] TEST !v=s_tuple&simtup(v) THEN .. ELSE ..
s_tuple M:38 MAN pal.b[1875] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[2076] UNTIL arg1>0&!arg1=s_tuple&h3!arg1=y2 DO ..
s_tuple M:38 MAN pal.b[2098] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[2106] IF !arg1=s_tuple DO ..
s_tuple M:38 MAN pal.b[2138] h1!c:=get4(s_tuple,h1!c,arg1,c31)
s_tuple M:38 MAN pal.b[2216] UNTIL arg1>0&!arg1=s_tuple&h3!arg1=h3!c2 DO ..
s_tuple M:38 MAN pal.b[2259] arg1:=get4(s_tuple,z,arg1,y1)
s_tuple M:38 MAN pal.b[2260] arg1:=get4(s_tuple,t,arg1,...)
s_tuple M:38 MAN pal.b[2273] arg1:=get4(s_tuple,z,arg1,y1)
s_tuple M:38 MAN pal.b[2274] arg1:=get4(s_tuple,t,arg1,...)
s_tuple M:38 MAN pal.b[2473] gw0:=get4(s_tuple,h2!f,arg1,...)
s_tuple M:38 MAN pal.b[2481] gw0:=get4(s_tuple,z,arg1,y1)
s_tuple M:38 MAN pal.b[2488] arg1:=get4(s_tuple,h2!f,arg1,...)
s_tuple M:38 MAN pal.b[2492] !t,h1!t,h2!t,h3!t:=s_tuple,h2!t,arg1,h2!c
s_tuple M:38 MAN pal.b[2498] arg1:=get4(s_tuple,z,arg1,y1)
s_tuple M:38 MAN pal.b[2676] arg1:=get4(s_tuple,z,t,y1)
s_tuple M:38 MAN pal.b[2677] UNTIL !arg1=s_tuple DO ..
s_tuple M:38 MAN pal.b[2682] arg1:=get4(s_tuple,arg1,t,...)
s_tuple M:38 MAN pal.b[2698] h2!f:=get4(s_tuple,z,t,y1)
s_tuple M:38 MAN pal.b[2699] s:=get4(s_tuple,z,t,y1)
s_tuple M:38 MAN pal.b[2701] UNTIL !s=s_tuple DO ..
s_tuple M:38 MAN pal.b[2707] h2!f:=get4(s_tuple,s,t,...)
s_tuple M:38 MAN pal.b[2708] s:=get4(s_tuple,s,t,...)
s_tuple M:38 MAN pal.b[2950] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[3023] p:=get4(s_tuple,p,b,l)
s_tuple M:38 MAN pal.b[3141] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[3194] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[3310] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[3427] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[3580] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[3598] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[3648] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[403] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[5678] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[5902] TEST a>0&!a=s_tuple THEN .. ELSE ..
s_tuple M:38 MAN pal.b[5909] IF !l=s_tuple DO ..
s_tuple M:38 MAN pal.b[5960] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[6012] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[6357] IF a1>0&!a1=s_tuple DO ..
s_tuple M:38 MAN pal.b[6420] UNLESS a>0&!a=s_tuple&h3!a=n DO ..
s_tuple M:38 MAN pal.b[6470] IF !p=s_tuple DO ..
s_tuple M:38 MAN pal.b[6501] UNLESS v>0&!v=s_tuple DO ..
s_tuple M:38 MAN pal.b[6522] RESULTIS get4(s_tuple,z,q,y1)
s_tuple M:38 MAN pal.b[6524] IF !p=s_tuple DO ..
s_tuple M:38 MAN pal.b[6525] RESULTIS get4(s_tuple,p,q,...)
s_tuple M:38 MAN pal.b[6530] RESULTIS get4(s_tuple,p,q,y1)
s_tuple M:38 MAN pal.b[6545] IF p>0&!p=s_tuple DO ..
s_tuple M:38 MAN pal.b[6546] UNLESS q>0&!q=s_tuple&h3!q=h3!p DO ..
s_tuple M:38 MAN pal.b[6563] IF p>0&!p=s_tuple DO ..
s_tuple M:38 MAN pal.b[6565] q,l,p:=get4(s_tuple,q,...),l+1,h1!p
s_tuple M:38 MAN pal.b[6682] UNLESS arg1>0&!arg1=s_tuple DO ..
s_tuple M:38 MAN pal.b[6728] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[6804] RESULTIS !a=s_tuple
s_tuple M:38 MAN pal.b[7125] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[7126] UNTIL w>0&!w=s_tuple&h3!v=h3!w DO ..
s_tuple M:38 MAN pal.b[7176] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[7177] UNTIL w>0&!w=s_tuple&h3!v=h3!w DO ..
s_tuple M:38 MAN pal.b[7294] IF !a=s_tuple DO ..
s_tuple M:38 MAN pal.b[7530] IF !n=s_tuple DO ..
s_tuple M:38 MAN pal.b[8249] typ!s_tuple:=set_v("TUPLE",@tuple)
s_tuple M:38 MAN pal.b[8382] set_p(",",s_tuple)
s_tuple M:38 MAN pal.b[9014] fff!s_tuple:=ff_tuple
s_tuple M:38 MAN pal.b[9497] IF sym=s_tuple DO ..
s_tuple M:38 MAN pal.b[9520] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[9527] IF sym=s_tuple DO ..
s_tuple M:38 MAN pal.b[9603] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[9608] .. REPEATWHILE sym=s_tuple
s_tuple M:38 MAN pal.b[9614] IF sym=s_tuple DO ..
s_tuple M:38 MAN pal.b[9721] IF sym=s_tuple DO ..
s_tuple M:38 MAN pal.b[9753] UNLESS sym=s_tuple DO ..
s_tuple M:38 MAN pal.b[9758] .. REPEATWHILE sym=s_tuple
s_tuple M:38 MAN pal.b[9874] CASE s_tuple:.. 
s_tuple M:38 MAN pal.b[9875] UNLESS d>0&!d=s_tuple&h3!c=h3!d DO ..
s_tuple M:38 MAN pal.b[9923] IF b>0&!b=s_tuple&h3!b=y2 DO ..
s_tuple M:38 MAN pal.b[9934] IF b>0&!b=s_tuple&h3!b=y2 DO ..
s_tuple M:38 MAN pal.b[9942] IF b>0&!b=s_tuple&h3!b=h3!h2!v DO ..
s_tuple M:38 MAN pal.b[9954] CASE s_tuple:.. 
s_unless M:122 DEF palhdr.h[195] s_unless=122
s_unless M:122 MAN pal.b[8299] set_p("unless",s_unless)
s_unless M:122 MAN pal.b[9539] CASE s_unless:.. 
s_unset M:29 DEF palhdr.h[89] s_unset=29
s_unset M:29 MAN pal.b[1737] CASE s_unset:.. 
s_unset M:29 MAN pal.b[2040] CASE s_unset:.. 
s_unset M:29 MAN pal.b[3383] CASE s_unset:.. 
s_unset M:29 MAN pal.b[4656] CASE s_unset:.. 
s_unset M:29 MAN pal.b[5648] CASE s_unset:.. 
s_unset M:29 MAN pal.b[7368] CASE s_unset:.. 
s_unset M:29 MAN pal.b[8213] zsy:=get4(s_unset,z,y0,...)
s_unset M:29 MAN pal.b[9908] CASE s_unset:.. 
s_unset1 M:30 DEF palhdr.h[90] s_unset1=30
s_unset1 M:30 MAN pal.b[1739] CASE s_unset1:.. 
s_unset1 M:30 MAN pal.b[2042] CASE s_unset1:.. 
s_unset1 M:30 MAN pal.b[4657] CASE s_unset1:.. 
s_unset1 M:30 MAN pal.b[5649] CASE s_unset1:.. 
s_unset1 M:30 MAN pal.b[5981] CASE s_unset1:.. 
s_unset1 M:30 MAN pal.b[7369] CASE s_unset1:.. 
s_unset1 M:30 MAN pal.b[8222] zsc:=get4(s_unset1,0,0,0)
s_until M:124 DEF palhdr.h[197] s_until=124
s_until M:124 MAN pal.b[8301] set_p("until",s_until)
s_until M:124 MAN pal.b[9556] CASE s_until:.. 
s_where M:138 DEF palhdr.h[211] s_where=138
s_where M:138 MAN pal.b[8355] set_p("where",s_where)
s_where M:138 MAN pal.b[9589] CASE s_where:.. 
s_while M:123 DEF palhdr.h[196] s_while=123
s_while M:123 MAN pal.b[8300] set_p("while",s_while)
s_within M:137 DEF palhdr.h[210] s_within=137
s_within M:137 MAN pal.b[8325] set_p("within",s_within)
s_within M:137 MAN pal.b[9688] CASE s_within:.. 
s_wrs M:27 DEF palhdr.h[87] s_wrs=27
s_wrs M:27 MAN pal.b[2049] CASE s_wrs:.. 
s_wrs M:27 MAN pal.b[4671] CASE s_wrs:.. 
s_wrs M:27 MAN pal.b[5607] RESULTIS get4(s_wrs,0,n,0)
s_wrs M:27 MAN pal.b[5665] CASE s_wrs:.. 
s_wrs M:27 MAN pal.b[6702] CASE s_wrs:.. 
s_wrs M:27 MAN pal.b[7376] CASE s_wrs:.. 
s_wrs M:27 MAN pal.b[8243] typ!s_wrs:=set_f("WRS",@wrs)
s_xtupl M:39 DEF palhdr.h[100] s_xtupl=39
s_xtupl M:39 MAN pal.b[2120] CASE s_xtupl:.. 
s_xtupl M:39 MAN pal.b[404] CASE s_xtupl:.. 
s_xtupl M:39 MAN pal.b[4655] CASE s_xtupl:.. 
s_xtupl M:39 MAN pal.b[5681] CASE s_xtupl:.. 
s_xtupl M:39 MAN pal.b[5919] IF l>=yloc|!l=s_xtupl DO ..
s_xtupl M:39 MAN pal.b[5957] CASE s_xtupl:.. 
s_xtupl M:39 MAN pal.b[6008] CASE s_xtupl:.. 
s_xtupl M:39 MAN pal.b[6421] IF a>=yloc|a>0&!a=s_xtupl DO ..
s_xtupl M:39 MAN pal.b[6526] IF p>=yloc|!p=s_xtupl DO ..
s_xtupl M:39 MAN pal.b[6616] get4(s_xtupl,z,p,y0)
s_xtupl M:39 MAN pal.b[6697] CASE s_xtupl:.. 
s_xtupl M:39 MAN pal.b[7367] CASE s_xtupl:.. 
s_xtupl M:39 MAN pal.b[8250] typ!s_xtupl:=set_v("SAVE",@xtuple)
s_xtupl M:39 MAN pal.b[8448] fff!s_xtupl:=0
s_z M:82 DEF palhdr.h[149] s_z=82
s_z M:82 MAN pal.b[1893] m:=s_z
s_z M:82 MAN pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
s_z M:82 MAN pal.b[1954] CASE s_z:.. 
s_z M:82 MAN pal.b[2169] CASE s_z:.. 
s_z M:82 MAN pal.b[2235] m:=s_z
s_z M:82 MAN pal.b[2243] m:=s_z
s_z M:82 MAN palhdr.h[241] jgap=s_mz-s_z
s_zz M:63 DEF palhdr.h[128] s_zz=63
s_zz M:63 MAN pal.b[1813] CASE s_zz:.. 
s_zz M:63 MAN pal.b[2956] CASE s_zz:.. 
s_zz M:63 MAN pal.b[3627] CASE s_zz:.. 
s_zz M:63 MAN pal.b[3654] CASE s_zz:.. 
s_zz M:63 MAN pal.b[6127] CASE s_zz:.. 
s_zz M:63 MAN pal.b[6818] IF s_rec<=!a&!a<=s_zz DO ..
s_zz M:63 MAN pal.b[7147] CASE s_zz:.. 
s_zz M:63 MAN pal.b[7194] CASE s_zz:.. 
s_zz M:63 MAN pal.b[8269] typ!s_zz:=dv("!",s_codev,...,...)
s_zz M:63 MAN pal.b[9025] fff!s_zz:=ff_ave
s_zz M:63 MAN pal.b[9505] CASE s_zz:.. 
s_zz M:63 MAN pal.b[9646] CASE s_zz:.. 
s_zz M:63 MAN pal.b[9734] CASE s_zz:.. 
s_zz M:63 MAN pal.b[9852] get4(s_zz,0,a,iv)
s_zz M:63 MAN pal.b[9883] CASE s_zz:.. 
sadd G:334 DEF palhdr.h[410] sadd=
sadd G:334 FN pal.b[3823] LET sadd(n)=..
sadd G:334 LG pal.b[103] a:=sadd(a+h2!b+signbit)
sadd G:334 LG pal.b[121] a:=sadd(a+b+signbit)
sadd G:334 LG pal.b[195] RESULTIS sadd(a-b)
sadd G:334 LG pal.b[217] b:=sadd(h2!a-b)
sadd G:334 LG pal.b[226] a:=sadd(a-h2!b)
sadd G:334 LG pal.b[248] a:=sadd(a-b)
sadd G:334 LG pal.b[5276] sadd(@g0!n)
sadd G:334 LG pal.b[7047] RESULTIS sadd(Op27)
sadd G:334 LG pal.b[87] RESULTIS sadd(a+b+signbit)
sardch G:36 DEF libhdr.h[51] sardch=36
savearea G:205 DEF palhdr.h[260] savearea=
savearea G:205 LG pal.b[1164] savearea!29>>2
saveregs M:31 DEF libhdr.h[357] saveregs=31
sawrch G:37 DEF libhdr.h[52] sawrch=37
sawritef G:95 DEF libhdr.h[111] sawritef=95
sawritef G:95 DEF palhdr.h[29] sawritef=95
sawritef G:95 LG pal.b[4373] sawritef("get4:'ackp=%n*n",stackp)
sawritef G:95 LG pal.b[4377] sawritef("get4:'ackp=%n*n",stackp)
sawritef G:95 LG pal.b[46] sawritef("load: %s %s*n",s1,s2)
sawritef G:95 LG pal.b[63] sawritef("*ndate=>%s*n",datstr+5)
sawritef G:95 LG pal.b[8212] sawritef("setup'akpoint*n")
sawritef G:95 LG pal.b[8214] sawritef("setup'akpoint*n")
sawritef G:95 LG pal.b[8909] sawritef("Bad a'for PAL*n")
sawritef G:95 LG pal.b[8975] sawritef("*nstar'p (=%n)*n",setup)
sawritef G:95 LG pal.b[8978] sawritef("*nstar'SETUP*")*n")
scanp G:327 DEF palhdr.h[401] scanp=
scanp G:327 LG pal.b[4343] scanp(indir)
scanp G:327 LG pal.b[4357] scanp(indir)
scanp G:327 LG pal.b[5328] scanp(verh)
scanp G:327 RT pal.b[4447] LET scanp(f)BE..
scanst G:328 DEF palhdr.h[402] scanst=
scanst G:328 LG pal.b[4455] scanst(f)
scanst G:328 RT pal.b[4459] LET scanst(f)BE..
scb_blength M:14 DEF libhdr.h[387] scb_blength=
scb_block M:9 DEF libhdr.h[382] scb_block=
scb_buf M:3 DEF libhdr.h[376] scb_buf=
scb_bufend M:11 DEF libhdr.h[384] scb_bufend=
scb_encoding M:19 DEF libhdr.h[397] scb_encoding=
scb_end M:5 DEF libhdr.h[378] scb_end=
scb_endfn M:8 DEF libhdr.h[381] scb_endfn=
scb_fd M:16 DEF libhdr.h[389] scb_fd=
scb_id M:0 DEF libhdr.h[373] scb_id=0
scb_lblock M:12 DEF libhdr.h[385] scb_lblock=
scb_ldata M:13 DEF libhdr.h[386] scb_ldata=
scb_maxnamelen M:31 DEF libhdr.h[371] scb_maxnamelen=31
scb_maxnamelen M:31 MAN libhdr.h[401] scb_nameeend=scb_name+scb_maxnamelen/bytesperword
scb_name M:20 DEF libhdr.h[399] scb_name=
scb_name M:20 MAN libhdr.h[401] scb_nameeend=scb_name+scb_maxnamelen/bytesperword
scb_nameeend M:27 DEF libhdr.h[401] scb_nameeend=scb_name+scb_maxnamelen/bytesperword
scb_pos M:4 DEF libhdr.h[377] scb_pos=
scb_rdfn M:6 DEF libhdr.h[379] scb_rdfn=
scb_reclen M:15 DEF libhdr.h[388] scb_reclen=
scb_size M:28 DEF libhdr.h[404] scb_size=
scb_size M:28 MAN libhdr.h[405] scb_upb=scb_size-1
scb_task M:2 DEF libhdr.h[375] scb_task=
scb_timeout M:17 DEF libhdr.h[390] scb_timeout=
scb_timeoutact M:18 DEF libhdr.h[393] scb_timeoutact=
scb_type M:1 DEF libhdr.h[374] scb_type=
scb_upb M:27 DEF libhdr.h[405] scb_upb=scb_size-1
scb_wrfn M:7 DEF libhdr.h[380] scb_wrfn=
scb_write M:10 DEF libhdr.h[383] scb_write=
scbt_console M:-1 DEF libhdr.h[367] scbt_console=-1
scbt_file M:1 DEF libhdr.h[365] scbt_file=1
scbt_mbx M:-2 DEF libhdr.h[368] scbt_mbx=-2
scbt_net M:2 DEF libhdr.h[364] scbt_net=2
scbt_ram M:0 DEF libhdr.h[366] scbt_ram=0
scbt_tcp M:-3 DEF libhdr.h[369] scbt_tcp=-3
sdiv G:336 DEF palhdr.h[412] sdiv=
sdiv G:336 FN pal.b[4144] LET sdiv(a,b,c)=..
sdiv G:336 LG pal.b[4182] h2!n:=sdiv(result2,h2!n,gl1)
sdiv G:336 LG pal.b[4183] h3!n:=sdiv(result2,h3!n,gl1)
sectword M:64991 DEF libhdr.h[184] sectword=64991
sel1 G:391 DEF palhdr.h[478] sel1=
sel1 G:391 FN pal.b[6395] LET sel1(a)=..
sel2 G:392 DEF palhdr.h[479] sel2=
sel2 G:392 FN pal.b[6398] LET sel2(a)=..
sel2 G:392 LG pal.b[9011] fff!i:=sel2
selectinput G:56 DEF libhdr.h[71] selectinput=56
selectinput G:56 DEF palhdr.h[25] selectinput=56
selectinput G:56 LG pal.b[749] selectinput(s)
selectinput G:56 LG pal.b[769] selectinput(s)
selectinput G:56 LG pal.b[772] selectinput(q_input)
selectoutput G:57 DEF libhdr.h[72] selectoutput=57
selectoutput G:57 DEF palhdr.h[26] selectoutput=57
selectoutput G:57 LG pal.b[1103] selectoutput(sysout)
selectoutput G:57 LG pal.b[1107] selectoutput(ostream)
selectoutput G:57 LG pal.b[1483] selectoutput(sysout)
selectoutput G:57 LG pal.b[1496] selectoutput(q_output)
selectoutput G:57 LG pal.b[4253] selectoutput(sysout)
selectoutput G:57 LG pal.b[4258] selectoutput(q_output)
selectoutput G:57 LG pal.b[737] selectoutput(s)
selectoutput G:57 LG pal.b[757] selectoutput(s)
selectoutput G:57 LG pal.b[782] selectoutput(s)
selectoutput G:57 LG pal.b[785] selectoutput(q_output)
selectoutput G:57 LG pal.b[9168] selectoutput(sysout)
seq G:575 DEF palhdr.h[685] seq=
seq G:575 FN pal.b[10224] LET seq(a,b)=..
seq G:575 LG pal.b[10108] f:=seq(f,k)
seq G:575 LG pal.b[10122] f:=seq(f,k)
seq G:575 LG pal.b[10133] f:=seq(f,s)
seq G:575 LG pal.b[10142] f:=seq(f,k)
seq G:575 LG pal.b[8263] typ!s_seq:=ds(";",@mseq,seq,...)
set_c F:16 FN pal.b[8034] LET set_c(s,f)=..
set_c F:16 LF pal.b[8231] typ!s_poly:=set_c("POL",@pol)
set_c F:16 LF pal.b[8251] typ!s_tra:=set_c("TRACE",@trace)
set_c F:16 LF pal.b[8270] typ!s_apz:=set_c("AP",@ap1)
set_c F:16 LF pal.b[8309] set_c("GCD",@gcda)
set_c F:16 LF pal.b[8337] set_c("ALGATOM",@algatom)
set_c F:16 LF pal.b[8345] set_c("RATAPPROX",@ratapprox)
set_c F:16 LF pal.b[8353] set_c("FIND",@find)
set_c F:16 LF pal.b[8358] set_c("GENGLO",@genglo)
set_d F:14 FN pal.b[8028] LET set_d(s,f)=..
set_d F:14 LF pal.b[8233] typ!s_loc:=set_d("LV",@lvv)
set_d F:14 LF pal.b[8291] set_d("ERROR",@error)
set_d F:14 LF pal.b[8292] set_d("I",@iv)
set_f F:17 FN pal.b[8037] LET set_f(s,f)=..
set_f F:17 LF pal.b[8228] typ!s_string:=set_f("STRING",@string)
set_f F:17 LF pal.b[8242] typ!s_rds:=set_f("RDS",@rds)
set_f F:17 LF pal.b[8243] typ!s_wrs:=set_f("WRS",@wrs)
set_f F:17 LF pal.b[8304] set_f("PARAM",@param)
set_f F:17 LF pal.b[8311] set_f("UNDUMP",@undump)
set_f F:17 LF pal.b[8314] set_f("NUMBER",@number)
set_f F:17 LF pal.b[8321] set_f("GET",@getv)
set_f F:17 LF pal.b[8334] set_f("GETM",@getmv)
set_f F:17 LF pal.b[8352] set_f("LOAD",@g_load)
set_f F:17 LF pal.b[8356] set_f("UNLOAD",@g_unload)
set_f F:17 LF pal.b[8360] set_f("DUMP",@dump)
set_p F:10 FN pal.b[8012] LET set_p(s,n)=..
set_p F:10 LF pal.b[8290] set_p("nil",s_nil)
set_p F:10 LF pal.b[8293] set_p("do",s_do)
set_p F:10 LF pal.b[8294] set_p("then",s_then)
set_p F:10 LF pal.b[8295] set_p("or",s_or)
set_p F:10 LF pal.b[8296] set_p("else",s_else)
set_p F:10 LF pal.b[8297] set_p("by",s_by)
set_p F:10 LF pal.b[8298] set_p("if",s_if)
set_p F:10 LF pal.b[8299] set_p("unless",s_unless)
set_p F:10 LF pal.b[8300] set_p("while",s_while)
set_p F:10 LF pal.b[8301] set_p("until",s_until)
set_p F:10 LF pal.b[8302] set_p("repeat",s_repeat)
set_p F:10 LF pal.b[8303] set_p("for",s_for)
set_p F:10 LF pal.b[8310] set_p("fin",s_fin)
set_p F:10 LF pal.b[8325] set_p("within",s_within)
set_p F:10 LF pal.b[8351] set_p("in",s_in)
set_p F:10 LF pal.b[8355] set_p("where",s_where)
set_p F:10 LF pal.b[8364] set_p("and",s_and)
set_p F:10 LF pal.b[8369] set_p("(",s_lpar)
set_p F:10 LF pal.b[8370] set_p(")",s_rpar)
set_p F:10 LF pal.b[8377] set_p("*"",s_q2)
set_p F:10 LF pal.b[8378] set_p("#",s_sh1)
set_p F:10 LF pal.b[8379] set_p(".",s_dot)
set_p F:10 LF pal.b[8380] set_p("?",s_qr)
set_p F:10 LF pal.b[8381] set_p("%",s_infix)
set_p F:10 LF pal.b[8382] set_p(",",s_tuple)
set_q F:11 FN pal.b[8017] LET set_q(s,f,n,p1,p2,p3)=..
set_q F:11 LF pal.b[8371] set_q("|",mk_logor,s_diadop,...)
set_q F:11 LF pal.b[8372] set_q("&",mk_logand,s_diadop,...)
set_q F:11 LF pal.b[8373] set_q("~=",mk_ne,s_relop,...)
set_q F:11 LF pal.b[8374] set_q(">=",mk_ge,s_relop,...)
set_q F:11 LF pal.b[8375] set_q("<=",mk_le,s_relop,...)
set_q F:11 LF pal.b[8376] set_q("<",mk_lt,s_relop,...)
set_r F:18 FN pal.b[8040] LET set_r(s,f)=..
set_r F:18 LF pal.b[8306] set_r("YTAB",@ytab)
set_r F:18 LF pal.b[8307] set_r("ZTAB",@ztab)
set_r F:18 LF pal.b[8315] set_r("STACK",@stack)
set_r F:18 LF pal.b[8319] set_r("NEWLINE",@newline)
set_r F:18 LF pal.b[8341] set_r("PRINF",@writef)
set_r F:18 LF pal.b[8346] set_r("XTAB",@xtab)
set_r F:18 LF pal.b[8347] set_r("TAB",@tab)
set_v F:15 FN pal.b[8031] LET set_v(s,f)=..
set_v F:15 LF pal.b[8229] a_num:=set_v("NUM",@num)
set_v F:15 LF pal.b[8234] typ!s_cdx:=set_v("FLATTEN",@flatten)
set_v F:15 LF pal.b[8237] typ!s_bcplf:=set_v("BCPLF",@bcplf)
set_v F:15 LF pal.b[8238] typ!s_bcplr:=set_v("BCPLR",@bcplr)
set_v F:15 LF pal.b[8239] typ!s_bcplv:=set_v("BCPLV",@bcplv)
set_v F:15 LF pal.b[8240] typ!s_codev:=set_v("CODE",@code)
set_v F:15 LF pal.b[8245] typ!s_name:=set_v("NAME",@name)
set_v F:15 LF pal.b[8249] typ!s_tuple:=set_v("TUPLE",@tuple)
set_v F:15 LF pal.b[8250] typ!s_xtupl:=set_v("SAVE",@xtuple)
set_v F:15 LF pal.b[8267] typ!s_dash:=set_v("DF",@mdash)
set_v F:15 LF pal.b[8288] a_null:=set_v("NULL",@null)
set_v F:15 LF pal.b[8305] set_v("ABS",@absv)
set_v F:15 LF pal.b[8312] set_v("PMAP",@pmap)
set_v F:15 LF pal.b[8313] set_v("GLOBAL",@globa)
set_v F:15 LF pal.b[8317] set_v("PRINJ",@prinj)
set_v F:15 LF pal.b[8322] set_v("PRINTA",@printa)
set_v F:15 LF pal.b[8323] set_v("PRCH",@prch)
set_v F:15 LF pal.b[8326] set_v("PRINL",@prinl)
set_v F:15 LF pal.b[8327] set_v("SHOW",@show)
set_v F:15 LF pal.b[8328] set_v("ORDER",@order)
set_v F:15 LF pal.b[8329] set_v("HD",@hdv)
set_v F:15 LF pal.b[8330] set_v("MI",@miv)
set_v F:15 LF pal.b[8331] set_v("TL",@tlv)
set_v F:15 LF pal.b[8332] set_v("TY",@tyv)
set_v F:15 LF pal.b[8333] set_v("RATIONAL",@rat)
set_v F:15 LF pal.b[8336] set_v("ALG",@alg)
set_v F:15 LF pal.b[8338] set_v("ATOM",@atom)
set_v F:15 LF pal.b[8339] set_v("MAINVAR",@mainvar)
set_v F:15 LF pal.b[8340] set_v("TEMPUS",@tempus)
set_v F:15 LF pal.b[8342] set_v("PRIN",@prin)
set_v F:15 LF pal.b[8343] set_v("FLOAT",@floatv)
set_v F:15 LF pal.b[8344] set_v("FIX",@fixv)
set_v F:15 LF pal.b[8348] set_v("UNTRACE",@untrace)
set_v F:15 LF pal.b[8349] set_v("ERRORSET",@errorset)
set_v F:15 LF pal.b[8350] set_v("ERROREVAL",@erroreval)
set_v F:15 LF pal.b[8357] set_v("PRINT",@print)
set_v F:15 LF pal.b[8359] set_v("SYN",@syn)
set_v F:15 LF pal.b[8361] set_v("PRINE",@prine)
set_v F:15 LF pal.b[8365] set_v("REV",@rev)
set_v F:15 LF pal.b[8367] set_v("FUNCTION",@function)
set_z F:20 FN pal.b[8049] LET set_z(n,s,a2,a3)=..
set_z F:20 LF pal.b[8247] set_z(!a_qu,"qu",...,...)
set_z F:20 LF pal.b[8255] set_z(!a_fclos,"fn",...,...)
set_z F:20 LF pal.b[8265] set_z(!typ!s_seq,"<>",...,...)
setbit G:112 DEF libhdr.h[128] setbit=112
setbreak G:264 DEF palhdr.h[332] setbreak=
setbulk G:122 DEF libhdr.h[138] setbulk=122
setglob G:355 DEF palhdr.h[435] setglob=
setglob G:355 RT pal.b[5279] LET setglob(n1,n2)BE..
setio G:305 DEF palhdr.h[377] setio=
setio G:305 LG pal.b[1004] setio()
setio G:305 LG pal.b[8960] setio
setio G:305 LG pal.b[8969] setio()
setio G:305 LG pal.b[8991] setio()
setio G:305 RT pal.b[725] LET setio()BE..
setio G:305 SG pal.b[8961] setio,psetio:=psetio,t
setlogname G:117 DEF libhdr.h[133] setlogname=117
setrecordlength G:68 DEF libhdr.h[83] setrecordlength=68
setseed G:35 DEF libhdr.h[50] setseed=35
settimeout G:55 DEF libhdr.h[70] settimeout=55
settimeoutact G:124 DEF libhdr.h[140] settimeoutact=124
setup G:353 DEF palhdr.h[433] setup=
setup G:353 LG pal.b[8975] sawritef("*nstar'p (=%n)*n",setup)
setup G:353 LG pal.b[8977] setup()
setup G:353 RT pal.b[8054] LET setup()BE..
setwindow G:213 DEF palhdr.h[275] setwindow=
sg S:1 DEF pal.b[3792] sg=0
sg S:1 DEF pal.b[4735] sg=0
sg S:1 DEF pal.b[7510] sg=0
sg S:1 DEF pal.b[77] sg=0
sg S:1 DEF pal.b[9771] sg=0
sg S:1 LL pal.b[10008] RESULTIS get4(sg,f,b,...)
sg S:1 LL pal.b[10021] RESULTIS get4(sg,e,v,f)
sg S:1 LL pal.b[10172] e:=get4(sg,e,f2,z)
sg S:1 LL pal.b[10200] a:=get4(sg,a,b2,c2)
sg S:1 LL pal.b[108] RESULTIS get4(sg,h1!b,a,0)
sg S:1 LL pal.b[137] RESULTIS get4(sg,u,a,0)
sg S:1 LL pal.b[172] RESULTIS get4(sg,u,a,0)
sg S:1 LL pal.b[222] RESULTIS get4(sg,h1!a,b,0)
sg S:1 LL pal.b[231] RESULTIS get4(sg,h1!b,a,0)
sg S:1 LL pal.b[264] RESULTIS get4(sg,u,a,0)
sg S:1 LL pal.b[305] RESULTIS get4(sg,u,a,0)
sg S:1 LL pal.b[3829] RESULTIS getx(s_numj,z,...)+sg
sg S:1 LL pal.b[3851] RESULTIS c+sg
sg S:1 LL pal.b[3856] RESULTIS c+sg
sg S:1 LL pal.b[3870] RESULTIS c+sg
sg S:1 LL pal.b[3873] RESULTIS c+sg
sg S:1 LL pal.b[3923] TEST sg=0 THEN .. ELSE ..
sg S:1 LL pal.b[3931] RESULTIS c+sg
sg S:1 LL pal.b[3946] IF fXORsg>0 DO ..
sg S:1 LL pal.b[3949] IF fXORsg=0 DO ..
sg S:1 LL pal.b[3953] RESULTIS getx(s_numj,...,...)+sg
sg S:1 LL pal.b[3957] RESULTIS getx(s_numj,...,...)+sg
sg S:1 LL pal.b[3974] RESULTIS c+sg
sg S:1 LL pal.b[3977] RESULTIS c+sg
sg S:1 LL pal.b[3981] RESULTIS getx(s_numj,...,...)+sg
sg S:1 LL pal.b[3987] TEST sg=0 THEN .. ELSE ..
sg S:1 LL pal.b[3990] RESULTIS getx(s_numj,a,...)+sg
sg S:1 LL pal.b[4008] RESULTIS c+sg
sg S:1 LL pal.b[4020] RESULTIS getx(s_numj,z,...)+sg
sg S:1 LL pal.b[4057] RESULTIS n+sg
sg S:1 LL pal.b[4185] IF sg>0 DO ..
sg S:1 LL pal.b[4188] TEST sg=0 THEN .. ELSE ..
sg S:1 LL pal.b[4195] RESULTIS a+sg
sg S:1 LL pal.b[4772] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[4789] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[4805] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[4904] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[4921] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[4938] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[4961] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[4980] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[5000] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[5020] RESULTIS get4(sg,b,a,0)
sg S:1 LL pal.b[5041] RESULTIS get4(sg,a,b,0)
sg S:1 LL pal.b[7568] get4(s_polyj,zsy,...)+sg
sg S:1 LL pal.b[7574] p:=pXORsg
sg S:1 LL pal.b[9799] RESULTIS get4(sg,b,a,f)
sg S:1 LL pal.b[9810] RESULTIS get4(sg,c,a,b)
sg S:1 LL pal.b[9930] RESULTIS get4(sg,a,b,...)
sg S:1 LL pal.b[9938] RESULTIS get4(sg,a,b,v)
sg S:1 LL pal.b[9946] RESULTIS get4(sg,a,b,v)
sg S:1 LL pal.b[9961] RESULTIS get4(sg,a,b,l)
sg S:1 LL pal.b[9971] RESULTIS get4(sg,a,b,z)
sg S:1 LL pal.b[9985] RESULTIS get4(sg,a,b,f)
sg S:1 LL pal.b[9992] RESULTIS get4(sg,a,b,f)
sg S:1 LL pal.b[9999] RESULTIS get4(sg,a,b,f)
sg S:1 SL pal.b[10004] sg:=s_a2e
sg S:1 SL pal.b[10005] sg:=s_ap2
sg S:1 SL pal.b[10013] sg:=s_clos
sg S:1 SL pal.b[10015] sg:=s_aclos
sg S:1 SL pal.b[10018] sg:=s_clos2
sg S:1 SL pal.b[10019] sg:=s_eclos
sg S:1 SL pal.b[10020] sg:=s_fclos
sg S:1 SL pal.b[10170] sg:=s_seqa
sg S:1 SL pal.b[10171] sg:=s_seq
sg S:1 SL pal.b[10197] sg:=s_condb
sg S:1 SL pal.b[10198] sg:=s_conda
sg S:1 SL pal.b[10199] sg:=s_cond
sg S:1 SL pal.b[106] sg:=s_ratn
sg S:1 SL pal.b[107] sg:=s_ratl
sg S:1 SL pal.b[135] sg:=s_ratn
sg S:1 SL pal.b[136] sg:=s_ratl
sg S:1 SL pal.b[168] sg:=s_ratn
sg S:1 SL pal.b[171] sg:=s_ratl
sg S:1 SL pal.b[220] sg:=s_ratn
sg S:1 SL pal.b[221] sg:=s_ratl
sg S:1 SL pal.b[229] sg:=s_ratn
sg S:1 SL pal.b[230] sg:=s_ratl
sg S:1 SL pal.b[262] sg:=s_ratn
sg S:1 SL pal.b[263] sg:=s_ratl
sg S:1 SL pal.b[301] sg:=s_ratn
sg S:1 SL pal.b[304] sg:=s_ratl
sg S:1 SL pal.b[3827] n,sg:=-n,ysg
sg S:1 SL pal.b[3828] sg:=0
sg S:1 SL pal.b[3834] sg,cy:=a&ysg,0
sg S:1 SL pal.b[3879] sg,cy:=a&ysg,0
sg S:1 SL pal.b[3941] sg:=a&ysg
sg S:1 SL pal.b[4018] result2,c,sg:=-result2,-c,ysg
sg S:1 SL pal.b[4019] sg:=0
sg S:1 SL pal.b[4030] sg:=a&ysg
sg S:1 SL pal.b[4032] gl1,sg:=-gl1,a&ysgXORysg
sg S:1 SL pal.b[4161] sg:=a&ysg
sg S:1 SL pal.b[4163] gl1,sg:=-gl1,a&ysgXORysg
sg S:1 SL pal.b[4770] sg:=s_ratn
sg S:1 SL pal.b[4771] sg:=s_ratl
sg S:1 SL pal.b[4787] sg:=s_ratn
sg S:1 SL pal.b[4788] sg:=s_ratl
sg S:1 SL pal.b[4803] sg:=s_ratn
sg S:1 SL pal.b[4804] sg:=s_ratl
sg S:1 SL pal.b[4902] sg:=s_ratn
sg S:1 SL pal.b[4903] sg:=s_ratl
sg S:1 SL pal.b[4919] sg:=s_ratn
sg S:1 SL pal.b[4920] sg:=s_ratl
sg S:1 SL pal.b[4936] sg:=s_ratn
sg S:1 SL pal.b[4937] sg:=s_ratl
sg S:1 SL pal.b[4959] sg:=s_ratn
sg S:1 SL pal.b[4960] sg:=s_ratl
sg S:1 SL pal.b[4978] sg:=s_ratn
sg S:1 SL pal.b[4979] sg:=s_ratl
sg S:1 SL pal.b[4998] sg:=s_ratn
sg S:1 SL pal.b[4999] sg:=s_ratl
sg S:1 SL pal.b[5018] sg:=s_ratn
sg S:1 SL pal.b[5019] sg:=s_ratl
sg S:1 SL pal.b[5039] sg:=s_ratn
sg S:1 SL pal.b[5040] sg:=s_ratl
sg S:1 SL pal.b[7567] sg:=p&ysg
sg S:1 SL pal.b[9795] sg:=s_reca
sg S:1 SL pal.b[9796] sg:=s_rec
sg S:1 SL pal.b[9807] sg:=s_letb
sg S:1 SL pal.b[9808] sg:=s_leta
sg S:1 SL pal.b[9809] sg:=s_let
sg S:1 SL pal.b[9928] sg:=s_a2e
sg S:1 SL pal.b[9929] sg:=s_ap2
sg S:1 SL pal.b[9936] sg:=s_a2a
sg S:1 SL pal.b[9937] sg:=s_aa2
sg S:1 SL pal.b[9944] sg:=s_aea
sg S:1 SL pal.b[9945] sg:=s_aaa
sg S:1 SL pal.b[9959] sg:=s_aqe
sg S:1 SL pal.b[9960] sg:=s_apq
sg S:1 SL pal.b[9969] sg:=s_apple
sg S:1 SL pal.b[9970] sg:=s_apply
sg S:1 SL pal.b[9983] sg:=s_a1a
sg S:1 SL pal.b[9984] sg:=s_aa1
sg S:1 SL pal.b[9990] sg:=s_ave
sg S:1 SL pal.b[9991] sg:=s_apv
sg S:1 SL pal.b[9997] sg:=s_a1e
sg S:1 SL pal.b[9998] sg:=s_ap1
shlv G:494 DEF palhdr.h[595] shlv=
shlv G:494 FN pal.b[7491] LET shlv(a,b)=..
shlv G:494 LLG pal.b[8276] ds("<<",@shlv,ap2,...)
show G:488 DEF palhdr.h[588] show=
show G:488 FN pal.b[6279] LET show(a)=..
show G:488 LLG pal.b[8327] set_v("SHOW",@show)
show1 G:489 DEF palhdr.h[589] show1=
show1 G:489 FN pal.b[6287] LET show1(a,f)=..
show1 G:489 LG pal.b[6281] gw0,gw1,gw2:=show1,a,a
show1 G:489 LG pal.b[6284] RESULTIS show1(b,a)
shrv G:495 DEF palhdr.h[596] shrv=
shrv G:495 FN pal.b[7494] LET shrv(a,b)=..
shrv G:495 LLG pal.b[8277] ds(">>",@shrv,ap2,...)
signbit M:-2147483648 DEF palhdr.h[41] signbit=~maxint
signbit M:-2147483648 MAN pal.b[10298] IF x=signbit DO ..
signbit M:-2147483648 MAN pal.b[103] a:=sadd(a+h2!b+signbit)
signbit M:-2147483648 MAN pal.b[121] a:=sadd(a+b+signbit)
signbit M:-2147483648 MAN pal.b[3072] fvaru=signbit>>1
signbit M:-2147483648 MAN pal.b[3228] zsy,gseqf|signbit
signbit M:-2147483648 MAN pal.b[3833] z,@b|signbit
signbit M:-2147483648 MAN pal.b[3895] @c|signbit
signbit M:-2147483648 MAN pal.b[4027] @a|signbit
signbit M:-2147483648 MAN pal.b[4221] !f:=!f|signbit
signbit M:-2147483648 MAN pal.b[4886] b,a:=signbit-b,aXORysg
signbit M:-2147483648 MAN pal.b[4908] b,a:=bXORysg,signbit-a
signbit M:-2147483648 MAN pal.b[4948] gw1,a:=signbit-h1!a,signbit-h2!a
signbit M:-2147483648 MAN pal.b[4965] gw1,b:=signbit-h1!b,signbit-h2!b
signbit M:-2147483648 MAN pal.b[4986] gw1,a:=signbit-h1!a,signbit-h2!a
signbit M:-2147483648 MAN pal.b[5004] gw1,b:=signbit-h1!b,signbit-h2!b
signbit M:-2147483648 MAN pal.b[5025] t,gw1:=signbit-t,signbit-h1!b
signbit M:-2147483648 MAN pal.b[5323] !s,h1!s:=0,t|signbit
signbit M:-2147483648 MAN pal.b[5535] add,ddadd:=ddadd|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5538] minu,ddminu:=ddminu|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5541] mul,ddmul:=ddmul|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5544] div,dddiv:=dddiv|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5551] addpoly,ddaddpoly:=ddaddpoly|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5554] mulpoly,ddmulpoly:=ddmulpoly|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5557] divpoly,dddivpoly:=dddivpoly|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5560] pseudorempoly,ddpseu:=ddpseu|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5563] eqpoly,ddequp:=ddequp|signbit,t|signbit
signbit M:-2147483648 MAN pal.b[5798] h2!p,zero,"- "|signbit
signbit M:-2147483648 MAN pal.b[5807] s0,s1:=" + "|signbit," - "|signbit
signbit M:-2147483648 MAN pal.b[5849] kk,nn:=0,signbit
signbit M:-2147483648 MAN pal.b[5910] l,40+signbit
signbit M:-2147483648 MAN pal.b[5914] c:=32+signbit
signbit M:-2147483648 MAN pal.b[6305] @root|signbit
signbit M:-2147483648 MAN pal.b[6317] @root|signbit
signbit M:-2147483648 MAN pal.b[6327] h1!b,@root|signbit
signbit M:-2147483648 MAN pal.b[6476] f:=f|signbit
signbit M:-2147483648 MAN pal.b[6484] f:=f|signbit
signbit M:-2147483648 MAN pal.b[6658] RESULTIS get4(s,0,...,...)
signbit M:-2147483648 MAN pal.b[6663] RESULTIS get4(s_bcplf,0,...,...)
signbit M:-2147483648 MAN pal.b[6668] RESULTIS get4(s_bcplr,0,...,...)
signbit M:-2147483648 MAN pal.b[6673] RESULTIS get4(s_bcplv,0,...,...)
signbit M:-2147483648 MAN pal.b[6718] IF t>=numba|t=signbit DO ..
signbit M:-2147483648 MAN pal.b[6744] IF a=signbit DO ..
signbit M:-2147483648 MAN pal.b[6745] a:=transpal(signbit/2)
signbit M:-2147483648 MAN pal.b[6865] @v|signbit
signbit M:-2147483648 MAN pal.b[6867] FOR i=signbit+1 TO signbit+!v DO..
signbit M:-2147483648 MAN pal.b[6929] RESULTIS signbit-p
signbit M:-2147483648 MAN pal.b[6937] RESULTIS get4(s_ratn,h1!p,...,0)
signbit M:-2147483648 MAN pal.b[6977] RESULTIS get4(s_ratn,signbit-p,ym,0)
signbit M:-2147483648 MAN pal.b[6993] q,p:=signbit-q,signbit-h1!p
signbit M:-2147483648 MAN pal.b[727] zero:=@zz|signbit
signbit M:-2147483648 MAN pal.b[7317] @trz-1|signbit
signbit M:-2147483648 MAN pal.b[7919] RESULTIS a+b=signbit
signbit M:-2147483648 MAN pal.b[7971] get4(s,0,...,...)
signbit M:-2147483648 MAN pal.b[7973] get4(s_code2,0,...,...)
signbit M:-2147483648 MAN pal.b[7997] RESULTIS h2!linkword(s_glo,s,...)
signbit M:-2147483648 MAN pal.b[8009] RESULTIS h2!linkword(s_glo,s,...)
signbit M:-2147483648 MAN pal.b[8014] RESULTIS h2!linkword(s_glo,a,...)
signbit M:-2147483648 MAN pal.b[8019] RESULTIS h2!linkword(s_glo,a,...)
signbit M:-2147483648 MAN pal.b[8022] n+(a<<8)|signbit
signbit M:-2147483648 MAN pal.b[8025] n+...+(b<<16)+(c<<8)|signbit
signbit M:-2147483648 MAN pal.b[8469] !i:=(!i<<24)+signbit
signbit M:-2147483648 MAN pal.b[8489] !s:=(i<<24)+signbit
signbit M:-2147483648 MAN pal.b[8625] !a:=(b0&p_addr)+signbit
signbit M:-2147483648 MAN pal.b[8648] !a:=(u<<24)+signbit
signbit M:-2147483648 MAN pal.b[8671] !t:=(u<<24)+signbit
signbit M:-2147483648 MAN pal.b[8689] !a:=(!a<<24)+signbit
signbit M:-2147483648 MAN pal.b[8754] !a:=t2+signbit
signbit M:-2147483648 MAN pal.b[8756] h3!s1:=a+signbit
signbit M:-2147483648 MAN pal.b[87] RESULTIS sadd(a+b+signbit)
signbit M:-2147483648 MAN pal.b[8831] !a:=t2+signbit
signbit M:-2147483648 MAN pal.b[8833] h1!s1:=(a&p_addr)+signbit
signbit M:-2147483648 MAN pal.b[8884] !a:=(b&p_addr)+signbit
signbit M:-2147483648 MAN pal.b[8923] buffp:=u+signbit
signbit M:-2147483648 MAN pal.b[9419] s0,gg:=gg,@gg|signbit
signbit M:-2147483648 MAN pal.b[9452] zsy,gseq|signbit
signbit M:-2147483648 MAN pal.b[9462] a:=linseq(a,z,z,signbit)
signbit M:-2147483648 MAN pal.b[9485] @n|signbit
signbit M:-2147483648 MAN palhdr.h[232] y0=-(signbit>>1)
signbit M:-2147483648 MAN palhdr.h[243] yloc=signbit>>1
signbit M:-2147483648 MAN palhdr.h[244] yfj=signbit>>1
signbit M:-2147483648 MAN palhdr.h[245] ysg=signbit>>2
signbit M:-2147483648 MAN palhdr.h[246] sva=signbit>>2
signbit M:-2147483648 MAN palhdr.h[46] p_tagp=p_tag-signbit
simenv G:638 DEF palhdr.h[757] simenv=
simenv G:638 FN pal.b[3642] LET simenv(e,v)=..
simenv G:638 LG pal.b[3150] simenv(a1,a2)
simenv G:638 LG pal.b[3343] e:=simenv(e,h2!a)
simenv G:638 LG pal.b[3358] simenv(e,h2!a)
simenv G:638 LG pal.b[3649] e:=simenv(e,h2!v)
simname G:567 DEF palhdr.h[677] simname=
simname G:567 FN pal.b[9774] LET simname(a)=..
simname G:567 LG pal.b[10014] TEST simname(v) THEN .. ELSE ..
simname G:567 LG pal.b[3155] TEST f&simname(a2) THEN .. ELSE ..
simname G:567 LG pal.b[3618] TEST simname(b2) THEN .. ELSE ..
simname G:567 LG pal.b[9781] UNLESS simname(h2!a) DO ..
simname G:567 LG pal.b[9797] IF simname(a) DO ..
simname G:567 LG pal.b[9806] TEST simname(a) THEN .. ELSE ..
simname G:567 LG pal.b[9815] TEST simname(h2!a) THEN .. ELSE ..
simname G:567 LG pal.b[9883] RESULTIS simname(h2!c)
simtup G:568 DEF palhdr.h[678] simtup=
simtup G:568 FN pal.b[9780] LET simtup(a)=..
simtup G:568 LG pal.b[10016] TEST !v=s_tuple&simtup(v) THEN .. ELSE ..
simtup G:568 LG pal.b[3600] IF simtup(b) DO ..
simtup G:568 LG pal.b[3609] IF b=z|simtup(b) DO ..
skiprec G:218 DEF palhdr.h[280] skiprec=
smul G:335 DEF palhdr.h[411] smul=
smul G:335 FN pal.b[4013] LET smul(a,b)=..
smul G:335 LG pal.b[101] a:=smul(a,h1!b)
smul G:335 LG pal.b[117] a:=smul(h2!a,.../ga1+y0)
smul G:335 LG pal.b[119] b:=smul(h2!b,u)
smul G:335 LG pal.b[132] u:=smul(u,v)
smul G:335 LG pal.b[215] b:=smul(h1!a,b)
smul G:335 LG pal.b[224] a:=smul(a,h1!b)
smul G:335 LG pal.b[244] a:=smul(h2!a,.../ga1+y0)
smul G:335 LG pal.b[246] b:=smul(h2!b,u)
smul G:335 LG pal.b[259] u:=smul(u,v)
smul G:335 LG pal.b[4752] RESULTIS smul(a,b)
smul G:335 LG pal.b[4760] a:=smul(a,h2!b)
smul G:335 LG pal.b[4765] a:=smul(.../ga1+y0,h2!b)
smul G:335 LG pal.b[4781] a:=smul(a,h2!b)
smul G:335 LG pal.b[4792] smul(h2!a,h2!b)
smul G:335 LG pal.b[4793] b:=smul(h1!a,h1!b)
smul G:335 LG pal.b[4798] a:=smul(.../ga1+y0,.../ga2+y0)
smul G:335 LG pal.b[4799] b:=smul(.../ga2+y0,.../ga1+y0)
smul G:335 LG pal.b[4950] b:=smul(gw1,b)
smul G:335 LG pal.b[4956] b:=smul(h1!a,.../ga1+y0)
smul G:335 LG pal.b[4967] a:=smul(a,gw1)
smul G:335 LG pal.b[4973] a:=smul(.../ga1+y0,h1!b)
smul G:335 LG pal.b[4994] b:=smul(b,h1!a)
smul G:335 LG pal.b[5012] a:=smul(a,h1!b)
smul G:335 LG pal.b[5027] b:=smul(h2!a,gw1)
smul G:335 LG pal.b[5028] a:=smul(h1!a,t)
smul G:335 LG pal.b[5034] b:=smul(.../ga1+y0,.../ga2+y0)
smul G:335 LG pal.b[5035] a:=smul(.../ga2+y0,.../ga1+y0)
softerror G:306 DEF palhdr.h[378] softerror=
softerror G:306 LG pal.b[1053] UNLESS softerror=globcon129 DO ..
softerror G:306 LG pal.b[1056] softerror(code,svalid)
softerror G:306 RT pal.b[1612] LET softerror(c)BE..
splitname G:47 DEF libhdr.h[62] splitname=47
sqff F:3 LF pal.b[8471] sqff()
sqff F:3 LF pal.b[8495] sqff()
sqff F:3 RT pal.b[8440] LET sqff()BE..
squas F:8 LF pal.b[4366] squas()
squas F:8 LF pal.b[4434] squas()
squas F:8 RT pal.b[4276] LET squas()BE..
squash G:332 DEF palhdr.h[406] squash=
squash G:332 FN pal.b[8456] LET squash()=..
squash G:332 LG pal.b[4277] squash()
squash G:332 LG pal.b[4344] IF squash()=0 DO ..
squash1 F:8 FN pal.b[8639] LET squash1(a)=..
squash1 F:8 LF pal.b[8498] !i:=squash1(!i)
squash1 F:8 LF pal.b[8501] !i:=squash1(!i)
squash1 F:8 LF pal.b[8509] !i:=squash1(!i)
squash2 F:9 LF pal.b[8475] squash2(i)
squash2 F:9 RT pal.b[8684] LET squash2(a)BE..
squash3 F:10 FN pal.b[8775] LET squash3(a)=..
squash3 F:10 LF pal.b[8651] a:=squash3(a)
squash3 F:10 LF pal.b[8785] msg1(13,squash3)
ssz G:324 DEF palhdr.h[397] ssz=
ssz G:324 LG pal.b[4265] writef("%N%% heap used",...*100/ssz)
ssz G:324 LG pal.b[8078] writef("# Ver'f region",loadpoint+4,...,...)
ssz G:324 LG pal.b[8197] st1:=stackbase+ssz&~3
ssz G:324 LG pal.b[8203] writef("*n# IN'K BYTES*n",ssz>>8)
ssz G:324 LG pal.b[8552] n:=w*100/ssz
ssz G:324 LG pal.b[9120] r:=ssz+y0
ssz G:324 SG pal.b[8069] ssz:=stackend-stackbase
ssz G:324 SG pal.b[9121] ssz:=readsn(p,j)
st1 G:320 DEF palhdr.h[393] st1=
st1 G:320 LG pal.b[1629] IF st1<=b&b<=st2 DO ..
st1 G:320 LG pal.b[1635] TEST st1<=b0&b0<=st2 THEN .. ELSE ..
st1 G:320 LG pal.b[4265] writef("%N%% heap used",...*100/ssz)
st1 G:320 LG pal.b[4268] UNLESS stx=st1 DO ..
st1 G:320 LG pal.b[4269] stx:=st1
st1 G:320 LG pal.b[4271] writef("BCPL/'%N words",...-stackbase,...,...)
st1 G:320 LG pal.b[4292] IF n<=st1 DO ..
st1 G:320 LG pal.b[4295] st1:=st1-4
st1 G:320 LG pal.b[4296] stackp:=st1
st1 G:320 LG pal.b[4297] UNTIL st1<=n DO ..
st1 G:320 LG pal.b[4298] st1:=st1-4
st1 G:320 LG pal.b[4299] 4!st1:=st1
st1 G:320 LG pal.b[4301] !st1:=t
st1 G:320 LG pal.b[4302] stackl:=st1-fr_s
st1 G:320 LG pal.b[4329] stackp,w,gc1:=0,0,st1
st1 G:320 LG pal.b[4336] UNTIL !st1<=0 DO ..
st1 G:320 LG pal.b[4337] IF st1>=n DO ..
st1 G:320 LG pal.b[4339] st1:=st1+4
st1 G:320 LG pal.b[4341] FOR i=st1 TO n-4 BY 4 DO..
st1 G:320 LG pal.b[4347] !p,h1!p,h2!p,h3!p:=-!st1,h1!st1,h2!st1,h3!st1
st1 G:320 LG pal.b[4348] !st1:=p
st1 G:320 LG pal.b[4350] st1:=st1+4
st1 G:320 LG pal.b[4405] IF st1-@t>2*kstack DO ..
st1 G:320 LG pal.b[4425] FOR p=st1 TO svu BY 4 DO..
st1 G:320 LG pal.b[4442] IF gc1<=r&r<st1 DO ..
st1 G:320 LG pal.b[4448] FOR i=st1 TO st2 BY 4 DO..
st1 G:320 LG pal.b[4534] IF k>=st1 DO ..
st1 G:320 LG pal.b[5291] UNLESS st1<=q&q<=st2 DO ..
st1 G:320 LG pal.b[5307] UNLESS st1<=(a&p_addr)&(a&p_addr)<=st2 DO ..
st1 G:320 LG pal.b[5338] IF st1<=dd3&dd3<=st2 DO ..
st1 G:320 LG pal.b[5370] FOR i=st1 TO svu BY 4 DO..
st1 G:320 LG pal.b[8198] st2:=st1-4
st1 G:320 LG pal.b[8473] FOR i=st1 TO svu BY 4 DO..
st1 G:320 LG pal.b[8539] FOR i=st1 TO svu BY 4 DO..
st1 G:320 SG pal.b[4295] st1:=st1-4
st1 G:320 SG pal.b[4298] st1:=st1-4
st1 G:320 SG pal.b[4339] st1:=st1+4
st1 G:320 SG pal.b[4350] st1:=st1+4
st1 G:320 SG pal.b[8197] st1:=stackbase+ssz&~3
st2 G:321 DEF palhdr.h[394] st2=
st2 G:321 LG pal.b[1629] IF st1<=b&b<=st2 DO ..
st2 G:321 LG pal.b[1635] TEST st1<=b0&b0<=st2 THEN .. ELSE ..
st2 G:321 LG pal.b[4271] writef("BCPL/'%N words",...-stackbase,...,...)
st2 G:321 LG pal.b[4312] FOR i=svv TO st2 BY 4 DO..
st2 G:321 LG pal.b[4327] FOR i=svv TO st2 BY 4 DO..
st2 G:321 LG pal.b[4413] FOR i=svv TO st2 BY 4 DO..
st2 G:321 LG pal.b[4423] FOR i=svv TO st2 BY 4 DO..
st2 G:321 LG pal.b[4448] FOR i=st1 TO st2 BY 4 DO..
st2 G:321 LG pal.b[5291] UNLESS st1<=q&q<=st2 DO ..
st2 G:321 LG pal.b[5307] UNLESS st1<=(a&p_addr)&(a&p_addr)<=st2 DO ..
st2 G:321 LG pal.b[5338] IF st1<=dd3&dd3<=st2 DO ..
st2 G:321 LG pal.b[5374] FOR i=svv TO st2 BY 4 DO..
st2 G:321 LG pal.b[8468] FOR i=svv TO st2 BY 4 DO..
st2 G:321 LG pal.b[8535] FOR i=svv TO st2 BY 4 DO..
st2 G:321 SG pal.b[8198] st2:=st1-4
stack G:326 DEF palhdr.h[400] stack=
stack G:326 LG pal.b[4287] stack(kstack)
stack G:326 LG pal.b[4305] msg1(16,stack,n)
stack G:326 LG pal.b[4406] stack(kstack)
stack G:326 LG pal.b[8201] stack(kstack)
stack G:326 LLG pal.b[8315] set_r("STACK",@stack)
stack G:326 RT pal.b[4290] LET stack(n)BE..
stackb G:314 DEF palhdr.h[386] stackb=
stackb G:314 LG pal.b[1065] UNLESS sysout=0|stackb=globcon137|stackl=globcon138 DO ..
stackb G:314 LG pal.b[1066] stackb
stackb G:314 LG pal.b[1074] TEST q>stackb THEN .. ELSE ..
stackb G:314 LG pal.b[1076] backtr(stackb,q)
stackb G:314 LG pal.b[1077] writef("STACK'N TO %N*n",stackb,stackl)
stackb G:314 LG pal.b[1078] FOR i=stackb TO stackl DO..
stackb G:314 LG pal.b[8202] IF stackb>stackl DO ..
stackb G:314 SG pal.b[8057] stackb:=level()>>2
stackb G:314 SG pal.b[8956] stackb,stackl:=currco,currco+currco!co_size
stackbase G:239 DEF palhdr.h[306] stackbase=
stackbase G:239 LG pal.b[1117] UNLESS stackbase<=q&q<stackend DO ..
stackbase G:239 LG pal.b[1123] FOR p=q-2 TO stackbase BY -2 DO..
stackbase G:239 LG pal.b[1184] writef("     '  %I7*n*n*n",stackbase)
stackbase G:239 LG pal.b[1210] backtr(stackbase,level()>>2)
stackbase G:239 LG pal.b[1653] IF q<=stackbase DO ..
stackbase G:239 LG pal.b[4271] writef("BCPL/'%N words",...-stackbase,...,...)
stackbase G:239 LG pal.b[4319] IF q<=stackbase DO ..
stackbase G:239 LG pal.b[4417] IF q<=stackbase DO ..
stackbase G:239 LG pal.b[4462] IF q<=stackbase DO ..
stackbase G:239 LG pal.b[4473] .. REPEATUNTIL q<=stackbase
stackbase G:239 LG pal.b[8069] ssz:=stackend-stackbase
stackbase G:239 LG pal.b[8197] st1:=stackbase+ssz&~3
stackbase G:239 LG pal.b[8504] IF q<=stackbase DO ..
stackbase G:239 LG pal.b[8916] stackend:=stackbase+currco!co_size
stackbase G:239 LG pal.b[983] IF (loadpoint&pagemask)<=p&p<=stackbase DO ..
stackbase G:239 SG pal.b[8915] stackbase:=currco
stackend G:240 DEF palhdr.h[307] stackend=
stackend G:240 LG pal.b[1113] !(stackend-1)
stackend G:240 LG pal.b[1115] UNLESS !(stackend-2)=evenstack DO ..
stackend G:240 LG pal.b[1117] UNLESS stackbase<=q&q<stackend DO ..
stackend G:240 LG pal.b[1177] writef("     '    %I7*n",stackend)
stackend G:240 LG pal.b[8069] ssz:=stackend-stackbase
stackend G:240 LG pal.b[8074] region:=(stackend+pagesize&pagemask)-(loadpoint&pagemask)
stackend G:240 SG pal.b[8916] stackend:=stackbase+currco!co_size
stackhwm G:241 DEF palhdr.h[308] stackhwm=
stackhwm G:241 FN pal.b[1111] LET stackhwm()=..
stackhwm G:241 LG pal.b[1174] stackhwm()
stackl G:315 DEF palhdr.h[387] stackl=
stackl G:315 LG pal.b[10277] IF @a>stackl DO ..
stackl G:315 LG pal.b[1065] UNLESS sysout=0|stackb=globcon137|stackl=globcon138 DO ..
stackl G:315 LG pal.b[1068] FOR p=q+3 TO stackl DO..
stackl G:315 LG pal.b[1077] writef("STACK'N TO %N*n",stackb,stackl)
stackl G:315 LG pal.b[1078] FOR i=stackb TO stackl DO..
stackl G:315 LG pal.b[1402] IF @p>stackl DO ..
stackl G:315 LG pal.b[1702] IF @c>stackl DO ..
stackl G:315 LG pal.b[3245] IF @a>stackl DO ..
stackl G:315 LG pal.b[3591] IF @b>stackl DO ..
stackl G:315 LG pal.b[3753] IF @c1>stackl DO ..
stackl G:315 LG pal.b[5404] IF @a>stackl DO ..
stackl G:315 LG pal.b[5911] IF @l>stackl DO ..
stackl G:315 LG pal.b[5931] IF @p>stackl DO ..
stackl G:315 LG pal.b[5974] IF @c>stackl DO ..
stackl G:315 LG pal.b[6730] IF @l>stackl DO ..
stackl G:315 LG pal.b[7133] IF @w>stackl DO ..
stackl G:315 LG pal.b[7562] IF @p>stackl DO ..
stackl G:315 LG pal.b[7666] IF @p>stackl DO ..
stackl G:315 LG pal.b[7720] IF @p>stackl DO ..
stackl G:315 LG pal.b[7761] IF @p>stackl DO ..
stackl G:315 LG pal.b[7925] IF @a>stackl DO ..
stackl G:315 LG pal.b[8202] IF stackb>stackl DO ..
stackl G:315 LG pal.b[9479] IF @n>stackl DO ..
stackl G:315 SG pal.b[4302] stackl:=st1-fr_s
stackl G:315 SG pal.b[8956] stackb,stackl:=currco,currco+currco!co_size
stackp G:319 DEF palhdr.h[392] stackp=
stackp G:319 LG pal.b[1958] !j,stackp:=stackp,j&p_addr
stackp G:319 LG pal.b[1966] !j,stackp:=stackp,j&p_addr
stackp G:319 LG pal.b[1974] !j,stackp:=stackp,j&p_addr
stackp G:319 LG pal.b[1986] !j,stackp:=stackp,j&p_addr
stackp G:319 LG pal.b[2004] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2252] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2264] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2288] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2301] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2318] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2339] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2366] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2376] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2386] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2400] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2465] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2565] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2651] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2685] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2750] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[2775] !f,stackp:=stackp,f&p_addr
stackp G:319 LG pal.b[4231] !a:=stackp
stackp G:319 LG pal.b[4294] stackp
stackp G:319 LG pal.b[4355] !i,stackp,w:=stackp,i,w+4
stackp G:319 LG pal.b[4371] IF stackp=0 DO ..
stackp G:319 LG pal.b[4373] sawritef("get4:'ackp=%n*n",stackp)
stackp G:319 LG pal.b[4377] sawritef("get4:'ackp=%n*n",stackp)
stackp G:319 LG pal.b[4378] stackp
stackp G:319 LG pal.b[4379] stackp,!p,1!p,...,...:=!stackp,a,b,c,d
stackp G:319 LG pal.b[4386] IF stackp=0 DO ..
stackp G:319 LG pal.b[4396] stackp
stackp G:319 LG pal.b[4397] stackp,!p,1!p,...,...:=!stackp,a,b,c,d
stackp G:319 LG pal.b[4427] !p,stackp,w:=stackp,p,w+4
stackp G:319 LG pal.b[5320] stackp,0
stackp G:319 LG pal.b[5329] stackp
stackp G:319 LG pal.b[7221] !f,stackp:=stackp,f
stackp G:319 LG pal.b[8462] stackp
stackp G:319 LG pal.b[8543] h1!i,stackp:=stackp,i
stackp G:319 LG pal.b[8547] stackp
stackp G:319 SG pal.b[1958] !j,stackp:=stackp,j&p_addr
stackp G:319 SG pal.b[1966] !j,stackp:=stackp,j&p_addr
stackp G:319 SG pal.b[1974] !j,stackp:=stackp,j&p_addr
stackp G:319 SG pal.b[1986] !j,stackp:=stackp,j&p_addr
stackp G:319 SG pal.b[2004] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2252] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2264] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2288] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2301] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2318] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2339] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2366] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2376] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2386] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2400] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2465] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2565] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2651] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2685] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2750] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[2775] !f,stackp:=stackp,f&p_addr
stackp G:319 SG pal.b[4235] stackp:=a
stackp G:319 SG pal.b[4296] stackp:=st1
stackp G:319 SG pal.b[4329] stackp,w,gc1:=0,0,st1
stackp G:319 SG pal.b[4355] !i,stackp,w:=stackp,i,w+4
stackp G:319 SG pal.b[4379] stackp,!p,1!p,...,...:=!stackp,a,b,c,d
stackp G:319 SG pal.b[4397] stackp,!p,1!p,...,...:=!stackp,a,b,c,d
stackp G:319 SG pal.b[4427] !p,stackp,w:=stackp,p,w+4
stackp G:319 SG pal.b[7221] !f,stackp:=stackp,f
stackp G:319 SG pal.b[8058] stackp:=0
stackp G:319 SG pal.b[8543] h1!i,stackp:=stackp,i
stackword M:-1412623820 DEF libhdr.h[182] stackword=#xABCD1234
start G:1 DEF libhdr.h[16] start=1
start G:1 DEF palhdr.h[11] start=1
start G:1 FN pal.b[8904] LET start()=..
startco G:23 DEF libhdr.h[38] startco=23
stepstream G:67 DEF libhdr.h[82] stepstream=67
stkover G:330 DEF palhdr.h[404] stkover=
stkover G:330 LG pal.b[10278] stkover()
stkover G:330 LG pal.b[1403] stkover()
stkover G:330 LG pal.b[1703] stkover()
stkover G:330 LG pal.b[3246] stkover()
stkover G:330 LG pal.b[3592] stkover()
stkover G:330 LG pal.b[3754] stkover()
stkover G:330 LG pal.b[5405] stkover()
stkover G:330 LG pal.b[6731] stkover()
stkover G:330 LG pal.b[7563] stkover()
stkover G:330 LG pal.b[7667] stkover()
stkover G:330 LG pal.b[7721] stkover()
stkover G:330 LG pal.b[7762] stkover()
stkover G:330 LG pal.b[7926] stkover()
stkover G:330 LG pal.b[9480] stkover()
stkover G:330 RT pal.b[4286] LET stkover()BE..
stop G:2 DEF libhdr.h[17] stop=2
stop G:2 DEF palhdr.h[12] stop=2
stop G:2 LG pal.b[1087] stop(100)
stop G:2 LG pal.b[1606] stop(16)
stop G:2 LG pal.b[1608] stop(12)
stop G:2 LG pal.b[5349] stop(16)
stop G:2 LG pal.b[5389] stop(20)
stop G:2 LG pal.b[736] stop(104)
stop G:2 LG pal.b[8204] stop(8)
stop G:2 LG pal.b[9170] stop(n)
stov G:357 DEF palhdr.h[437] stov=
stov G:357 FN pal.b[6337] LET stov(s,v,m)=..
stov G:357 LG pal.b[6725] packstring(stov(a,...),u)
str1 M:8 DEF palhdr.h[224] str1=bytesperword*2
str1 M:8 MAN pal.b[5735] FOR i=str1 TO str2 DO..
str1 M:8 MAN pal.b[6340] FOR i=str1 TO str2 DO..
str1 M:8 MAN pal.b[6869] c1,h1!gg,gg:=str1,getx(s_string,...),h1!gg
str1 M:8 MAN pal.b[9333] putbyte(a,str1,rch())
str1 M:8 MAN pal.b[9334] putbyte(a,str1+1,ch)
str1 M:8 MAN pal.b[9337] putbyte(a,str1+1,0)
str1 M:8 MAN pal.b[9439] s2,h1!gg,gg:=str1,getx(s_string,...),h1!gg
str1 M:8 MAN palhdr.h[225] str2=str1+7
str2 M:15 DEF palhdr.h[225] str2=str1+7
str2 M:15 MAN pal.b[5735] FOR i=str1 TO str2 DO..
str2 M:15 MAN pal.b[6340] FOR i=str1 TO str2 DO..
str2 M:15 MAN pal.b[6868] IF c1>str2 DO ..
str2 M:15 MAN pal.b[9438] IF s2>str2 DO ..
str2numb G:101 DEF libhdr.h[117] str2numb=101
stream G:388 DEF palhdr.h[473] stream=
stream G:388 FN pal.b[5589] LET stream(r,s1,s2)=..
stream G:388 LG pal.b[5597] stream(findinput,s,zero)
stream G:388 LG pal.b[5604] stream(findoutput,s,zero)
stream G:388 LG pal.b[6587] r:=stream(r,s1,s2)
stream G:388 LG pal.b[6602] s:=stream(findinput,s,zero)
string G:608 DEF palhdr.h[721] string=
string G:608 FN pal.b[6863] LET string(v)=..
string G:608 LG pal.b[7977] RESULTIS string(buffp)
string G:608 LG pal.b[9286] s0:=string(buffp)
string G:608 LLG pal.b[8228] typ!s_string:=set_f("STRING",@string)
string_to_dat G:111 DEF libhdr.h[127] string_to_dat=111
string_to_number G:100 DEF libhdr.h[116] string_to_number=100
stx S:27 DEF pal.b[4263] stx=0
stx S:27 LL pal.b[4268] UNLESS stx=st1 DO ..
stx S:27 SL pal.b[4269] stx:=st1
sva M:536870912 DEF palhdr.h[246] sva=signbit>>2
sva M:536870912 MAN pal.b[3559] IF (h3!c&sva)=0 DO ..
sva M:536870912 MAN pal.b[8093] !n:=!n|sva
svu G:322 DEF palhdr.h[395] svu=
svu G:322 LG pal.b[4331] IF p>=svu DO ..
svu G:322 LG pal.b[4340] IF p>svu DO ..
svu G:322 LG pal.b[4352] FOR i=p TO svu BY 4 DO..
svu G:322 LG pal.b[4425] FOR p=st1 TO svu BY 4 DO..
svu G:322 LG pal.b[5370] FOR i=st1 TO svu BY 4 DO..
svu G:322 LG pal.b[8473] FOR i=st1 TO svu BY 4 DO..
svu G:322 LG pal.b[8539] FOR i=st1 TO svu BY 4 DO..
svu G:322 SG pal.b[8224] svv,svu:=zsc,zsc-4
svv G:323 DEF palhdr.h[396] svv=
svv G:323 LG pal.b[4312] FOR i=svv TO st2 BY 4 DO..
svv G:323 LG pal.b[4327] FOR i=svv TO st2 BY 4 DO..
svv G:323 LG pal.b[4413] FOR i=svv TO st2 BY 4 DO..
svv G:323 LG pal.b[4423] FOR i=svv TO st2 BY 4 DO..
svv G:323 LG pal.b[5374] FOR i=svv TO st2 BY 4 DO..
svv G:323 LG pal.b[8468] FOR i=svv TO st2 BY 4 DO..
svv G:323 LG pal.b[8535] FOR i=svv TO st2 BY 4 DO..
svv G:323 SG pal.b[8224] svv,svu:=zsc,zsc-4
sym S:1 DEF pal.b[9188] sym=0
sym S:1 LL pal.b[9216] writef("*n*n# S'N)*n ... ",n,sym)
sym S:1 LL pal.b[9228] UNLESS sym=s_rpar DO ..
sym S:1 LL pal.b[9233] UNLESS sym=s DO ..
sym S:1 LL pal.b[9239] TEST sym=s_do THEN .. ELSE ..
sym S:1 LL pal.b[9241] UNLESS sym=s_then DO ..
sym S:1 LL pal.b[9249] TEST sym=s_or THEN .. ELSE ..
sym S:1 LL pal.b[9251] UNLESS sym=s_else DO ..
sym S:1 LL pal.b[9363] SWITCHON sym INTO..
sym S:1 LL pal.b[9372] TEST sym=s_dot THEN .. ELSE ..
sym S:1 LL pal.b[9483] SWITCHON sym INTO..
sym S:1 LL pal.b[9489] .. REPEATWHILE sym=s_let
sym S:1 LL pal.b[9490] TEST sym=s_in THEN .. ELSE ..
sym S:1 LL pal.b[9497] IF sym=s_tuple DO ..
sym S:1 LL pal.b[9527] IF sym=s_tuple DO ..
sym S:1 LL pal.b[9529] IF sym=s_by DO ..
sym S:1 LL pal.b[9587] SWITCHON sym INTO..
sym S:1 LL pal.b[9608] .. REPEATWHILE sym=s_tuple
sym S:1 LL pal.b[9614] IF sym=s_tuple DO ..
sym S:1 LL pal.b[9624] WHILE sym=s_relop DO ..
sym S:1 LL pal.b[9639] .. REPEATWHILE sym=s_dash
sym S:1 LL pal.b[9674] SWITCHON sym INTO..
sym S:1 LL pal.b[9686] SWITCHON sym INTO..
sym S:1 LL pal.b[9702] .. REPEATWHILE sym=s_and
sym S:1 LL pal.b[9709] IF sym=s-y0 DO ..
sym S:1 LL pal.b[9719] IF sym=s-y0 DO ..
sym S:1 LL pal.b[9721] IF sym=s_tuple DO ..
sym S:1 LL pal.b[9724] SWITCHON sym INTO..
sym S:1 LL pal.b[9743] WHILE sym=s_dash DO ..
sym S:1 LL pal.b[9753] UNLESS sym=s_tuple DO ..
sym S:1 LL pal.b[9758] .. REPEATWHILE sym=s_tuple
sym S:1 SL pal.b[9262] sym:=s_dash
sym S:1 SL pal.b[9322] sym,s0:=s_flt,getx(s_flt,0,...)
sym S:1 SL pal.b[9325] sym:=s_num
sym S:1 SL pal.b[9341] sym:=s_fin
sym S:1 SL pal.b[9353] sym:=s_name
sym S:1 SL pal.b[9361] lprio,rprio,sym:=getbyte(s1,13)+y0,getbyte(...)+y0,getbyte(s1,15)
sym S:1 SL pal.b[9379] lprio,rprio,sym:=11+y0,11+y0,s_diadop
sym S:1 SL pal.b[9383] sym:=s_string
sym S:1 SL pal.b[9412] sym,s0:=s_num,s1+y0
syn G:540 DEF palhdr.h[646] syn=
syn G:540 FN pal.b[6815] LET syn(a)=..
syn G:540 LLG pal.b[8359] set_v("SYN",@syn)
synerror F:8 LF pal.b[9222] msg1(34,synerror)
synerror F:8 LF pal.b[9229] synerror(10)
synerror F:8 LF pal.b[9234] synerror(n)
synerror F:8 LF pal.b[9279] synerror(2)
synerror F:8 LF pal.b[9343] synerror(3)
synerror F:8 LF pal.b[9423] synerror(16)
synerror F:8 LF pal.b[9600] synerror(7)
synerror F:8 RT pal.b[9215] LET synerror(n)BE..
sys G:3 DEF libhdr.h[18] sys=3
sys G:3 DEF palhdr.h[13] sys=3
sys G:3 LG pal.b[41] sys(Sys_cputime)
sysabort G:29 DEF libhdr.h[44] sysabort=29
sysin G:297 DEF palhdr.h[369] sysin=
sysin G:297 LG pal.b[5343] q_selinput(sysin)
sysin G:297 LG pal.b[743] q_selinput(sysin)
sysin G:297 SG pal.b[740] sysin:=input()
sysout G:298 DEF palhdr.h[370] sysout=
sysout G:298 LG pal.b[1062] UNLESS sysout=0 DO ..
sysout G:298 LG pal.b[1065] UNLESS sysout=0|stackb=globcon137|stackl=globcon138 DO ..
sysout G:298 LG pal.b[1083] UNLESS sysout=0 DO ..
sysout G:298 LG pal.b[1483] selectoutput(sysout)
sysout G:298 LG pal.b[1504] q_seloutput(sysout)
sysout G:298 LG pal.b[4253] selectoutput(sysout)
sysout G:298 LG pal.b[733] TEST sysout=0 THEN .. ELSE ..
sysout G:298 LG pal.b[739] q_seloutput(sysout)
sysout G:298 LG pal.b[9168] selectoutput(sysout)
sysout G:298 SG pal.b[730] sysout:=output()
t F:67 LF pal.b[8559] tempusp("SQUASH",t)
t F:67 RT pal.b[8557] LET t()BE..
t S:23 DEF pal.b[4243] t=0
t S:23 LL pal.b[4248] rtime:=rtime+time()-t
t S:23 SL pal.b[4249] t:=time()
t_bhunk M:3000 DEF libhdr.h[178] t_bhunk=3000
t_bhunk64 M:4000 DEF libhdr.h[179] t_bhunk64=4000
t_end M:1002 DEF libhdr.h[174] t_end=1002
t_end64 M:2002 DEF libhdr.h[177] t_end64=2002
t_hunk M:1000 DEF libhdr.h[172] t_hunk=1000
t_hunk64 M:2000 DEF libhdr.h[175] t_hunk64=2000
t_reloc M:1001 DEF libhdr.h[173] t_reloc=1001
t_reloc64 M:2001 DEF libhdr.h[176] t_reloc64=2001
tab G:287 DEF palhdr.h[359] tab=
tab G:287 LG pal.b[1224] tab(123)
tab G:287 LG pal.b[1239] tab(20)
tab G:287 LG pal.b[1662] tab(10)
tab G:287 LG pal.b[4264] tab(26)
tab G:287 LG pal.b[4270] tab(68)
tab G:287 LG pal.b[5305] tab(n*20)
tab G:287 LG pal.b[5310] tab(85)
tab G:287 LG pal.b[847] tab(n+chc)
tab G:287 LLG pal.b[8347] set_r("TAB",@tab)
tab G:287 RT pal.b[836] LET tab(n)BE..
taskid M:1 DEF libhdr.h[440] taskid=1
tempus G:400 DEF palhdr.h[489] tempus=
tempus G:400 FN pal.b[6755] LET tempus(a)=..
tempus G:400 LLG pal.b[8340] set_v("TEMPUS",@tempus)
tempusp G:401 DEF palhdr.h[490] tempusp=
tempusp G:401 LG pal.b[1649] tempusp("Pmap",0)
tempusp G:401 LG pal.b[1678] tempusp("End pmap",0)
tempusp G:401 LG pal.b[4362] tempusp("GC1",tt)
tempusp G:401 LG pal.b[4432] tempusp("GC",tt)
tempusp G:401 LG pal.b[8388] tempusp("Starting",0)
tempusp G:401 LG pal.b[8559] tempusp("SQUASH",t)
tempusp G:401 LG pal.b[8996] tempusp("Re-start",0)
tempusp G:401 LG pal.b[9167] tempusp("Stopping",0)
tempusp G:401 RT pal.b[4252] LET tempusp(s,f)BE..
terminator G:252 DEF palhdr.h[320] terminator=
testbit G:113 DEF libhdr.h[129] testbit=113
tg M:190 DEF libhdr.h[156] tg=190
throw G:340 DEF palhdr.h[417] throw=
throw G:340 RT pal.b[4228] LET throw(aa)BE..
time G:220 DEF palhdr.h[282] time=
time G:220 FN pal.b[41] LET time()=..
time G:220 LG pal.b[4248] rtime:=rtime+time()-t
time G:220 LG pal.b[4249] t:=time()
time G:220 LG pal.b[4254] writef("%M# %' %V+%V s",s,...,rtime)
time G:220 LG pal.b[6756] writef("*n*n# T'V+%V s*n*n",a,...,rtime)
time G:220 LG pal.b[916] wtime(time())
timeofday G:219 DEF palhdr.h[281] timeofday=
timeofday G:219 FN pal.b[50] LET timeofday()=..
timeofday G:219 LG pal.b[8075] writef("*n# Pa'K bytes*n",timeofday(),...,...)
timeoutch M:-2 DEF libhdr.h[167] timeoutch=-2
timing S:22 DEF pal.b[4242] timing=FALSE
timing S:22 LL pal.b[4244] IF b=timing DO ..
timing S:22 LL pal.b[4246] timing:=~timing
timing S:22 SL pal.b[4246] timing:=~timing
tlv G:501 DEF palhdr.h[603] tlv=
tlv G:501 FN pal.b[6453] LET tlv(p)=..
tlv G:501 LG pal.b[3469] TEST a3=tlv THEN .. ELSE ..
tlv G:501 LLG pal.b[8331] set_v("TL",@tlv)
trace G:484 DEF palhdr.h[583] trace=
trace G:484 FN pal.b[7263] LET trace(a,b)=..
trace G:484 LG pal.b[7283] msg1(16,trace,a)
trace G:484 LLG pal.b[8251] typ!s_tra:=set_c("TRACE",@trace)
transbcpl F:7 FN pal.b[6690] LET transbcpl(a,n)=..
transbcpl F:7 LF pal.b[6681] v:=transbcpl(arg1,buffp+buffl)
transbcpl F:7 LF pal.b[6736] u!i:=transbcpl(h2!a,n)
transpal G:397 DEF palhdr.h[485] transpal=
transpal G:397 FN pal.b[6743] LET transpal(a)=..
transpal G:397 LG pal.b[2064] arg1:=transpal(gw0)
transpal G:397 LG pal.b[6745] a:=transpal(signbit/2)
trap G:481 DEF palhdr.h[580] trap=
trap G:481 LLG pal.b[8335] d("TRAP",s_code3,@trap)
trap G:481 RT pal.b[7315] LET trap(a,n,b)BE..
triminput G:212 DEF palhdr.h[274] triminput=
trz G:441 DEF palhdr.h[535] trz=
trz G:441 LG pal.b[4433] IF cons>h3!trz DO ..
trz G:441 LG pal.b[4433] UNLESS trz=z DO ..
trz G:441 LLG pal.b[7317] @trz-1|signbit
tt F:7 LF pal.b[4362] tempusp("GC1",tt)
tt F:7 LF pal.b[4432] tempusp("GC",tt)
tt F:7 RT pal.b[4261] LET tt(a)BE..
ttov G:358 DEF palhdr.h[438] ttov=
ttov G:358 FN pal.b[6354] LET ttov(a,v,m)=..
tuple G:538 DEF palhdr.h[644] tuple=
tuple G:538 FN pal.b[6801] LET tuple(a)=..
tuple G:538 LLG pal.b[8249] typ!s_tuple:=set_v("TUPLE",@tuple)
turnpage G:255 DEF palhdr.h[323] turnpage=
typ G:417 DEF palhdr.h[508] typ=
typ G:417 LG pal.b[4454] FOR i=typ TO typ+typsz DO..
typ G:417 LG pal.b[6435] RESULTIS typ!!p
typ G:417 LG pal.b[8226] FOR i=typ TO typ+typsz DO..
typ G:417 LG pal.b[8228] typ!s_string:=set_f("STRING",@string)
typ G:417 LG pal.b[8230] typ!i:=a_num
typ G:417 LG pal.b[8231] typ!s_poly:=set_c("POL",@pol)
typ G:417 LG pal.b[8232] typ!s_polyj:=typ!s_poly
typ G:417 LG pal.b[8233] typ!s_loc:=set_d("LV",@lvv)
typ G:417 LG pal.b[8234] typ!s_cdx:=set_v("FLATTEN",@flatten)
typ G:417 LG pal.b[8236] typ!i:=typ!s_cdx
typ G:417 LG pal.b[8237] typ!s_bcplf:=set_v("BCPLF",@bcplf)
typ G:417 LG pal.b[8238] typ!s_bcplr:=set_v("BCPLR",@bcplr)
typ G:417 LG pal.b[8239] typ!s_bcplv:=set_v("BCPLV",@bcplv)
typ G:417 LG pal.b[8240] typ!s_codev:=set_v("CODE",@code)
typ G:417 LG pal.b[8241] typ!i:=typ!s_code0
typ G:417 LG pal.b[8242] typ!s_rds:=set_f("RDS",@rds)
typ G:417 LG pal.b[8243] typ!s_wrs:=set_f("WRS",@wrs)
typ G:417 LG pal.b[8244] typ!s_gensy:=d("GENSYM",s_code0,@gensym)
typ G:417 LG pal.b[8245] typ!s_name:=set_v("NAME",@name)
typ G:417 LG pal.b[8248] typ!i:=a_qu
typ G:417 LG pal.b[8249] typ!s_tuple:=set_v("TUPLE",@tuple)
typ G:417 LG pal.b[8250] typ!s_xtupl:=set_v("SAVE",@xtuple)
typ G:417 LG pal.b[8251] typ!s_tra:=set_c("TRACE",@trace)
typ G:417 LG pal.b[8252] typ!s_e:=ze
typ G:417 LG pal.b[8254] typ!i:=a_fclos
typ G:417 LG pal.b[8256] typ!s_rec:=du("rec",s_code2,...,s_rec)
typ G:417 LG pal.b[8257] typ!s_reca:=typ!s_rec
typ G:417 LG pal.b[8258] typ!s_let:=du("let",s_code3,...,s_let)
typ G:417 LG pal.b[8259] typ!i:=typ!s_let
typ G:417 LG pal.b[8260] typ!s_retu:=dv("return",s_codev,...,...)
typ G:417 LG pal.b[8261] typ!s_cond:=du("->",s_code3,...,s_cond)
typ G:417 LG pal.b[8262] typ!i:=typ!s_cond
typ G:417 LG pal.b[8263] typ!s_seq:=ds(";",@mseq,seq,...)
typ G:417 LG pal.b[8264] typ!s_seqa:=typ!s_seq
typ G:417 LG pal.b[8265] set_z(!typ!s_seq,"<>",...,...)
typ G:417 LG pal.b[8266] typ!s_colon:=du(":",s_code2,...,s_colon)
typ G:417 LG pal.b[8267] typ!s_dash:=set_v("DF",@mdash)
typ G:417 LG pal.b[8268] typ!s_aa:=dv("@",s_codev,...,...)
typ G:417 LG pal.b[8269] typ!s_zz:=dv("!",s_codev,...,...)
typ G:417 LG pal.b[8270] typ!s_apz:=set_c("AP",@ap1)
typ G:417 LG pal.b[8271] typ!i:=typ!s_apz
typ G:417 LG pal.b[8272] typ!i:=zj
typ G:417 LG pal.b[8499] FOR i=typ TO typ+typsz DO..
typ G:417 SG pal.b[8933] typ:=TABLE 0,0,0,...
typsz M:120 DEF palhdr.h[240] typsz=s_mb
typsz M:120 MAN pal.b[1631] TEST 0<=b0&b0<=typsz THEN .. ELSE ..
typsz M:120 MAN pal.b[4454] FOR i=typ TO typ+typsz DO..
typsz M:120 MAN pal.b[5293] UNLESS 0<=!q&!q<=typsz DO ..
typsz M:120 MAN pal.b[5637] IF 0<=t&t<=typsz DO ..
typsz M:120 MAN pal.b[8226] FOR i=typ TO typ+typsz DO..
typsz M:120 MAN pal.b[8451] FOR i=mtypsz+1 TO typsz DO..
typsz M:120 MAN pal.b[8499] FOR i=typ TO typ+typsz DO..
typsz M:120 MAN pal.b[9005] FOR i=0 TO typsz DO..
tyv G:498 DEF palhdr.h[600] tyv=
tyv G:498 FN pal.b[6433] LET tyv(p)=..
tyv G:498 LG pal.b[3376] IF tyv(a1)=a_qu DO ..
tyv G:498 LG pal.b[5639] x:=tyv(x)
tyv G:498 LG pal.b[5896] .. REPEATWHILE tyv(a)=a_fclos
tyv G:498 LG pal.b[6062] WHILE tyv(c)=a_fclos DO ..
tyv G:498 LG pal.b[6077] WHILE tyv(c3)=a_fclos DO ..
tyv G:498 LG pal.b[6121] prins(h1!tyv(c))
tyv G:498 LG pal.b[6130] prins(h1!tyv(c))
tyv G:498 LG pal.b[6247] UNLESS tyv(j)=zj&j~=zj DO ..
tyv G:498 LG pal.b[6251] UNLESS tyv(j)=zj&j~=zj DO ..
tyv G:498 LG pal.b[6255] IF tyv(k)=zj DO ..
tyv G:498 LG pal.b[6270] UNLESS tyv(f)=zj DO ..
tyv G:498 LG pal.b[6776] RESULTIS tyv(a)=a_num
tyv G:498 LG pal.b[9862] IF tyv(d)=a_qu DO ..
tyv G:498 LG pal.b[9901] tyv(a)
tyv G:498 LLG pal.b[8332] set_v("TY",@tyv)
ug M:200 DEF libhdr.h[157] ug=200
ug M:200 DEF palhdr.h[37] ug=200
ug M:200 DEF palhdr.h[4] ug=200
ug M:200 MAN palhdr.h[253] dummy=ug
uncopy G:563 DEF palhdr.h[672] uncopy=
uncopy G:563 FN pal.b[7841] LET uncopy(p)=..
uncopy G:563 LG pal.b[7745] u:=uncopy(u)
uncopy G:563 LG pal.b[7792] u:=uncopy(u)
undump G:612 DEF palhdr.h[726] undump=
undump G:612 FN pal.b[9176] LET undump(a)=..
undump G:612 LLG pal.b[8311] set_f("UNDUMP",@undump)
unload G:208 DEF palhdr.h[263] unload=
unload G:208 LG pal.b[9160] IF unload(s) DO ..
unloadall G:206 DEF palhdr.h[261] unloadall=
unloadseg G:106 DEF libhdr.h[122] unloadseg=106
unpackstring G:248 DEF palhdr.h[316] unpackstring=
unpackstring G:248 LG pal.b[7976] unpackstring(s,buffp)
unpackstring G:248 RT pal.b[866] LET unpackstring(s,v)BE..
unpackstring G:31 DEF libhdr.h[46] unpackstring=31
unrdch G:40 DEF libhdr.h[55] unrdch=40
unrdch G:40 DEF palhdr.h[21] unrdch=40
unrdch G:40 LG pal.b[748] unrdch()
unrdch G:40 LG pal.b[805] unrdch()
unset M:1 DEF pal.b[719] unset=1
unset M:1 MAN pal.b[1121] RESULTIS unset
unset M:1 MAN pal.b[1181] TEST hwm=unset THEN .. ELSE ..
untrace G:485 DEF palhdr.h[584] untrace=
untrace G:485 FN pal.b[7288] LET untrace(a)=..
untrace G:485 LG pal.b[7295] lmap(untrace,a)
untrace G:485 LG pal.b[7297] msg1(16,untrace,a)
untrace G:485 LLG pal.b[8348] set_v("UNTRACE",@untrace)
userpostmortem G:261 DEF palhdr.h[329] userpostmortem=
userpostmortem G:261 LG pal.b[1058] UNLESS userpostmortem=globcon79 DO ..
userpostmortem G:261 LG pal.b[1059] userpostmortem(code,svalid)
userpostmortem G:261 RT pal.b[5380] LET userpostmortem(code,svalid)BE..
userpostmortem G:261 SG pal.b[5381] userpostmortem:=dummy
v S:1 DEF pal.b[6646] v=0
v S:1 LL pal.b[6683] RESULTIS f(v)
v S:1 LL pal.b[6724] v
v S:1 LL pal.b[6729] v,h3!a-y0
v S:1 LL pal.b[6752] RESULTIS getx(s_numj,z,...)+v
v S:1 SL pal.b[6677] v:=buffp
v S:1 SL pal.b[6681] v:=transbcpl(arg1,buffp+buffl)
v S:1 SL pal.b[6726] v:=u+l+1
v S:1 SL pal.b[6734] v:=u+l+1
v S:1 SL pal.b[6750] a,v:=-a,ysg
v S:1 SL pal.b[6751] v:=0
valglob G:356 DEF palhdr.h[436] valglob=
valglob G:356 FN pal.b[5276] LET valglob(n)=..
validcode G:310 DEF palhdr.h[382] validcode=
validcode G:310 FN pal.b[981] LET validcode(p)=..
validcode G:310 LG pal.b[1071] IF validcode(p2>>2)&p2<f DO ..
validcode G:310 LG pal.b[1242] RESULTIS validcode(!p>>2)
validcode G:310 LG pal.b[1249] IF validcode(f) DO ..
validcode G:310 LG pal.b[1256] IF validcode(v) DO ..
validcode G:310 LG pal.b[4220] IF validcode(!f>>2) DO ..
validcode G:310 LG pal.b[989] IF validcode(p)&(...&entrymask)=entryword&getbyte(p,-8)<8 DO ..
validentry G:311 DEF palhdr.h[383] validentry=
validentry G:311 FN pal.b[988] LET validentry(p)=..
validentry G:311 LG pal.b[1069] IF 1!p=r&validentry((...&p_addr)>>2) DO ..
validentry G:311 LG pal.b[1140] IF map&validentry(p+2) DO ..
validentry G:311 LG pal.b[1250] TEST validentry(f) THEN .. ELSE ..
validentry G:311 LG pal.b[6652] UNLESS validentry(g) DO ..
validp F:8 FN pal.b[5284] LET validp(p)=..
validp F:8 LF pal.b[5359] UNLESS validp(q) DO ..
validp F:8 LF pal.b[5406] UNLESS validp(a) DO ..
verh F:12 LF pal.b[5328] scanp(verh)
verh F:12 RT pal.b[5356] LET verh(p)BE..
verify G:351 DEF palhdr.h[430] verify=
verify G:351 FN pal.b[5318] LET verify()=..
verify G:351 LG pal.b[4364] verify()
verify G:351 LG pal.b[5352] msg1(13,verify)
verify G:351 LG pal.b[5361] longjump(flevel(verify),l0)
verify G:351 LG pal.b[8459] verify()
verify G:351 LG pal.b[8561] verify()
w S:2 DEF pal.b[4216] w=0
w S:2 DEF pal.b[8434] w=0
w S:2 LL pal.b[4265] writef("%N%% heap used",...*100/ssz)
w S:2 LL pal.b[4278] IF n=0&w<kwords DO ..
w S:2 LL pal.b[4355] !i,stackp,w:=stackp,i,w+4
w S:2 LL pal.b[4358] cons:=cons+w
w S:2 LL pal.b[4365] IF w<ksq DO ..
w S:2 LL pal.b[4427] !p,stackp,w:=stackp,p,w+4
w S:2 LL pal.b[4428] cons:=cons+w
w S:2 LL pal.b[4434] IF w<ksq DO ..
w S:2 LL pal.b[8544] w:=w+4
w S:2 LL pal.b[8552] n:=w*100/ssz
w S:2 LL pal.b[8558] writef("   %N'eclaimed",n,w)
w S:2 SL pal.b[4329] stackp,w,gc1:=0,0,st1
w S:2 SL pal.b[4355] !i,stackp,w:=stackp,i,w+4
w S:2 SL pal.b[4424] w:=0
w S:2 SL pal.b[4427] !p,stackp,w:=stackp,p,w+4
w S:2 SL pal.b[8538] w:=0
w S:2 SL pal.b[8544] w:=w+4
w0 F:9 LF pal.b[6212] wrc:=w0
w0 F:9 RT pal.b[6209] LET w0(c)BE..
wch G:280 DEF palhdr.h[352] wch=
wch G:280 LG pal.b[1278] wch(c)
wch G:280 LG pal.b[1279] wch(45)
wch G:280 LG pal.b[1280] wch(t!j+48)
wch G:280 LG pal.b[1297] wch(10)
wch G:280 LG pal.b[1342] wch((n&7)+48)
wch G:280 LG pal.b[1348] wch((n&15)!(TABLE 48,...))
wch G:280 LG pal.b[1364] wch(45)
wch G:280 LG pal.b[1376] wch(48+x/100000)
wch G:280 LG pal.b[1378] wch(48)
wch G:280 LG pal.b[1379] wch(46)
wch G:280 LG pal.b[1381] wch(69)
wch G:280 LG pal.b[1686] wch(112)
wch G:280 LG pal.b[5614] wch(40)
wch G:280 LG pal.b[5616] wch(41)
wch G:280 LG pal.b[5701] wch(46)
wch G:280 LG pal.b[5704] prs(x,wch)
wch G:280 LG pal.b[5744] prs(s,wch)
wch G:280 LG pal.b[5748] wch(c)
wch G:280 LG pal.b[5750] wch(c)
wch G:280 LG pal.b[5754] wch(c-y0)
wch G:280 LG pal.b[5761] wch(45)
wch G:280 LG pal.b[5793] wch(40)
wch G:280 LG pal.b[5795] wch(47)
wch G:280 LG pal.b[5804] wch(40)
wch G:280 LG pal.b[5830] wch(42)
wch G:280 LG pal.b[5833] wch(94)
wch G:280 LG pal.b[5839] wch(40)
wch G:280 LG pal.b[5841] wch(45)
wch G:280 LG pal.b[5844] wch(41)
wch G:280 LG pal.b[5859] wch(35)
wch G:280 LG pal.b[5868] wch(81)
wch G:280 LG pal.b[5880] wch(getbyte(s0,i))
wch G:280 LG pal.b[5881] wch(32)
wch G:280 LG pal.b[5883] wch(40)
wch G:280 LG pal.b[5885] wch(41)
wch G:280 LG pal.b[5894] wch(32)
wch G:280 LG pal.b[5913] wch(c)
wch G:280 LG pal.b[5917] wch(41)
wch G:280 LG pal.b[5964] prs(a,wch)
wch G:280 LG pal.b[5988] wch(40)
wch G:280 LG pal.b[5990] wch(47)
wch G:280 LG pal.b[6001] wch(93)
wch G:280 LG pal.b[6015] wch(40)
wch G:280 LG pal.b[6027] wch(91)
wch G:280 LG pal.b[6029] wch(58)
wch G:280 LG pal.b[6031] wch(93)
wch G:280 LG pal.b[6058] wch(40)
wch G:280 LG pal.b[6063] wch(32)
wch G:280 LG pal.b[6073] wch(40)
wch G:280 LG pal.b[6078] wch(32)
wch G:280 LG pal.b[6091] wch(40)
wch G:280 LG pal.b[6108] wch(40)
wch G:280 LG pal.b[6114] wch(69)
wch G:280 LG pal.b[6116] wch(74)
wch G:280 LG pal.b[6120] wch(40)
wch G:280 LG pal.b[6122] wch(32)
wch G:280 LG pal.b[6129] wch(40)
wch G:280 LG pal.b[6141] wch(40)
wch G:280 LG pal.b[6149] wch(40)
wch G:280 LG pal.b[6153] wch(32)
wch G:280 LG pal.b[6171] wch(40)
wch G:280 LG pal.b[6173] wch(32)
wch G:280 LG pal.b[6178] wch(40)
wch G:280 LG pal.b[6181] wch(39)
wch G:280 LG pal.b[6185] wch(41)
wch G:280 LG pal.b[6596] wch(32)
wch G:280 LG pal.b[6611] wch(32)
wch G:280 LG pal.b[799] wch(c)
wch G:280 LG pal.b[824] wch(b)
wch G:280 LG pal.b[830] wch(35)
wch G:280 LG pal.b[843] wch(32)
wch G:280 LG pal.b[863] wch(getbyte(s,i))
wch G:280 LG pal.b[906] wch(type)
wch G:280 LG pal.b[930] f:=wch
wch G:280 LG pal.b[954] wch(ch)
wch G:280 RT pal.b[809] LET wch(b)BE..
wch1 G:281 DEF palhdr.h[353] wch1=
wch1 G:281 LG pal.b[5749] prs(s,wch1)
wch1 G:281 RT pal.b[819] LET wch1(b)BE..
wframe G:318 DEF palhdr.h[390] wframe=
wframe G:318 FN pal.b[1235] LET wframe(p,q,r)=..
wframe G:318 LG pal.b[1228] UNLESS wframe(p,q,writearg) DO ..
wframe G:318 LG pal.b[8965] wframe
wframe G:318 SG pal.b[8966] wframe,pframe:=pframe,t
wn F:40 LF pal.b[1285] wn(n,d,32)
wn F:40 LF pal.b[1289] wn(ABSn,d,48)
wn F:40 LF pal.b[1293] wn(n,0)
wn F:40 RT pal.b[1273] LET wn(n,d,c)BE..
worse G:412 DEF palhdr.h[502] worse=
worse G:412 LG pal.b[110] IF worse DO ..
worse G:412 LG pal.b[142] IF worse DO ..
worse G:412 LG pal.b[176] IF worse DO ..
worse G:412 LG pal.b[233] IF worse DO ..
worse G:412 LG pal.b[269] IF worse DO ..
worse G:412 LG pal.b[309] IF worse DO ..
worse G:412 LG pal.b[4774] IF worse DO ..
worse G:412 LG pal.b[4806] IF worse DO ..
worse G:412 LG pal.b[4828] IF worse DO ..
worse G:412 LG pal.b[4831] IF worse DO ..
worse G:412 LG pal.b[4982] IF worse DO ..
worse G:412 LG pal.b[5043] IF worse DO ..
worse G:412 LG pal.b[5087] TEST worse THEN .. ELSE ..
worse G:412 LG pal.b[5114] IF worse DO ..
worse G:412 LG pal.b[5219] IF worse DO ..
worse G:412 LG pal.b[7024] IF worse DO ..
worse G:412 LG pal.b[7454] IF worse DO ..
worse G:412 LG pal.b[7471] TEST worse THEN .. ELSE ..
worse G:412 SG pal.b[429] numarg,worse,worse1:=FALSE,FALSE,FALSE
worse G:412 SG pal.b[453] worse:=TRUE
worse G:412 SG pal.b[484] worse:=TRUE
worse G:412 SG pal.b[506] worse:=TRUE
worse G:412 SG pal.b[513] worse:=TRUE
worse G:412 SG pal.b[528] worse:=TRUE
worse G:412 SG pal.b[537] worse:=TRUE
worse G:412 SG pal.b[544] worse:=TRUE
worse G:412 SG pal.b[557] worse:=TRUE
worse G:412 SG pal.b[573] worse:=TRUE
worse G:412 SG pal.b[575] worse:=TRUE
worse G:412 SG pal.b[586] worse:=TRUE
worse G:412 SG pal.b[588] worse:=TRUE
worse G:412 SG pal.b[599] worse:=TRUE
worse G:412 SG pal.b[615] worse:=TRUE
worse G:412 SG pal.b[621] worse:=TRUE
worse G:412 SG pal.b[623] worse:=TRUE
worse G:412 SG pal.b[625] worse:=TRUE
worse G:412 SG pal.b[656] worse:=TRUE
worse G:412 SG pal.b[679] worse:=TRUE
worse G:412 SG pal.b[685] worse:=TRUE
worse1 G:413 DEF palhdr.h[503] worse1=
worse1 G:413 LG pal.b[198] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[213] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[233] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[270] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[311] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[4883] IF worse1 DO ..
worse1 G:413 LG pal.b[4941] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[4983] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[5044] IF worse1 DO ..
worse1 G:413 LG pal.b[5088] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[5115] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[5220] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[7426] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[7436] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[7455] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[7472] TEST worse1 THEN .. ELSE ..
worse1 G:413 LG pal.b[7480] RESULTIS worse1
worse1 G:413 SG pal.b[429] numarg,worse,worse1:=FALSE,FALSE,FALSE
worse1 G:413 SG pal.b[474] worse1:=TRUE
worse1 G:413 SG pal.b[500] worse1:=TRUE
worse1 G:413 SG pal.b[509] worse1:=TRUE
worse1 G:413 SG pal.b[531] worse1:=TRUE
worse1 G:413 SG pal.b[540] worse1:=TRUE
worse1 G:413 SG pal.b[560] worse1:=TRUE
worse1 G:413 SG pal.b[572] worse1:=TRUE
worse1 G:413 SG pal.b[579] worse1:=TRUE
worse1 G:413 SG pal.b[585] worse1:=TRUE
worse1 G:413 SG pal.b[602] worse1:=TRUE
worse1 G:413 SG pal.b[614] worse1:=TRUE
worse1 G:413 SG pal.b[620] worse1:=TRUE
worse1 G:413 SG pal.b[629] worse1:=TRUE
worse1 G:413 SG pal.b[670] worse1:=TRUE
worse1 G:413 SG pal.b[682] worse1:=TRUE
wrc G:279 DEF palhdr.h[351] wrc=
wrc G:279 LG pal.b[1481] zero,wrc
wrc G:279 LG pal.b[3080] zero,dummy,wrc
wrc G:279 LG pal.b[6211] -wrc,-chc
wrc G:279 LG pal.b[756] wrc(10)
wrc G:279 LG pal.b[816] wrc(b)
wrc G:279 LG pal.b[833] wrc(c)
wrc G:279 SG pal.b[1482] wrc:=wrch
wrc G:279 SG pal.b[1497] wrc:=w
wrc G:279 SG pal.b[1503] wrc:=wrch
wrc G:279 SG pal.b[3108] wrc:=w
wrc G:279 SG pal.b[6212] wrc:=w0
wrc G:279 SG pal.b[6217] wrc,chc:=-w1,-w2
wrc G:279 SG pal.b[729] wrc,writep:=wrch,writen
wrch G:41 DEF libhdr.h[56] wrch=41
wrch G:41 DEF palhdr.h[22] wrch=41
wrch G:41 LG pal.b[1482] wrc:=wrch
wrch G:41 LG pal.b[1503] wrc:=wrch
wrch G:41 LG pal.b[729] wrc,writep:=wrch,writen
wrflt G:286 DEF palhdr.h[358] wrflt=
wrflt G:286 LG pal.b[5652] wrflt(h2!x)
wrflt G:286 LG pal.b[926] f:=wrflt
wrflt G:286 RT pal.b[1361] LET wrflt(x)BE..
writearg G:250 DEF palhdr.h[318] writearg=
writearg G:250 LG pal.b[1228] UNLESS wframe(p,q,writearg) DO ..
writearg G:250 LG pal.b[1684] writearg
writearg G:250 LG pal.b[5877] writearg(a3)
writearg G:250 LG pal.b[911] f:=writearg
writearg G:250 RT pal.b[1246] LET writearg(v)BE..
writeargp G:345 DEF palhdr.h[424] writeargp=
writeargp G:345 LG pal.b[1645] writeargp(p,FALSE)
writeargp G:345 LG pal.b[1666] writeargp(!t,b)
writeargp G:345 LG pal.b[1687] t:=writeargp
writeargp G:345 LG pal.b[5306] writeargp(a,FALSE)
writeargp G:345 LG pal.b[5337] writeargp(dd1,TRUE)
writeargp G:345 LG pal.b[5340] writeargp(h2!dd3,TRUE)
writeargp G:345 LG pal.b[5342] writeargp(h3!dd3,TRUE)
writeargp G:345 LG pal.b[5372] writeargp(i,f)
writeargp G:345 LG pal.b[5376] writeargp(i,f)
writeargp G:345 RT pal.b[1624] LET writeargp(a,f)BE..
writeblock G:275 DEF palhdr.h[347] writeblock=
writed G:249 DEF palhdr.h[317] writed=
writed G:249 LG pal.b[936] f:=writed
writed G:249 LG pal.b[940] f:=writed
writed G:249 RT pal.b[1284] LET writed(n,d)BE..
writed G:85 DEF libhdr.h[100] writed=85
writef G:258 DEF palhdr.h[326] writef=
writef G:258 LG pal.b[1013] writef("*n*nSTE'%N (%T)*n",code)
writef G:258 LG pal.b[1034] writef("*n*nPRO'%N(%X6)*n",code,...,addr)
writef G:258 LG pal.b[1037] writef("*nIS G'EFINED?*n",gaddr)
writef G:258 LG pal.b[1040] writef("*n*nCOM'FTER %U*n",addr>>2,data)
writef G:258 LG pal.b[1048] writef("*n*nSTE'X3 (%T)*n",code)
writef G:258 LG pal.b[1064] writef("*nSTAC'LOST %N*n",@code-3)
writef G:258 LG pal.b[1075] writef("CONJE'M %N(%A)",q,!q)
writef G:258 LG pal.b[1077] writef("STACK'N TO %N*n",stackb,stackl)
writef G:258 LG pal.b[1079] writef("%Z%N %A",12,i,...)
writef G:258 LG pal.b[1104] writef("*n*nFAU'TINE %S*n",fault,routine)
writef G:258 LG pal.b[1105] writef(format,ddname)
writef G:258 LG pal.b[1136] writef("*nMAP ') TO %N*n",p1,...,p2)
writef G:258 LG pal.b[1141] writef("%Z%I7/%S",19,...,p)
writef G:258 LG pal.b[1152] writef("*n*n%I7'ON %S   ",p,p+7)
writef G:258 LG pal.b[1153] writef("COMPI'N WORDS*n",p+4,...>>2)
writef G:258 LG pal.b[1159] writef("%Z%I7:%I7",19,p,...)
writef G:258 LG pal.b[1167] writef("*n*n*n*nL'LE *"%S*"*n",p+7)
writef G:258 LG pal.b[1177] writef("     '    %I7*n",stackend)
writef G:258 LG pal.b[1183] writef("%I9*n",hwm)
writef G:258 LG pal.b[1184] writef("     '  %I7*n*n*n",stackbase)
writef G:258 LG pal.b[1195] writef("*nGLOB'TOR(%N) ",@g0)
writef G:258 LG pal.b[1197] writef("%N GL'LOCATED*n",g0)
writef G:258 LG pal.b[1203] writef("%ZG%I4 %A",12,t,...)
writef G:258 LG pal.b[1225] writef("<%N",(...&p_addr)-(...&p_addr))
writef G:258 LG pal.b[1227] writef("*n%I6: %A",p,!p)
writef G:258 LG pal.b[1251] writef("'%S'",f-2)
writef G:258 LG pal.b[1252] writef("*"%X2:%N",v>>24,f)
writef G:258 LG pal.b[1256] writef("'%X2:%N",v>>24,a)
writef G:258 LG pal.b[1262] writef("%X2:%N",v>>24,a)
writef G:258 LG pal.b[1484] writef("*n*n# (%T) ")
writef G:258 LG pal.b[1494] writef(s,a,b,...)
writef G:258 LG pal.b[1505] writef("*n*n# (%T) ")
writef G:258 LG pal.b[1595] writef(s,a,b,...)
writef G:258 LG pal.b[1600] writef(s,a,b,...)
writef G:258 LG pal.b[1607] writef(s,a,b,...)
writef G:258 LG pal.b[1634] writef("(%N#%N# %P)",b,b0,b)
writef G:258 LG pal.b[1637] writef("?%X2:'(%X2:%N)",a>>24,b,...)
writef G:258 LG pal.b[1640] writef("?%N",a)
writef G:258 LG pal.b[1657] writef("*n%A   ",qq)
writef G:258 LG pal.b[3106] writef(s,a,b,...)
writef G:258 LG pal.b[3774] writef("*n# Er' on: %E*n",printa,s)
writef G:258 LG pal.b[4254] writef("%M# %' %V+%V s",s,...,rtime)
writef G:258 LG pal.b[4265] writef("%N%% heap used",...*100/ssz)
writef G:258 LG pal.b[4267] writef("   %N' %N cons",cycles-y0,cons-y0)
writef G:258 LG pal.b[4271] writef("BCPL/'%N words",...-stackbase,...,...)
writef G:258 LG pal.b[5281] writef("*n# Gl't to %A*n",n2,...!n2)
writef G:258 LG pal.b[5319] writef("*n# ch'ap (%T):")
writef G:258 LG pal.b[5326] writef(" %N w's free;*n",n)
writef G:258 LG pal.b[5332] writef("*n# en'ck (%T)*n")
writef G:258 LG pal.b[5336] writef("*n# Ba') -> %E*n",errorp,dd1,...)
writef G:258 LG pal.b[5363] writef("%ZTANGLE %N-%N",8,p,q)
writef G:258 LG pal.b[5369] writef("*n*n# HEAP (%T)*n")
writef G:258 LG pal.b[5377] writef("*n# EN'P (%T)*n*n")
writef G:258 LG pal.b[5393] writef("*n# %S (%T)",s)
writef G:258 LG pal.b[5422] writef("*n*n# C'%S (%T)*n",s)
writef G:258 LG pal.b[5460] writef("*n# +:'E) = %E*n",printa,a,...)
writef G:258 LG pal.b[5476] writef("*n# **:'E) = %E*n",printa,a,...)
writef G:258 LG pal.b[5494] writef("*n# /:'E) = %E*n",printa,a,...)
writef G:258 LG pal.b[5513] writef("*n# RE'E) = %E*n",printa,a,...)
writef G:258 LG pal.b[5528] writef("*n# Q:'%P : %P*n",printa,a,...)
writef G:258 LG pal.b[5631] writef("[%A]",x)
writef G:258 LG pal.b[5638] writef("#%N#",t)
writef G:258 LG pal.b[5641] writef("#?%N(%N)#",x,t)
writef G:258 LG pal.b[5654] writef("...%N",h3!x)
writef G:258 LG pal.b[5708] writef(s0,s1)
writef G:258 LG pal.b[5865] writef(" ...%N",(a0&p_tagp)>>24)
writef G:258 LG pal.b[6034] writef("*n#codez %P",h2!c)
writef G:258 LG pal.b[6236] writef("*n%P%Z",h3!e,15)
writef G:258 LG pal.b[6272] writef("*n cel'%Zand %E",g,...,...)
writef G:258 LG pal.b[6288] writef("*n*n%E%Y%E",printa,f,...)
writef G:258 LG pal.b[6756] writef("*n*n# T'V+%V s*n*n",a,...,rtime)
writef G:258 LG pal.b[7301] writef("*n# Ar' %P: %E*n",h1!c,print,a)
writef G:258 LG pal.b[7311] writef("*n# Do' val %E*n",f,print,arg1)
writef G:258 LG pal.b[8075] writef("*n# Pa'K bytes*n",timeofday(),...,...)
writef G:258 LG pal.b[8078] writef("# Ver'f region",loadpoint+4,...,...)
writef G:258 LG pal.b[8203] writef("*n# IN'K BYTES*n",ssz>>8)
writef G:258 LG pal.b[8558] writef("   %N'eclaimed",n,w)
writef G:258 LG pal.b[9169] writef("# %N 'alue %P*n",cycles-y0,...,arg1)
writef G:258 LG pal.b[9216] writef("*n*n# S'N)*n ... ",n,sym)
writef G:258 LG pal.b[970] writef("%N.%J2 s",t/1000,.../10)
writef G:258 LG pal.b[971] writef("%N ms",t)
writef G:258 LG pal.b[977] writef("%N.%J2",t/100,tMOD100)
writef G:258 LLG pal.b[8341] set_r("PRINF",@writef)
writef G:258 RT pal.b[891] LET writef(format,a,b,c,d,e,f)BE..
writef G:94 DEF libhdr.h[110] writef=94
writehex G:257 DEF palhdr.h[325] writehex=
writehex G:257 LG pal.b[1347] writehex(n>>4,d-1)
writehex G:257 LG pal.b[1358] writehex(n,8)
writehex G:257 LG pal.b[934] f:=writehex
writehex G:257 RT pal.b[1346] LET writehex(n,d)BE..
writehex G:87 DEF libhdr.h[102] writehex=87
writel G:285 DEF palhdr.h[357] writel=
writel G:285 LG pal.b[1380] writel(x,5)
writel G:285 LG pal.b[5769] f:=writel
writel G:285 LG pal.b[5775] writel(h2!p,numwi)
writel G:285 LG pal.b[5776] writel(h3!p,numwi)
writel G:285 LG pal.b[938] f:=writel
writel G:285 RT pal.b[1288] LET writel(n,d)BE..
writen G:243 DEF palhdr.h[311] writen=
writen G:243 LG pal.b[1265] writen(v)
writen G:243 LG pal.b[1382] writen(e)
writen G:243 LG pal.b[5624] writen(x-y0)
writen G:243 LG pal.b[5759] writen,z
writen G:243 LG pal.b[5768] writen(h2!p)
writen G:243 LG pal.b[5788] writen(y0-p)
writen G:243 LG pal.b[5789] writen(p-y0)
writen G:243 LG pal.b[5815] writen(y0-p2)
writen G:243 LG pal.b[5819] writen(p2-y0)
writen G:243 LG pal.b[5834] writen(h3!p-y0)
writen G:243 LG pal.b[729] wrc,writep:=wrch,writen
writen G:243 RT pal.b[1292] LET writen(n)BE..
writen G:86 DEF libhdr.h[101] writen=86
writeo G:246 DEF palhdr.h[314] writeo=
writeo G:246 RT pal.b[1353] LET writeo(n)BE..
writeoct G:259 DEF palhdr.h[327] writeoct=
writeoct G:259 LG pal.b[1341] writeoct(n>>3,d-1)
writeoct G:259 LG pal.b[1354] writeoct(n,8)
writeoct G:259 LG pal.b[932] f:=writeoct
writeoct G:259 RT pal.b[1340] LET writeoct(n,d)BE..
writeoct G:88 DEF libhdr.h[103] writeoct=88
writep G:284 DEF palhdr.h[356] writep=
writep G:284 LG pal.b[909] f:=writep
writep G:284 SG pal.b[729] wrc,writep:=wrch,writen
writep G:284 SG pal.b[9035] writep:=prin
writerec G:216 DEF palhdr.h[278] writerec=
writes G:242 DEF palhdr.h[310] writes=
writes G:242 LG pal.b[1045] writes("*n*nSTA'VERFLOW*n")
writes G:242 LG pal.b[1106] writes("*n*n")
writes G:242 LG pal.b[1176] writes("*n*nEXT' STACK*n*n")
writes G:242 LG pal.b[1178] writes("     ' MARK   ")
writes G:242 LG pal.b[1180] writes("     BRIM*n")
writes G:242 LG pal.b[1182] writes("    UNSET*n")
writes G:242 LG pal.b[1190] writes("*n*n")
writes G:242 LG pal.b[1199] writes("GLOBA'RO LOST*n")
writes G:242 LG pal.b[1205] writes("*n*n*n")
writes G:242 LG pal.b[1214] writes("*n*nBAC' CALLED*n")
writes G:242 LG pal.b[1220] writes("*n   FLOOR")
writes G:242 LG pal.b[1231] writes("*n*nEND'KTRACE*n*n")
writes G:242 LG pal.b[1259] writes("STACK")
writes G:242 LG pal.b[1362] writes("0.0")
writes G:242 LG pal.b[1636] writes("#s")
writes G:242 LG pal.b[3081] writes("*n*n# ")
writes G:242 LG pal.b[5311] writes("#...etc")
writes G:242 LG pal.b[5347] writes("*nRe-start DD")
writes G:242 LG pal.b[5373] writes("*n #co'region#*n")
writes G:242 LG pal.b[5643] writes("#trace#")
writes G:242 LG pal.b[5726] writes(s0)
writes G:242 LG pal.b[5812] writes(f->s0,s1)
writes G:242 LG pal.b[5816] writes(f->s1,s0)
writes G:242 LG pal.b[5824] writes(s0)
writes G:242 LG pal.b[5827] writes(f->s1,s0)
writes G:242 LG pal.b[5897] writes(" . ")
writes G:242 LG pal.b[5912] writes("#etc#")
writes G:242 LG pal.b[5932] writes("#etc#")
writes G:242 LG pal.b[5935] writes("#loop#")
writes G:242 LG pal.b[5948] writes(", ")
writes G:242 LG pal.b[5975] writes("#etc#")
writes G:242 LG pal.b[5997] writes("#term[")
writes G:242 LG pal.b[6009] writes("#xtuple#")
writes G:242 LG pal.b[6020] writes(", ")
writes G:242 LG pal.b[6021] writes("#trace#")
writes G:242 LG pal.b[6038] writes("*n#hcode# ")
writes G:242 LG pal.b[6059] writes("REC ")
writes G:242 LG pal.b[6066] writes(" . ")
writes G:242 LG pal.b[6074] writes("LET ")
writes G:242 LG pal.b[6081] writes(" = ")
writes G:242 LG pal.b[6084] writes(" IN ")
writes G:242 LG pal.b[6093] writes(" -> ")
writes G:242 LG pal.b[6097] writes(", ")
writes G:242 LG pal.b[6110] writes(p=y2->"; "," <> ")
writes G:242 LG pal.b[6151] writes(" %")
writes G:242 LG pal.b[6229] writes("*n*n en'ronment:")
writes G:242 LG pal.b[6231] writes(" empty*n")
writes G:242 LG pal.b[6239] writes(e=ze->"*n end'ronment*n","*n etc*n")
writes G:242 LG pal.b[6246] writes("*n*n Pa'cktrace:")
writes G:242 LG pal.b[6248] writes(" empty*n")
writes G:242 LG pal.b[6258] writes("*n etc")
writes G:242 LG pal.b[6259] writes("*n end'cktrace*n")
writes G:242 LG pal.b[6268] writes("*n stack frame:")
writes G:242 LG pal.b[6274] writes("*n etc")
writes G:242 LG pal.b[6275] writes("*n end'f frame*n")
writes G:242 LG pal.b[6762] writes("*n*n# Error: ")
writes G:242 LG pal.b[798] writes("# ")
writes G:242 LG pal.b[813] writes("*n      ")
writes G:242 LG pal.b[9220] writes(" ...*n")
writes G:242 LG pal.b[928] f:=writes
writes G:242 RT pal.b[861] LET writes(s)BE..
writes G:89 DEF libhdr.h[104] writes=89
writeseg G:217 DEF palhdr.h[279] writeseg=
writet G:90 DEF libhdr.h[105] writet=90
writetolog G:225 DEF palhdr.h[290] writetolog=
writetolog G:225 LG pal.b[1100] writetolog("ERROR'SYSPRINT")
writetolog G:225 LG pal.b[735] writetolog("NO SYSPRINT")
writeu G:91 DEF libhdr.h[106] writeu=91
writewords G:45 DEF libhdr.h[60] writewords=45
writex G:256 DEF palhdr.h[324] writex=
writex G:256 RT pal.b[1357] LET writex(n)BE..
writez G:92 DEF libhdr.h[107] writez=92
wrnextblock G:276 DEF palhdr.h[348] wrnextblock=
wrs G:470 DEF palhdr.h[568] wrs=
wrs G:470 FN pal.b[5603] LET wrs(s)=..
wrs G:470 LLG pal.b[8243] typ!s_wrs:=set_f("WRS",@wrs)
wtime F:26 LF pal.b[916] wtime(time())
wtime F:26 LF pal.b[918] f:=wtime
wtime F:26 RT pal.b[967] LET wtime(t)BE..
wtime1 F:27 LF pal.b[920] f:=wtime1
wtime1 F:27 RT pal.b[975] LET wtime1(t)BE..
xtab G:288 DEF palhdr.h[360] xtab=
xtab G:288 LG pal.b[1665] xtab(12)
xtab G:288 LG pal.b[852] xtab(n-chcMODn)
xtab G:288 LLG pal.b[8346] set_r("XTAB",@xtab)
xtab G:288 RT pal.b[846] LET xtab(n)BE..
xtuple G:517 DEF palhdr.h[621] xtuple=
xtuple G:517 FN pal.b[6616] LET xtuple(p)=..
xtuple G:517 LLG pal.b[8250] typ!s_xtupl:=set_v("SAVE",@xtuple)
y0 M:-1073741824 DEF palhdr.h[232] y0=-(signbit>>1)
y0 M:-1073741824 MAN pal.b[10056] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[10058] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[10065] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[10073] IF a=y0|b=y0 DO ..
y0 M:-1073741824 MAN pal.b[10074] RESULTIS y0
y0 M:-1073741824 MAN pal.b[10088] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[10089] RESULTIS y0
y0 M:-1073741824 MAN pal.b[10098] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[100] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[10100] IF b=y1|a=y0|a=y1 DO ..
y0 M:-1073741824 MAN pal.b[10106] asym(y0)
y0 M:-1073741824 MAN pal.b[10116] asym(y0)
y0 M:-1073741824 MAN pal.b[10143] TEST gtv(s,y0) THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[117] a:=smul(h2!a,.../ga1+y0)
y0 M:-1073741824 MAN pal.b[118] u:=(u+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[123] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[123] RESULTIS y0
y0 M:-1073741824 MAN pal.b[127] a:=(a+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[128] ga1:=gcd1(a,ga1+y0)
y0 M:-1073741824 MAN pal.b[129] a:=longdiv1(a,ga1+y0)
y0 M:-1073741824 MAN pal.b[130] v:=(v+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[1405] RESULTIS y0
y0 M:-1073741824 MAN pal.b[1414] RESULTIS y0
y0 M:-1073741824 MAN pal.b[1422] IF s1=y0 DO ..
y0 M:-1073741824 MAN pal.b[1423] RESULTIS y0
y0 M:-1073741824 MAN pal.b[1427] y0
y0 M:-1073741824 MAN pal.b[1431] q:=y0
y0 M:-1073741824 MAN pal.b[1432] UNLESS q=y0 DO ..
y0 M:-1073741824 MAN pal.b[1434] IF h3!p1=y0 DO ..
y0 M:-1073741824 MAN pal.b[143] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[1443] TEST h3!r0=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[1454] UNLESS d=y0 DO ..
y0 M:-1073741824 MAN pal.b[1455] TEST h3!p1=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[159] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[159] RESULTIS y0
y0 M:-1073741824 MAN pal.b[186] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[187] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[203] RESULTIS y0
y0 M:-1073741824 MAN pal.b[2045] q_selinput(h2!c-y0)
y0 M:-1073741824 MAN pal.b[2049] q_seloutput(h2!c-y0)
y0 M:-1073741824 MAN pal.b[2090] arg1:=g_nt(arg1,y0+4)
y0 M:-1073741824 MAN pal.b[2113] UNLESS y0<arg1&arg1<=h3!c DO ..
y0 M:-1073741824 MAN pal.b[2126] IF arg1<=y0 DO ..
y0 M:-1073741824 MAN pal.b[214] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[2162] arg1:=y0
y0 M:-1073741824 MAN pal.b[2425] FOR i=4+y0 TO h2!c DO..
y0 M:-1073741824 MAN pal.b[2443] FOR i=4+y0 TO h2!c DO..
y0 M:-1073741824 MAN pal.b[244] a:=smul(h2!a,.../ga1+y0)
y0 M:-1073741824 MAN pal.b[245] u:=(u+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[250] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[250] RESULTIS y0
y0 M:-1073741824 MAN pal.b[254] a:=(a+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[255] ga1:=gcd1(a,ga1+y0)
y0 M:-1073741824 MAN pal.b[256] a:=longdiv1(a,ga1+y0)
y0 M:-1073741824 MAN pal.b[257] v:=(v+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[271] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[292] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[292] RESULTIS y0
y0 M:-1073741824 MAN pal.b[3018] z,y0
y0 M:-1073741824 MAN pal.b[312] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[3173] RESULTIS y0
y0 M:-1073741824 MAN pal.b[3177] RESULTIS y0
y0 M:-1073741824 MAN pal.b[327] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[328] RESULTIS y0
y0 M:-1073741824 MAN pal.b[3825] RESULTIS n+y0
y0 M:-1073741824 MAN pal.b[3924] RESULTIS h3!c+y0
y0 M:-1073741824 MAN pal.b[3925] RESULTIS y0-h3!c
y0 M:-1073741824 MAN pal.b[3942] TEST n<=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[3943] IF n=y0 DO ..
y0 M:-1073741824 MAN pal.b[3945] gw1:=y0-n
y0 M:-1073741824 MAN pal.b[3948] gw1:=n-y0
y0 M:-1073741824 MAN pal.b[3988] RESULTIS gw1+y0
y0 M:-1073741824 MAN pal.b[3989] RESULTIS y0-gw1
y0 M:-1073741824 MAN pal.b[4014] muldiv(a-y0,b-y0,numba)
y0 M:-1073741824 MAN pal.b[4016] RESULTIS result2+y0
y0 M:-1073741824 MAN pal.b[4028] gl1,n:=n-y0,z
y0 M:-1073741824 MAN pal.b[4034] RESULTIS y0
y0 M:-1073741824 MAN pal.b[4159] gl1,n:=n-y0,zsy
y0 M:-1073741824 MAN pal.b[4189] RESULTIS h3!a+y0
y0 M:-1073741824 MAN pal.b[4190] RESULTIS y0-h3!a
y0 M:-1073741824 MAN pal.b[4267] writef("   %N' %N cons",cycles-y0,cons-y0)
y0 M:-1073741824 MAN pal.b[434] !a:=y0
y0 M:-1073741824 MAN pal.b[441] 1!a:=y0
y0 M:-1073741824 MAN pal.b[448] gw1:=Op26
y0 M:-1073741824 MAN pal.b[469] 1!a:=y0
y0 M:-1073741824 MAN pal.b[4731] ny0=-y0
y0 M:-1073741824 MAN pal.b[4759] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4762] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[4763] RESULTIS y0
y0 M:-1073741824 MAN pal.b[4765] a:=smul(.../ga1+y0,h2!b)
y0 M:-1073741824 MAN pal.b[4766] b:=(h1!b+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[4775] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4779] a:=longdiv1(a,ga1+y0)
y0 M:-1073741824 MAN pal.b[4783] b:=(h1!b+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[4791] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4798] a:=smul(.../ga1+y0,.../ga2+y0)
y0 M:-1073741824 MAN pal.b[4799] b:=smul(.../ga2+y0,.../ga1+y0)
y0 M:-1073741824 MAN pal.b[4809] IF g=y0 DO ..
y0 M:-1073741824 MAN pal.b[4812] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[4813] RESULTIS y0
y0 M:-1073741824 MAN pal.b[4816] g:=y0
y0 M:-1073741824 MAN pal.b[4819] IF g=y0 DO ..
y0 M:-1073741824 MAN pal.b[4826] g:=y0
y0 M:-1073741824 MAN pal.b[4837] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[4838] RESULTIS y0
y0 M:-1073741824 MAN pal.b[4853] IF a=y0|b=y0 DO ..
y0 M:-1073741824 MAN pal.b[4854] RESULTIS y0
y0 M:-1073741824 MAN pal.b[4874] RESULTIS ga1/ga2+y0
y0 M:-1073741824 MAN pal.b[4875] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4880] RESULTIS get4(s_ratn,...+y0,...,0)
y0 M:-1073741824 MAN pal.b[4884] IF g=y0 DO ..
y0 M:-1073741824 MAN pal.b[4885] IF b<y0 DO ..
y0 M:-1073741824 MAN pal.b[4894] IF b<y0 DO ..
y0 M:-1073741824 MAN pal.b[4897] b:=(b+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[4898] a:=longdiv1(a,ga1+y0)
y0 M:-1073741824 MAN pal.b[4906] IF g=y0 DO ..
y0 M:-1073741824 MAN pal.b[4910] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[4911] RESULTIS y0
y0 M:-1073741824 MAN pal.b[4916] a:=(a+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[4917] b:=longdiv1(b,ga1+y0)
y0 M:-1073741824 MAN pal.b[4923] IF g=y0 DO ..
y0 M:-1073741824 MAN pal.b[4928] IF result2=y0 DO ..
y0 M:-1073741824 MAN pal.b[4946] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4947] TEST b<y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4951] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[4954] IF b<y0 DO ..
y0 M:-1073741824 MAN pal.b[4956] b:=smul(h1!a,.../ga1+y0)
y0 M:-1073741824 MAN pal.b[4957] a:=(h2!a+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[495] 1!a:=y0
y0 M:-1073741824 MAN pal.b[4963] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4964] TEST h2!b<y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4968] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[4969] RESULTIS y0
y0 M:-1073741824 MAN pal.b[4971] IF h2!b<y0 DO ..
y0 M:-1073741824 MAN pal.b[4973] a:=smul(.../ga1+y0,h1!b)
y0 M:-1073741824 MAN pal.b[4974] b:=(h2!b+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[4984] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[4992] b:=longdiv1(b,ga1+y0)
y0 M:-1073741824 MAN pal.b[4996] a:=(h2!a+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[5002] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[5003] TEST h2!b<y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[5008] IF h2!b<y0 DO ..
y0 M:-1073741824 MAN pal.b[5010] a:=longdiv1(a,ga1+y0)
y0 M:-1073741824 MAN pal.b[5014] b:=(h2!b+ny0)/ga1+y0
y0 M:-1073741824 MAN pal.b[5022] TEST g=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[5024] TEST t<y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[5032] IF t<y0 DO ..
y0 M:-1073741824 MAN pal.b[5034] b:=smul(.../ga1+y0,.../ga2+y0)
y0 M:-1073741824 MAN pal.b[5035] a:=smul(.../ga2+y0,.../ga1+y0)
y0 M:-1073741824 MAN pal.b[5049] IF g=y0 DO ..
y0 M:-1073741824 MAN pal.b[5058] g:=y0
y0 M:-1073741824 MAN pal.b[5061] IF g=y0 DO ..
y0 M:-1073741824 MAN pal.b[5067] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[5068] RESULTIS y0
y0 M:-1073741824 MAN pal.b[5072] g:=y0
y0 M:-1073741824 MAN pal.b[5075] IF g=y0 DO ..
y0 M:-1073741824 MAN pal.b[5084] g:=y0
y0 M:-1073741824 MAN pal.b[5089] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[5092] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[5093] RESULTIS y0
y0 M:-1073741824 MAN pal.b[5096] IF result2=y0 DO ..
y0 M:-1073741824 MAN pal.b[5142] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[5143] RESULTIS y0
y0 M:-1073741824 MAN pal.b[516] gw1:=(Op26)#/(Op26)
y0 M:-1073741824 MAN pal.b[5176] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[5177] RESULTIS y0
y0 M:-1073741824 MAN pal.b[5189] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[5192] RESULTIS (a+ny0)MOD(b+ny0)+y0
y0 M:-1073741824 MAN pal.b[5196] RESULTIS result2+y0
y0 M:-1073741824 MAN pal.b[5197] RESULTIS y0
y0 M:-1073741824 MAN pal.b[5208] RESULTIS y0
y0 M:-1073741824 MAN pal.b[5221] RESULTIS y0
y0 M:-1073741824 MAN pal.b[5238] IF a=y0|a=y1 DO ..
y0 M:-1073741824 MAN pal.b[5242] TEST b<=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[5243] IF b=y0 DO ..
y0 M:-1073741824 MAN pal.b[5245] ga0:=y0-b
y0 M:-1073741824 MAN pal.b[5247] ga0:=b-y0
y0 M:-1073741824 MAN pal.b[526] 1!a:=y0
y0 M:-1073741824 MAN pal.b[5409] IF h2!a=y0 DO ..
y0 M:-1073741824 MAN pal.b[5417] IF (p&p_addr)=zsy|h2!p=y0 DO ..
y0 M:-1073741824 MAN pal.b[5469] IF c=y0 DO ..
y0 M:-1073741824 MAN pal.b[5510] IF result2=y0 DO ..
y0 M:-1073741824 MAN pal.b[5525] IF c=t=y0 DO ..
y0 M:-1073741824 MAN pal.b[555] 1!a:=y0
y0 M:-1073741824 MAN pal.b[5593] RESULTIS n+y0
y0 M:-1073741824 MAN pal.b[5598] IF n=y0 DO ..
y0 M:-1073741824 MAN pal.b[5605] IF n=y0 DO ..
y0 M:-1073741824 MAN pal.b[5610] rch()+y0
y0 M:-1073741824 MAN pal.b[5623] TEST ABSx-y0<=numba THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[5624] writen(x-y0)
y0 M:-1073741824 MAN pal.b[5662] s1:=s1-y0
y0 M:-1073741824 MAN pal.b[5679] s0,s1:="#%N-tuple#",h3!x-y0
y0 M:-1073741824 MAN pal.b[5682] s0,s1:="#%N-xtuple#",h3!x-y0
y0 M:-1073741824 MAN pal.b[5684] s0,s1:="#poly%N#",h3!x-y0
y0 M:-1073741824 MAN pal.b[5687] s0,s1:="#term%N#",h3!x-y0
y0 M:-1073741824 MAN pal.b[5707] s0,s1:="#G%N",h2!x-y0
y0 M:-1073741824 MAN pal.b[5754] wch(c-y0)
y0 M:-1073741824 MAN pal.b[5788] writen(y0-p)
y0 M:-1073741824 MAN pal.b[5789] writen(p-y0)
y0 M:-1073741824 MAN pal.b[5805] h2!p,h3!p>y0
y0 M:-1073741824 MAN pal.b[5811] TEST p2<y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[5815] writen(y0-p2)
y0 M:-1073741824 MAN pal.b[5819] writen(p2-y0)
y0 M:-1073741824 MAN pal.b[5828] prc(p2,30+y0)
y0 M:-1073741824 MAN pal.b[5831] prc(a,50+y0)
y0 M:-1073741824 MAN pal.b[5834] writen(h3!p-y0)
y0 M:-1073741824 MAN pal.b[5842] prc(p,y0)
y0 M:-1073741824 MAN pal.b[5904] prc(a,9+y0)
y0 M:-1073741824 MAN pal.b[5966] prc(a,y0)
y0 M:-1073741824 MAN pal.b[597] 1!a:=y0
y0 M:-1073741824 MAN pal.b[5986] b:=b>30+y0
y0 M:-1073741824 MAN pal.b[5989] prc(h2!c,y0)
y0 M:-1073741824 MAN pal.b[5991] prc(h1!c,y0)
y0 M:-1073741824 MAN pal.b[5994] prinpoly(c,FALSE,...,FALSE)
y0 M:-1073741824 MAN pal.b[6010] prc(h2!c,48+y0)
y0 M:-1073741824 MAN pal.b[6013] b:=b>8+y0
y0 M:-1073741824 MAN pal.b[6016] prc(h2!c,9+y0)
y0 M:-1073741824 MAN pal.b[6030] prc(h3!c,y0)
y0 M:-1073741824 MAN pal.b[6089] b:=b>10+y0
y0 M:-1073741824 MAN pal.b[6092] prc(h1!c,10+y0)
y0 M:-1073741824 MAN pal.b[6094] prc(h2!c,10+y0)
y0 M:-1073741824 MAN pal.b[6098] prc(c,10+y0)
y0 M:-1073741824 MAN pal.b[6102] TEST b>9+y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[6105] p:=9+y0
y0 M:-1073741824 MAN pal.b[6118] b:=b>35+y0
y0 M:-1073741824 MAN pal.b[6123] prc(h2!c,35+y0)
y0 M:-1073741824 MAN pal.b[6127] b:=b>35+y0
y0 M:-1073741824 MAN pal.b[6131] prc(h2!c,35+y0)
y0 M:-1073741824 MAN pal.b[6139] b:=b>(s0&63)+y0
y0 M:-1073741824 MAN pal.b[6143] prc(h2!c1,getbyte(...)+y0)
y0 M:-1073741824 MAN pal.b[6145] prc(h2!h1!c1,getbyte(...)+y0)
y0 M:-1073741824 MAN pal.b[6147] b:=b>10+y0
y0 M:-1073741824 MAN pal.b[6150] prc(h2!c1,11+y0)
y0 M:-1073741824 MAN pal.b[6152] prc(s,50+y0)
y0 M:-1073741824 MAN pal.b[6154] prc(h2!h1!c1,11+y0)
y0 M:-1073741824 MAN pal.b[6169] b:=b>38+y0
y0 M:-1073741824 MAN pal.b[6172] prc(h1!c,38+y0)
y0 M:-1073741824 MAN pal.b[6174] prc(h2!c,41+y0)
y0 M:-1073741824 MAN pal.b[6176] b:=b>39+y0
y0 M:-1073741824 MAN pal.b[6179] prc(h1!c,36+y0)
y0 M:-1073741824 MAN pal.b[6195] prc(c,y0)
y0 M:-1073741824 MAN pal.b[6218] TEST g>=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[6233] FOR i=y0 TO y0+8 DO..
y0 M:-1073741824 MAN pal.b[6250] FOR i=y0 TO y0+8 DO..
y0 M:-1073741824 MAN pal.b[6269] FOR i=y0 TO y0+8 DO..
y0 M:-1073741824 MAN pal.b[6358] h3!a1-y0
y0 M:-1073741824 MAN pal.b[639] gw2:=Op26
y0 M:-1073741824 MAN pal.b[6403] yz=y0+numba
y0 M:-1073741824 MAN pal.b[6404] IF y0<n&n<yz DO ..
y0 M:-1073741824 MAN pal.b[6468] RESULTIS y0
y0 M:-1073741824 MAN pal.b[648] gw2:=(Op26)#/(Op26)
y0 M:-1073741824 MAN pal.b[6588] UNLESS r=y0 DO ..
y0 M:-1073741824 MAN pal.b[6590] q_selinput(r-y0)
y0 M:-1073741824 MAN pal.b[6603] UNLESS s=y0 DO ..
y0 M:-1073741824 MAN pal.b[6605] q_selinput(s-y0)
y0 M:-1073741824 MAN pal.b[6616] get4(s_xtupl,z,p,y0)
y0 M:-1073741824 MAN pal.b[6650] @g0!(n-y0)
y0 M:-1073741824 MAN pal.b[665] 1!a:=y0
y0 M:-1073741824 MAN pal.b[6662] @g0!(n-y0)
y0 M:-1073741824 MAN pal.b[6667] @g0!(n-y0)
y0 M:-1073741824 MAN pal.b[6672] @g0!(n-y0)
y0 M:-1073741824 MAN pal.b[6692] IF ABSa-y0<numba DO ..
y0 M:-1073741824 MAN pal.b[6693] RESULTIS a-y0
y0 M:-1073741824 MAN pal.b[6702] RESULTIS h2!a-y0
y0 M:-1073741824 MAN pal.b[6729] v,h3!a-y0
y0 M:-1073741824 MAN pal.b[6748] RESULTIS a+y0
y0 M:-1073741824 MAN pal.b[6838] RESULTIS y0
y0 M:-1073741824 MAN pal.b[6848] RESULTIS m+y0
y0 M:-1073741824 MAN pal.b[6911] ny0=-y0
y0 M:-1073741824 MAN pal.b[6927] RESULTIS y0
y0 M:-1073741824 MAN pal.b[6942] RESULTIS arithfn(y0,p,a_minu)
y0 M:-1073741824 MAN pal.b[6949] RESULTIS p>=y0
y0 M:-1073741824 MAN pal.b[6955] RESULTIS h2!p>=y0
y0 M:-1073741824 MAN pal.b[6970] p:=y0
y0 M:-1073741824 MAN pal.b[6972] IF p<=y0 DO ..
y0 M:-1073741824 MAN pal.b[6973] IF p=y0 DO ..
y0 M:-1073741824 MAN pal.b[6991] TEST q>y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[7020] RESULTIS igcd(a+ny0,b+ny0)+y0
y0 M:-1073741824 MAN pal.b[7022] RESULTIS gcd1(b,a)+y0
y0 M:-1073741824 MAN pal.b[7025] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[7040] RESULTIS y0
y0 M:-1073741824 MAN pal.b[7049] RESULTIS (h2!p+ny0)/(h1!p+ny0)+y0
y0 M:-1073741824 MAN pal.b[7064] p:=y0
y0 M:-1073741824 MAN pal.b[7096] IF n=y0 DO ..
y0 M:-1073741824 MAN pal.b[7316] n:=n+cons-y0
y0 M:-1073741824 MAN pal.b[7437] ga1:=(h2!p-y0)/(h1!p-y0)+y0
y0 M:-1073741824 MAN pal.b[7442] IF ga1=y0 DO ..
y0 M:-1073741824 MAN pal.b[7443] RESULTIS h2!p>y0
y0 M:-1073741824 MAN pal.b[7444] RESULTIS ga1>y0
y0 M:-1073741824 MAN pal.b[7445] ga1:=(h2!q-y0)/(h1!q-y0)+y0
y0 M:-1073741824 MAN pal.b[7450] IF p=y0 DO ..
y0 M:-1073741824 MAN pal.b[7451] RESULTIS h2!q<y0
y0 M:-1073741824 MAN pal.b[7452] RESULTIS p<y0
y0 M:-1073741824 MAN pal.b[7458] ga1,ga2:=h2!p-y0,h1!p-y0
y0 M:-1073741824 MAN pal.b[7459] ga3,ga4:=h2!q-y0,h1!q-y0
y0 M:-1073741824 MAN pal.b[74] ny0=-y0
y0 M:-1073741824 MAN pal.b[7506] yz=y0+numba
y0 M:-1073741824 MAN pal.b[7543] y1,y0,y0
y0 M:-1073741824 MAN pal.b[7587] UNLESS f=y0 DO ..
y0 M:-1073741824 MAN pal.b[7594] RESULTIS y0
y0 M:-1073741824 MAN pal.b[7595] IF h3!r1=y0 DO ..
y0 M:-1073741824 MAN pal.b[7614] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[7618] IF h3!p=y0 DO ..
y0 M:-1073741824 MAN pal.b[7622] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[7625] h1!r:=get4(s_polyj,p,a,y0)
y0 M:-1073741824 MAN pal.b[7636] IF a=y0 DO ..
y0 M:-1073741824 MAN pal.b[7637] RESULTIS y0
y0 M:-1073741824 MAN pal.b[7672] p3+h3!q1-y0
y0 M:-1073741824 MAN pal.b[7688] TEST t=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[7699] q3:=p3+h3!q1-y0
y0 M:-1073741824 MAN pal.b[7728] FOR k=h3!u-h3!v+y0 TO y0 BY -1 DO..
y0 M:-1073741824 MAN pal.b[7731] UNLESS rr=y0 DO ..
y0 M:-1073741824 MAN pal.b[7744] RESULTIS y0
y0 M:-1073741824 MAN pal.b[7747] u:=y0
y0 M:-1073741824 MAN pal.b[7748] TEST h3!u=y0&h1!u=z THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[7751] TEST h3!r=y0&h1!r=z THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[7794] u:=y0
y0 M:-1073741824 MAN pal.b[7795] TEST h3!u=y0&h1!u=z THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[7810] zsy,y0
y0 M:-1073741824 MAN pal.b[7813] q:=get4(s_polyj,q,y0,q3)
y0 M:-1073741824 MAN pal.b[7832] h3!q:=h3!p-p3+y0
y0 M:-1073741824 MAN pal.b[7844] UNLESS h2!p=y0 DO ..
y0 M:-1073741824 MAN pal.b[7889] TEST r=y0 THEN .. ELSE ..
y0 M:-1073741824 MAN pal.b[8059] cons,cycles:=y0,y0
y0 M:-1073741824 MAN pal.b[8060] gensymn,algn:=y0,y0
y0 M:-1073741824 MAN pal.b[8213] zsy:=get4(s_unset,z,y0,...)
y0 M:-1073741824 MAN pal.b[9106] r:=kwords+y0
y0 M:-1073741824 MAN pal.b[9113] r:=kstack+y0
y0 M:-1073741824 MAN pal.b[9120] r:=ssz+y0
y0 M:-1073741824 MAN pal.b[9124] r:=ksq+y0
y0 M:-1073741824 MAN pal.b[9132] r:=chz+y0
y0 M:-1073741824 MAN pal.b[9169] writef("# %N 'alue %P*n",cycles-y0,...,arg1)
y0 M:-1073741824 MAN pal.b[9329] s0:=s1+y0
y0 M:-1073741824 MAN pal.b[9361] lprio,rprio,sym:=getbyte(s1,13)+y0,getbyte(...)+y0,getbyte(s1,15)
y0 M:-1073741824 MAN pal.b[9379] lprio,rprio,sym:=11+y0,11+y0,s_diadop
y0 M:-1073741824 MAN pal.b[93] RESULTIS y0
y0 M:-1073741824 MAN pal.b[9412] sym,s0:=s_num,s1+y0
y0 M:-1073741824 MAN pal.b[9456] rexp(y0)
y0 M:-1073741824 MAN pal.b[9488] rdef(y0,e1)
y0 M:-1073741824 MAN pal.b[9495] e:=rexp(9+y0)
y0 M:-1073741824 MAN pal.b[9498] e1:=rexp(9+y0)
y0 M:-1073741824 MAN pal.b[9501] mfn,rprio:=mqu,35+y0
y0 M:-1073741824 MAN pal.b[9513] e:=rfndef(s_dot+y0,y2)
y0 M:-1073741824 MAN pal.b[9516] rbvlist(s_dot+y0)
y0 M:-1073741824 MAN pal.b[9517] rfndef(s_dot+y0,y2)
y0 M:-1073741824 MAN pal.b[9524] rbv(s_relop+y0)
y0 M:-1073741824 MAN pal.b[9525] rexp(8+y0)
y0 M:-1073741824 MAN pal.b[9528] e2:=rexp(8+y0)
y0 M:-1073741824 MAN pal.b[9530] e3:=rexp(8+y0)
y0 M:-1073741824 MAN pal.b[9543] e:=rexp(6+y0)
y0 M:-1073741824 MAN pal.b[9560] e:=rexp(6+y0)
y0 M:-1073741824 MAN pal.b[9570] e:=f(y0,e1,s)
y0 M:-1073741824 MAN pal.b[9572] e:=rexp(y0)
y0 M:-1073741824 MAN pal.b[9593] rdef(y0,e2)
y0 M:-1073741824 MAN pal.b[9604] IF n>=8+y0 DO ..
y0 M:-1073741824 MAN pal.b[9607] e2:=rexp(8+y0)
y0 M:-1073741824 MAN pal.b[9611] IF n>=10+y0 DO ..
y0 M:-1073741824 MAN pal.b[9613] rexp(9+y0)
y0 M:-1073741824 MAN pal.b[9615] e2:=rexp(9+y0)
y0 M:-1073741824 MAN pal.b[9641] e2:=rexp(y0)
y0 M:-1073741824 MAN pal.b[9676] rdef(y0,d)
y0 M:-1073741824 MAN pal.b[9680] h2!d:=rbvlist(s_relop+y0)
y0 M:-1073741824 MAN pal.b[9681] h3!d:=rfndef(s_relop+y0,y1)
y0 M:-1073741824 MAN pal.b[9683] rdef(3+y0,d)
y0 M:-1073741824 MAN pal.b[9689] IF n>=3+y0 DO ..
y0 M:-1073741824 MAN pal.b[9692] rdef(y0,d)
y0 M:-1073741824 MAN pal.b[9696] IF n>=6+y0 DO ..
y0 M:-1073741824 MAN pal.b[9700] rdef(6+y0,d)
y0 M:-1073741824 MAN pal.b[9709] IF sym=s-y0 DO ..
y0 M:-1073741824 MAN pal.b[9719] IF sym=s-y0 DO ..
y0 M:-1073741824 MAN pal.b[9728] d:=rbvlist(s_rpar+y0)
y0 M:-1073741824 MAN pal.b[9832] RESULTIS y0
y0 M:-1073741824 MAN palhdr.h[233] y1=y0+1
y0 M:-1073741824 MAN palhdr.h[234] y2=y0+2
y0 M:-1073741824 MAN palhdr.h[235] y3=y0+3
y0 M:-1073741824 MAN palhdr.h[236] ym=y0-1
y1 M:-1073741823 DEF palhdr.h[233] y1=y0+1
y1 M:-1073741823 MAN pal.b[10075] IF a=y1 DO ..
y1 M:-1073741823 MAN pal.b[10077] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[10090] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[10099] RESULTIS y1
y1 M:-1073741823 MAN pal.b[10100] IF b=y1|a=y0|a=y1 DO ..
y1 M:-1073741823 MAN pal.b[10118] IF s=y1 DO ..
y1 M:-1073741823 MAN pal.b[10120] mk_plus(b,y1,a_plus)
y1 M:-1073741823 MAN pal.b[10129] RESULTIS ap1(f,y1)
y1 M:-1073741823 MAN pal.b[133] IF u=y1 DO ..
y1 M:-1073741823 MAN pal.b[1396] FOR i=y1 TO g_posint(n) DO..
y1 M:-1073741823 MAN pal.b[1458] get4(s_polyj,z,y1,...)
y1 M:-1073741823 MAN pal.b[150] TEST d=y1 THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[160] UNLESS d=y1 DO ..
y1 M:-1073741823 MAN pal.b[162] UNLESS d=y1 DO ..
y1 M:-1073741823 MAN pal.b[166] IF u=y1 DO ..
y1 M:-1073741823 MAN pal.b[2259] arg1:=get4(s_tuple,z,arg1,y1)
y1 M:-1073741823 MAN pal.b[2273] arg1:=get4(s_tuple,z,arg1,y1)
y1 M:-1073741823 MAN pal.b[2481] gw0:=get4(s_tuple,z,arg1,y1)
y1 M:-1073741823 MAN pal.b[2498] arg1:=get4(s_tuple,z,arg1,y1)
y1 M:-1073741823 MAN pal.b[2522] FOR i=y1 TO h2!c DO..
y1 M:-1073741823 MAN pal.b[260] IF u=y1 DO ..
y1 M:-1073741823 MAN pal.b[2676] arg1:=get4(s_tuple,z,t,y1)
y1 M:-1073741823 MAN pal.b[2698] h2!f:=get4(s_tuple,z,t,y1)
y1 M:-1073741823 MAN pal.b[2699] s:=get4(s_tuple,z,t,y1)
y1 M:-1073741823 MAN pal.b[283] TEST d=y1 THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[293] UNLESS d=y1 DO ..
y1 M:-1073741823 MAN pal.b[295] UNLESS d=y1 DO ..
y1 M:-1073741823 MAN pal.b[299] IF u=y1 DO ..
y1 M:-1073741823 MAN pal.b[3158] c:=loadn(c,y1,0)
y1 M:-1073741823 MAN pal.b[3219] RESULTIS y1
y1 M:-1073741823 MAN pal.b[3286] y1,e
y1 M:-1073741823 MAN pal.b[3290] TEST n=y1 THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[3313] TEST n=y1 THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[3554] IF n=y1&...=ll_na1|n=y2&...=ll_na2|n=h2!c&h3!c=ll_na DO ..
y1 M:-1073741823 MAN pal.b[3556] IF n=y1&...=ll_na1f|n=y2&...=ll_na2f|n=h2!c&h3!c=ll_naf DO ..
y1 M:-1073741823 MAN pal.b[3601] c:=loadn(c,y1,0)
y1 M:-1073741823 MAN pal.b[3628] c:=loadn(c,y1,0)
y1 M:-1073741823 MAN pal.b[3632] c:=loadn(c,y1,0)
y1 M:-1073741823 MAN pal.b[435] !a:=y1
y1 M:-1073741823 MAN pal.b[442] 1!a:=y1
y1 M:-1073741823 MAN pal.b[470] 1!a:=y1
y1 M:-1073741823 MAN pal.b[4757] IF a=y1 DO ..
y1 M:-1073741823 MAN pal.b[4767] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[4784] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[4800] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[4807] IF a=y1 DO ..
y1 M:-1073741823 MAN pal.b[4832] IF a=y1 DO ..
y1 M:-1073741823 MAN pal.b[4855] IF a=y1 DO ..
y1 M:-1073741823 MAN pal.b[4857] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[4887] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[4899] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[4933] UNLESS c=y1 DO ..
y1 M:-1073741823 MAN pal.b[4942] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[496] 1!a:=y1
y1 M:-1073741823 MAN pal.b[4975] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[5015] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[5036] IF a=y1 DO ..
y1 M:-1073741823 MAN pal.b[5045] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[5101] UNLESS r=y1 DO ..
y1 M:-1073741823 MAN pal.b[5104] UNLESS c=y1 DO ..
y1 M:-1073741823 MAN pal.b[5110] UNLESS lcoef=y1 DO ..
y1 M:-1073741823 MAN pal.b[5116] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[5124] TEST lcoef=y1 THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[5154] TEST lcoef=y1 THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[5174] IF b=y1 DO ..
y1 M:-1073741823 MAN pal.b[5179] RESULTIS y1
y1 M:-1073741823 MAN pal.b[5238] IF a=y0|a=y1 DO ..
y1 M:-1073741823 MAN pal.b[5244] RESULTIS y1
y1 M:-1073741823 MAN pal.b[5250] b:=y1
y1 M:-1073741823 MAN pal.b[527] 1!a:=y1
y1 M:-1073741823 MAN pal.b[556] 1!a:=y1
y1 M:-1073741823 MAN pal.b[5817] TEST p2=y1&y THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[5832] UNLESS h3!p=y1 DO ..
y1 M:-1073741823 MAN pal.b[598] 1!a:=y1
y1 M:-1073741823 MAN pal.b[6071] b:=b>y1
y1 M:-1073741823 MAN pal.b[6082] prc(c3,y1)
y1 M:-1073741823 MAN pal.b[6084] prc(h1!c,y1)
y1 M:-1073741823 MAN pal.b[6180] FOR i=y1 TO h2!c DO..
y1 M:-1073741823 MAN pal.b[6469] RESULTIS y1
y1 M:-1073741823 MAN pal.b[6472] RESULTIS y1
y1 M:-1073741823 MAN pal.b[6492] y1,z
y1 M:-1073741823 MAN pal.b[6503] y1,h2!v
y1 M:-1073741823 MAN pal.b[6522] RESULTIS get4(s_tuple,z,q,y1)
y1 M:-1073741823 MAN pal.b[6530] RESULTIS get4(s_tuple,p,q,y1)
y1 M:-1073741823 MAN pal.b[6552] FOR i=n TO y1 BY -1 DO..
y1 M:-1073741823 MAN pal.b[6564] z,y1
y1 M:-1073741823 MAN pal.b[6571] z,y1
y1 M:-1073741823 MAN pal.b[666] 1!a:=y1
y1 M:-1073741823 MAN pal.b[6971] RESULTIS y1
y1 M:-1073741823 MAN pal.b[6978] IF p=y1 DO ..
y1 M:-1073741823 MAN pal.b[6979] RESULTIS y1
y1 M:-1073741823 MAN pal.b[6980] RESULTIS get4(s_ratn,p,y1,0)
y1 M:-1073741823 MAN pal.b[6988] RESULTIS get4(s_ratl,p,y1,0)
y1 M:-1073741823 MAN pal.b[6994] IF q=y1 DO ..
y1 M:-1073741823 MAN pal.b[7002] IF q=y1 DO ..
y1 M:-1073741823 MAN pal.b[7012] RESULTIS arithfn(y1,p,a_div)
y1 M:-1073741823 MAN pal.b[7027] RESULTIS y1
y1 M:-1073741823 MAN pal.b[7029] TEST a=y1|lcoef=y1 THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[7041] RESULTIS y1
y1 M:-1073741823 MAN pal.b[7065] p:=y1
y1 M:-1073741823 MAN pal.b[7129] IF order(w)=y1 DO ..
y1 M:-1073741823 MAN pal.b[7180] IF order(w)=y1 DO ..
y1 M:-1073741823 MAN pal.b[7520] get4(s_polyj,z,y1,y1)
y1 M:-1073741823 MAN pal.b[7543] y1,y0,y0
y1 M:-1073741823 MAN pal.b[7638] IF a=y1 DO ..
y1 M:-1073741823 MAN pal.b[7726] IF q=y1 DO ..
y1 M:-1073741823 MAN pal.b[7768] IF q=y1 DO ..
y1 M:-1073741823 MAN pal.b[7783] UNLESS q=y1 DO ..
y1 M:-1073741823 MAN pal.b[7858] IF t=y1 DO ..
y1 M:-1073741823 MAN pal.b[7871] h1!rr:=get4(s_polyj,z,...)XORrr&ysg
y1 M:-1073741823 MAN pal.b[7891] RESULTIS y1
y1 M:-1073741823 MAN pal.b[7896] pow(l1,d0-d1+y1)
y1 M:-1073741823 MAN pal.b[7897] TEST c=y1 THEN .. ELSE ..
y1 M:-1073741823 MAN pal.b[9491] h1!e1:=rexp(y1)
y1 M:-1073741823 MAN pal.b[9526] z,y1,z
y1 M:-1073741823 MAN pal.b[9681] h3!d:=rfndef(s_relop+y0,y1)
y1 M:-1073741823 MAN pal.b[9830] y1
y2 M:-1073741822 DEF palhdr.h[234] y2=y0+2
y2 M:-1073741822 MAN pal.b[10017] TEST h3!v=y2 THEN .. ELSE ..
y2 M:-1073741822 MAN pal.b[2076] UNTIL arg1>0&!arg1=s_tuple&h3!arg1=y2 DO ..
y2 M:-1073741822 MAN pal.b[2079] msg1(28,arg1,y2)
y2 M:-1073741822 MAN pal.b[3196] RESULTIS y2
y2 M:-1073741822 MAN pal.b[3206] RESULTIS y2
y2 M:-1073741822 MAN pal.b[3294] TEST n=y2 THEN .. ELSE ..
y2 M:-1073741822 MAN pal.b[3554] IF n=y1&...=ll_na1|n=y2&...=ll_na2|n=h2!c&h3!c=ll_na DO ..
y2 M:-1073741822 MAN pal.b[3556] IF n=y1&...=ll_na1f|n=y2&...=ll_na2f|n=h2!c&h3!c=ll_naf DO ..
y2 M:-1073741822 MAN pal.b[5898] prc(a,y2)
y2 M:-1073741822 MAN pal.b[6051] TEST b>y2 THEN .. ELSE ..
y2 M:-1073741822 MAN pal.b[6056] b:=b>y2
y2 M:-1073741822 MAN pal.b[6067] prc(c,y2)
y2 M:-1073741822 MAN pal.b[6101] y2
y2 M:-1073741822 MAN pal.b[6104] IF b>y2 DO ..
y2 M:-1073741822 MAN pal.b[6110] writes(p=y2->"; "," <> ")
y2 M:-1073741822 MAN pal.b[6507] UNLESS h3!v=y2 DO ..
y2 M:-1073741822 MAN pal.b[7736] FOR i=y2 TO h3!vv DO..
y2 M:-1073741822 MAN pal.b[7776] FOR i=y2 TO h3!vv DO..
y2 M:-1073741822 MAN pal.b[9240] t:=y2
y2 M:-1073741822 MAN pal.b[9250] t:=y2
y2 M:-1073741822 MAN pal.b[9513] e:=rfndef(s_dot+y0,y2)
y2 M:-1073741822 MAN pal.b[9517] rfndef(s_dot+y0,y2)
y2 M:-1073741822 MAN pal.b[9590] IF n>=y2 DO ..
y2 M:-1073741822 MAN pal.b[9923] IF b>0&!b=s_tuple&h3!b=y2 DO ..
y2 M:-1073741822 MAN pal.b[9934] IF b>0&!b=s_tuple&h3!b=y2 DO ..
y3 M:-1073741821 DEF palhdr.h[235] y3=y0+3
y3 M:-1073741821 MAN pal.b[2084] arg1:=g_nt(arg1,y3)
y3 M:-1073741821 MAN pal.b[6504] TEST h3!v=y3 THEN .. ELSE ..
y3 M:-1073741821 MAN pal.b[9238] y3
y3 M:-1073741821 MAN pal.b[9248] y3
yfj M:1073741824 DEF palhdr.h[244] yfj=signbit>>1
yfj M:1073741824 MAN pal.b[1762] f,m,c:=get4(m,...)+yfj,s_mmf2r,h1!c
yfj M:1073741824 MAN pal.b[1772] f,m,c:=get4(m,...)+yfj,s_mms,h1!c
yfj M:1073741824 MAN pal.b[1784] f,m,c:=get4(m,...)+yfj,s_mmal,h1!c
yfj M:1073741824 MAN pal.b[1796] f,m,c:=get4(m,...)+yfj,s_mma1,h2!c
yfj M:1073741824 MAN pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[1810] f,m,c:=get4(m,...)+yfj,s_mmf1,h2!c
yfj M:1073741824 MAN pal.b[1814] f,m,c:=get4(m,...)+yfj,s_mmf1a,h2!c
yfj M:1073741824 MAN pal.b[1818] f,m,c:=get4(m,...)+yfj,s_mma2l,h2!h1!c1
yfj M:1073741824 MAN pal.b[1822] f,m,c:=get4(m,...)+yfj,s_mmf2l,h2!h1!c1
yfj M:1073741824 MAN pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[1874] f,m,c:=get4(m,...)+yfj,s_mmaa,h2!c
yfj M:1073741824 MAN pal.b[1876] f,m,c:=get4(m,...)+yfj,s_mmt,h2!c
yfj M:1073741824 MAN pal.b[1879] f,m,c:=get4(m,...)+yfj,s_mmaq,h2!c
yfj M:1073741824 MAN pal.b[1890] TEST j<yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[1897] f,m,c:=get4(m,...)+yfj,s_mmcond,h1!c
yfj M:1073741824 MAN pal.b[1909] f,m,c:=get4(m,...)+yfj,s_mmlet,h3!c
yfj M:1073741824 MAN pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
yfj M:1073741824 MAN pal.b[1942] f,m:=get4(m,...)+yfj,s_mmf2r
yfj M:1073741824 MAN pal.b[1982] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2108] f,m:=get4(m,...)+yfj,s_mmal
yfj M:1073741824 MAN pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2280] f:=get4(!f,...,...)+yfj
yfj M:1073741824 MAN pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2331] f:=get4(!f,...,...)+yfj
yfj M:1073741824 MAN pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2358] f:=get4(!f,...,...)+yfj
yfj M:1073741824 MAN pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
yfj M:1073741824 MAN pal.b[2420] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2445] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2450] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2455] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2460] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2464] IF f>=yfj DO ..
yfj M:1073741824 MAN pal.b[2474] TEST f>=yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2476] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2482] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2487] TEST f<yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2556] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2650] IF f>=yfj DO ..
yfj M:1073741824 MAN pal.b[2661] TEST f>=yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2663] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2684] IF f>=yfj DO ..
yfj M:1073741824 MAN pal.b[2697] TEST f>=yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2700] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2706] TEST f>=yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2709] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2749] IF f>=yfj DO ..
yfj M:1073741824 MAN pal.b[2753] TEST f<yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2754] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
yfj M:1073741824 MAN pal.b[2761] TEST f<yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2763] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
yfj M:1073741824 MAN pal.b[2771] j,m:=get4(m,...)+yfj,s_mmcc
yfj M:1073741824 MAN pal.b[2774] IF f>=yfj DO ..
yfj M:1073741824 MAN pal.b[2780] TEST f<yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2781] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
yfj M:1073741824 MAN pal.b[2791] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
yfj M:1073741824 MAN pal.b[2799] j,m:=get4(m,...)+yfj,s_mmcc
yfj M:1073741824 MAN pal.b[2807] TEST f<yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2808] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
yfj M:1073741824 MAN pal.b[2818] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
yfj M:1073741824 MAN pal.b[2826] j,m:=get4(m,...)+yfj,s_mmcc
yfj M:1073741824 MAN pal.b[2834] TEST f<yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2835] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
yfj M:1073741824 MAN pal.b[2845] f:=get4(s_mmcf,f,...)+yfj
yfj M:1073741824 MAN pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
yfj M:1073741824 MAN pal.b[2853] j,m:=get4(m,...)+yfj,s_mmcc
yfj M:1073741824 MAN pal.b[2864] j,m:=get4(m,...)+yfj,s_mmcc
yfj M:1073741824 MAN pal.b[2868] TEST f<yfj THEN .. ELSE ..
yfj M:1073741824 MAN pal.b[2869] f:=get4(s_mmcf,...,...)+yfj
yfj M:1073741824 MAN pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
yfj M:1073741824 MAN pal.b[3713] IF t<yfj DO ..
yfj M:1073741824 MAN pal.b[3723] UNTIL k<yfj DO ..
yfj M:1073741824 MAN pal.b[3742] IF g1<yfj DO ..
yfj M:1073741824 MAN pal.b[5289] UNLESS qq=0|qq=ysg|qq=yfj|qq=p_tagp DO ..
yfj M:1073741824 MAN pal.b[7184] f:=get4(s_mb,f,...)+yfj
yfj M:1073741824 MAN pal.b[8650] UNLESS a>=yfj DO ..
yloc M:1073741824 DEF palhdr.h[243] yloc=signbit>>1
yloc M:1073741824 MAN pal.b[1834] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[1904] IF a=z|a>=yloc&h1!a=z DO ..
yloc M:1073741824 MAN pal.b[2068] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2077] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2100] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2122] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2152] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2217] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2310] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2315] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2401] TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
yloc M:1073741824 MAN pal.b[2528] UNLESS arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2529] arg1:=get4(s_loc,arg1,...)+yloc
yloc M:1073741824 MAN pal.b[2532] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2593] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2602] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2611] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2620] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2629] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2636] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2678] IF arg1>=yloc DO ..
yloc M:1073741824 MAN pal.b[2702] IF s>=yloc DO ..
yloc M:1073741824 MAN pal.b[2743] TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
yloc M:1073741824 MAN pal.b[3001] IF b>=yloc DO ..
yloc M:1073741824 MAN pal.b[3031] TEST a1=z|a1>=yloc&h1!a1=z THEN .. ELSE ..
yloc M:1073741824 MAN pal.b[5919] IF l>=yloc|!l=s_xtupl DO ..
yloc M:1073741824 MAN pal.b[6406] IF n>=yloc DO ..
yloc M:1073741824 MAN pal.b[6413] IF a>=yloc DO ..
yloc M:1073741824 MAN pal.b[6421] IF a>=yloc|a>0&!a=s_xtupl DO ..
yloc M:1073741824 MAN pal.b[6427] p>=yloc->p,get4(s_loc,...)+yloc
yloc M:1073741824 MAN pal.b[6430] p>=yloc->h1!p,p
yloc M:1073741824 MAN pal.b[6526] IF p>=yloc|!p=s_xtupl DO ..
yloc M:1073741824 MAN pal.b[6540] IF q>=yloc DO ..
yloc M:1073741824 MAN pal.b[6542] IF p>=yloc DO ..
yloc M:1073741824 MAN pal.b[6621] IF n>=yloc DO ..
yloc M:1073741824 MAN pal.b[6630] UNLESS e>=yloc&g_np(e,s_e)~=z DO ..
yloc M:1073741824 MAN pal.b[692] IF q>=yloc DO ..
yloc M:1073741824 MAN pal.b[7127] IF w>=yloc DO ..
yloc M:1073741824 MAN pal.b[7143] UNLESS w>=yloc DO ..
yloc M:1073741824 MAN pal.b[7144] w:=get4(s_loc,w,...)+yloc
yloc M:1073741824 MAN pal.b[7147] IF w>=yloc DO ..
yloc M:1073741824 MAN pal.b[7178] IF w>=yloc DO ..
yloc M:1073741824 MAN pal.b[7190] UNLESS w>=yloc DO ..
yloc M:1073741824 MAN pal.b[7191] w:=get4(s_loc,w,...)+yloc
yloc M:1073741824 MAN pal.b[7194] IF w>=yloc DO ..
yloc M:1073741824 MAN pal.b[7345] UNLESS q>=yloc DO ..
yloc M:1073741824 MAN pal.b[7349] UNLESS p>=yloc DO ..
yloc M:1073741824 MAN pal.b[7353] IF p>=yloc DO ..
yloc M:1073741824 MAN pal.b[7355] IF q>=yloc DO ..
yloc M:1073741824 MAN pal.b[9860] IF d>=yloc DO ..
yloc M:1073741824 MAN pal.b[9865] IF d>=yloc DO ..
ym M:-1073741825 DEF palhdr.h[236] ym=y0-1
ym M:-1073741825 MAN pal.b[10119] asym(ym)
ym M:-1073741825 MAN pal.b[4944] IF b=ym DO ..
ym M:-1073741825 MAN pal.b[5047] IF b=ym DO ..
ym M:-1073741825 MAN pal.b[5118] IF b=ym DO ..
ym M:-1073741825 MAN pal.b[5813] TEST p2=ym&y THEN .. ELSE ..
ym M:-1073741825 MAN pal.b[6928] RESULTIS ym
ym M:-1073741825 MAN pal.b[6975] IF p=ym DO ..
ym M:-1073741825 MAN pal.b[6976] RESULTIS ym
ym M:-1073741825 MAN pal.b[6977] RESULTIS get4(s_ratn,signbit-p,ym,0)
ym M:-1073741825 MAN pal.b[6989] RESULTIS get4(s_ratl,pXORysg,ym,0)
ym M:-1073741825 MAN pal.b[7640] IF a=ym DO ..
ysg M:536870912 DEF palhdr.h[245] ysg=signbit>>2
ysg M:536870912 MAN pal.b[1433] h1!pXORp&ysg
ysg M:536870912 MAN pal.b[1435] p1:=h1!p1XORp1&ysg
ysg M:536870912 MAN pal.b[1439] t:=get4(s_polyj,zsy,...)+(p1&ysg)
ysg M:536870912 MAN pal.b[1444] TEST r0<ysg THEN .. ELSE ..
ysg M:536870912 MAN pal.b[1452] h1!pXORp&ysg
ysg M:536870912 MAN pal.b[1456] IF p1>=ysg DO ..
ysg M:536870912 MAN pal.b[1459] t:=get4(s_poly,t,...)+(p1&ysg)
ysg M:536870912 MAN pal.b[1462] p1:=h1!p1XORp1&ysg
ysg M:536870912 MAN pal.b[200] RESULTIS longas1(bXORysg,a,TRUE)
ysg M:536870912 MAN pal.b[201] IF (aXORb)>=ysg DO ..
ysg M:536870912 MAN pal.b[206] a:=bXORysg
ysg M:536870912 MAN pal.b[2163] TEST gw1<ysg THEN .. ELSE ..
ysg M:536870912 MAN pal.b[218] b:=longas1(bXORysg,h2!a,TRUE)
ysg M:536870912 MAN pal.b[234] b:=longmul1(bXORysg,h1!a)
ysg M:536870912 MAN pal.b[315] t:=bXORysg
ysg M:536870912 MAN pal.b[318] RESULTIS addpoly(a,bXORysg)
ysg M:536870912 MAN pal.b[3827] n,sg:=-n,ysg
ysg M:536870912 MAN pal.b[3834] sg,cy:=a&ysg,0
ysg M:536870912 MAN pal.b[3879] sg,cy:=a&ysg,0
ysg M:536870912 MAN pal.b[3941] sg:=a&ysg
ysg M:536870912 MAN pal.b[4018] result2,c,sg:=-result2,-c,ysg
ysg M:536870912 MAN pal.b[4030] sg:=a&ysg
ysg M:536870912 MAN pal.b[4032] gl1,sg:=-gl1,a&ysgXORysg
ysg M:536870912 MAN pal.b[4037] RESULTIS aXORysg
ysg M:536870912 MAN pal.b[4062] getx(s_numj,zsy,...)+((aXORb)&ysg)
ysg M:536870912 MAN pal.b[4161] sg:=a&ysg
ysg M:536870912 MAN pal.b[4163] gl1,sg:=-gl1,a&ysgXORysg
ysg M:536870912 MAN pal.b[4169] RESULTIS aXORysg
ysg M:536870912 MAN pal.b[4685] IF (uXORv)<ysg DO ..
ysg M:536870912 MAN pal.b[4700] TEST f<ysg THEN .. ELSE ..
ysg M:536870912 MAN pal.b[4706] .. REPEATWHILE eqpoly(h2!u,h2!v,f<ysg)
ysg M:536870912 MAN pal.b[4886] b,a:=signbit-b,aXORysg
ysg M:536870912 MAN pal.b[4907] IF b>=ysg DO ..
ysg M:536870912 MAN pal.b[4908] b,a:=bXORysg,signbit-a
ysg M:536870912 MAN pal.b[4913] IF b>=ysg DO ..
ysg M:536870912 MAN pal.b[4924] IF b>=ysg DO ..
ysg M:536870912 MAN pal.b[4925] b,a:=bXORysg,aXORysg
ysg M:536870912 MAN pal.b[4931] IF b>=ysg DO ..
ysg M:536870912 MAN pal.b[4985] TEST b>=ysg THEN .. ELSE ..
ysg M:536870912 MAN pal.b[4990] IF b>=ysg DO ..
ysg M:536870912 MAN pal.b[5289] UNLESS qq=0|qq=ysg|qq=yfj|qq=p_tagp DO ..
ysg M:536870912 MAN pal.b[5456] add(c,bXORysg)
ysg M:536870912 MAN pal.b[5760] IF p>=ysg DO ..
ysg M:536870912 MAN pal.b[5799] f:=fXORp>=ysg
ysg M:536870912 MAN pal.b[5809] f:=fXORp>=ysg
ysg M:536870912 MAN pal.b[6719] TEST a<ysg THEN .. ELSE ..
ysg M:536870912 MAN pal.b[6750] a,v:=-a,ysg
ysg M:536870912 MAN pal.b[6936] RESULTIS pXORysg
ysg M:536870912 MAN pal.b[6956] RESULTIS p<ysg
ysg M:536870912 MAN pal.b[6987] IF p<ysg DO ..
ysg M:536870912 MAN pal.b[6989] RESULTIS get4(s_ratl,pXORysg,ym,0)
ysg M:536870912 MAN pal.b[7387] IF (pXORq)<ysg DO ..
ysg M:536870912 MAN pal.b[7395] (pXORq)<ysg
ysg M:536870912 MAN pal.b[7405] f:=fXOR(pXORq)>=ysg
ysg M:536870912 MAN pal.b[7427] RESULTIS p<ysg
ysg M:536870912 MAN pal.b[7428] RESULTIS q>=ysg
ysg M:536870912 MAN pal.b[7429] IF (pXORq)>=ysg DO ..
ysg M:536870912 MAN pal.b[7430] RESULTIS p<ysg
ysg M:536870912 MAN pal.b[7434] RESULTIS c>0XORp>=ysg
ysg M:536870912 MAN pal.b[7456] RESULTIS q>=ysg
ysg M:536870912 MAN pal.b[7457] RESULTIS p<ysg
ysg M:536870912 MAN pal.b[7537] RESULTIS get4(s_poly,...,...)+(p&ysg)
ysg M:536870912 MAN pal.b[7544] p:=h1!pXORp&ysg
ysg M:536870912 MAN pal.b[7549] q:=(p<ysg->add,minu)(q,r)
ysg M:536870912 MAN pal.b[7550] p:=h1!pXORp&ysg
ysg M:536870912 MAN pal.b[7564] p,q:=h1!pXORp&ysg,h1!qXORq&ysg
ysg M:536870912 MAN pal.b[7567] sg:=p&ysg
ysg M:536870912 MAN pal.b[7569] h1!r1,r1:=tXORr1&ysg,t
ysg M:536870912 MAN pal.b[7572] h1!r1:=qXORr1&ysg
ysg M:536870912 MAN pal.b[7577] get4(s_polyj,zsy,...)+(q&ysg)
ysg M:536870912 MAN pal.b[7578] h1!r1,r1:=tXORr1&ysg,t
ysg M:536870912 MAN pal.b[7579] q:=h1!qXORq&ysg
ysg M:536870912 MAN pal.b[7581] h1!r1:=pXORr1&ysg
ysg M:536870912 MAN pal.b[7585] (pXORq)<ysg->add,minu
ysg M:536870912 MAN pal.b[7588] f:=get4(s_polyj,zsy,...)+(p&ysg)
ysg M:536870912 MAN pal.b[7589] h1!r1,r1:=fXORr1&ysg,f
ysg M:536870912 MAN pal.b[7590] p,q:=h1!pXORp&ysg,h1!qXORq&ysg
ysg M:536870912 MAN pal.b[7596] TEST r1<ysg THEN .. ELSE ..
ysg M:536870912 MAN pal.b[7600] h1!r1:=qXORr1&ysg
ysg M:536870912 MAN pal.b[7604] h1!r1:=pXORr1&ysg
ysg M:536870912 MAN pal.b[7617] p:=h1!pXORp&ysg
ysg M:536870912 MAN pal.b[7619] p<ysg->add,minu
ysg M:536870912 MAN pal.b[7621] p:=h1!pXORp&ysg
ysg M:536870912 MAN pal.b[7641] RESULTIS pXORysg
ysg M:536870912 MAN pal.b[7642] get4(s_poly,zsy,...)+(p&ysg)
ysg M:536870912 MAN pal.b[7646] r:=get4(s_polyj,zsy,...)+(p&ysg)
ysg M:536870912 MAN pal.b[7663] r0,r0+((pXORq)&ysg)
ysg M:536870912 MAN pal.b[7669] qXORp&ysg,h2!p
ysg M:536870912 MAN pal.b[7682] IF q1>=ysg DO ..
ysg M:536870912 MAN pal.b[7686] q1<ysg->add,minu
ysg M:536870912 MAN pal.b[7696] q1:=h1!q1XORq1&ysg
ysg M:536870912 MAN pal.b[7707] p:=h1!pXORp&ysg
ysg M:536870912 MAN pal.b[7722] copyu(h1!pXORp&ysg)
ysg M:536870912 MAN pal.b[7723] copyv(h1!qXORq&ysg)
ysg M:536870912 MAN pal.b[7763] copyu(h1!pXORp&ysg)
ysg M:536870912 MAN pal.b[7765] copyv(h1!qXORq&ysg)
ysg M:536870912 MAN pal.b[7816] IF p>=ysg DO ..
ysg M:536870912 MAN pal.b[7820] p:=h1!pXORp&ysg
ysg M:536870912 MAN pal.b[7829] IF p>=ysg DO ..
ysg M:536870912 MAN pal.b[7835] p:=h1!pXORp&ysg
ysg M:536870912 MAN pal.b[7852] h1!aXORa&ysg
ysg M:536870912 MAN pal.b[7854] q:=h1!qXORq&ysg
ysg M:536870912 MAN pal.b[7856] IF q>=ysg DO ..
ysg M:536870912 MAN pal.b[7863] get4(s_poly,zsy,...)+(a&ysg)
ysg M:536870912 MAN pal.b[7868] s:=get4(s_polyj,zsy,...)+(a&ysg)
ysg M:536870912 MAN pal.b[7869] h1!rr,rr:=s,sXORrr&ysg
ysg M:536870912 MAN pal.b[7871] h1!rr:=get4(s_polyj,z,...)XORrr&ysg
ysg M:536870912 MAN pal.b[7933] IF f=(aXORb)<ysg DO ..
ysg M:536870912 MAN pal.b[7947] f:=fXOR(aXORb)>=ysg
ysg M:536870912 MAN pal.b[7955] f:=fXOR(aXORb)>=ysg
ysg M:536870912 MAN pal.b[91] UNLESS (aXORb)>=ysg DO ..
ytab G:289 DEF palhdr.h[361] ytab=
ytab G:289 LG pal.b[856] ytab(n)
ytab G:289 LG pal.b[922] f:=ytab
ytab G:289 LLG pal.b[8306] set_r("YTAB",@ytab)
ytab G:289 RT pal.b[850] LET ytab(n)BE..
yz M:-73741824 DEF pal.b[6403] yz=y0+numba
yz M:-73741824 DEF pal.b[7506] yz=y0+numba
yz M:-73741824 MAN pal.b[6404] IF y0<n&n<yz DO ..
yz M:-73741824 MAN pal.b[7673] IF q3>=yz DO ..
yz M:-73741824 MAN pal.b[7700] IF q3>=yz DO ..
z M:0 DEF palhdr.h[231] z=0
z M:0 MAN pal.b[10006] b:=aug(z,b)
z M:0 MAN pal.b[10026] IF a=z DO ..
z M:0 MAN pal.b[10027] RESULTIS aug(z,b)
z M:0 MAN pal.b[10107] ap1(a,z)
z M:0 MAN pal.b[10109] e:=cond(e,f,z)
z M:0 MAN pal.b[10110] e:=fn(z,e)
z M:0 MAN pal.b[10112] RESULTIS ap1(e,z)
z M:0 MAN pal.b[10117] IF r=z DO ..
z M:0 MAN pal.b[10172] e:=get4(sg,e,f2,z)
z M:0 MAN pal.b[10246] a:=get4(s_seq,z,a,0)
z M:0 MAN pal.b[1430] TEST q=z THEN .. ELSE ..
z M:0 MAN pal.b[1442] .. REPEATUNTIL p1=z
z M:0 MAN pal.b[1447] h1!r0:=z
z M:0 MAN pal.b[1458] get4(s_polyj,z,y1,...)
z M:0 MAN pal.b[1463] .. REPEATUNTIL (p1&p_addr)=z
z M:0 MAN pal.b[1601] TEST erz=z|~paramd THEN .. ELSE ..
z M:0 MAN pal.b[1679] RESULTIS z
z M:0 MAN pal.b[1700] z,-m,e,j
z M:0 MAN pal.b[1733] .. REPEATUNTIL g=z
z M:0 MAN pal.b[1745] TEST f=z THEN .. ELSE ..
z M:0 MAN pal.b[1772] f,m,c:=get4(m,...)+yfj,s_mms,h1!c
z M:0 MAN pal.b[1796] f,m,c:=get4(m,...)+yfj,s_mma1,h2!c
z M:0 MAN pal.b[1803] UNLESS f=z DO ..
z M:0 MAN pal.b[1804] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[1810] f,m,c:=get4(m,...)+yfj,s_mmf1,h2!c
z M:0 MAN pal.b[1814] f,m,c:=get4(m,...)+yfj,s_mmf1a,h2!c
z M:0 MAN pal.b[1847] UNLESS f=z DO ..
z M:0 MAN pal.b[1848] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[1867] UNLESS f=z DO ..
z M:0 MAN pal.b[1868] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[1874] f,m,c:=get4(m,...)+yfj,s_mmaa,h2!c
z M:0 MAN pal.b[1876] f,m,c:=get4(m,...)+yfj,s_mmt,h2!c
z M:0 MAN pal.b[1889] f,c:=z,h2!c
z M:0 MAN pal.b[1904] IF a=z|a>=yloc&h1!a=z DO ..
z M:0 MAN pal.b[1915] UNLESS f=z DO ..
z M:0 MAN pal.b[1916] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[1924] UNLESS f=z DO ..
z M:0 MAN pal.b[1925] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[1931] UNLESS f=z DO ..
z M:0 MAN pal.b[1932] j,f,m:=get4(m,...)+yfj,z,s_z
z M:0 MAN pal.b[1934] get4(s_e,ze,zsy,z)
z M:0 MAN pal.b[1982] f:=get4(s_mmcf,...,...)+yfj
z M:0 MAN pal.b[2022] UNLESS f=z DO ..
z M:0 MAN pal.b[2023] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2028] UNLESS f=z DO ..
z M:0 MAN pal.b[2029] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2034] UNLESS f=z DO ..
z M:0 MAN pal.b[2035] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2059] arg1:=z
z M:0 MAN pal.b[2114] arg1:=z
z M:0 MAN pal.b[2127] arg1:=z
z M:0 MAN pal.b[2154] IF arg1=z DO ..
z M:0 MAN pal.b[2160] .. REPEATUNTIL c=z|arg1<=h3!c
z M:0 MAN pal.b[2161] TEST c=z|arg1<h3!c THEN .. ELSE ..
z M:0 MAN pal.b[2191] arg1:=get4(s_jclos,z,c,arg1)
z M:0 MAN pal.b[2194] UNLESS f=z DO ..
z M:0 MAN pal.b[2195] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2199] UNLESS f=z DO ..
z M:0 MAN pal.b[2200] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2205] UNLESS f=z DO ..
z M:0 MAN pal.b[2206] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2213] UNLESS f=z DO ..
z M:0 MAN pal.b[2214] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2225] UNLESS f=z DO ..
z M:0 MAN pal.b[2226] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2236] c,f:=h3!c,z
z M:0 MAN pal.b[2244] c,f:=h3!c,z
z M:0 MAN pal.b[2258] TEST t=z THEN .. ELSE ..
z M:0 MAN pal.b[2259] arg1:=get4(s_tuple,z,arg1,y1)
z M:0 MAN pal.b[2262] IF c=z DO ..
z M:0 MAN pal.b[2272] TEST t=z THEN .. ELSE ..
z M:0 MAN pal.b[2273] arg1:=get4(s_tuple,z,arg1,y1)
z M:0 MAN pal.b[2276] IF c=z DO ..
z M:0 MAN pal.b[2291] UNLESS f=z DO ..
z M:0 MAN pal.b[2292] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2304] UNLESS f=z DO ..
z M:0 MAN pal.b[2305] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2343] UNLESS f=z DO ..
z M:0 MAN pal.b[2344] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2390] UNLESS f=z DO ..
z M:0 MAN pal.b[2391] j,f,m:=get4(m,...)+yfj,z,s_mz
z M:0 MAN pal.b[2401] TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
z M:0 MAN pal.b[2420] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2445] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2450] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2455] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2460] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2476] f:=get4(s_mmcf,...,...)+yfj
z M:0 MAN pal.b[2481] gw0:=get4(s_tuple,z,arg1,y1)
z M:0 MAN pal.b[2482] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2498] arg1:=get4(s_tuple,z,arg1,y1)
z M:0 MAN pal.b[2556] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2606] arg1:=z
z M:0 MAN pal.b[2615] arg1:=z
z M:0 MAN pal.b[2624] arg1:=z
z M:0 MAN pal.b[2631] arg1:=arg1=z
z M:0 MAN pal.b[2663] f:=get4(s_mmcf,...,...)+yfj
z M:0 MAN pal.b[2674] UNLESS arg1=z DO ..
z M:0 MAN pal.b[2676] arg1:=get4(s_tuple,z,t,y1)
z M:0 MAN pal.b[2695] UNLESS s=z DO ..
z M:0 MAN pal.b[2698] h2!f:=get4(s_tuple,z,t,y1)
z M:0 MAN pal.b[2699] s:=get4(s_tuple,z,t,y1)
z M:0 MAN pal.b[2700] f:=get4(s_mmcf,...,...)+yfj
z M:0 MAN pal.b[2709] f:=get4(s_mmcf,...,...)+yfj
z M:0 MAN pal.b[2743] TEST arg1=z|arg1>=yloc&h1!arg1=z THEN .. ELSE ..
z M:0 MAN pal.b[2757] j,f,m:=get4(m,...)+yfj,z,s_mmcf
z M:0 MAN pal.b[2763] f:=get4(s_mmcf,...,...)+yfj
z M:0 MAN pal.b[2767] j,f,m:=get4(m,...)+yfj,z,s_mmck
z M:0 MAN pal.b[2776] f:=z
z M:0 MAN pal.b[2784] j,f,m:=get4(m,...)+yfj,z,s_mmcf
z M:0 MAN pal.b[2791] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2792] j,f,m:=get4(m,...)+yfj,z,s_mmck
z M:0 MAN pal.b[2811] j,f,m:=get4(m,...)+yfj,z,s_mmcf
z M:0 MAN pal.b[2818] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2819] j,f,m:=get4(m,...)+yfj,z,s_mmck
z M:0 MAN pal.b[2838] j,f,m:=get4(m,...)+yfj,z,s_mmcf
z M:0 MAN pal.b[2845] f:=get4(s_mmcf,f,...)+yfj
z M:0 MAN pal.b[2846] j,f,m:=get4(m,...)+yfj,z,s_mmck
z M:0 MAN pal.b[2872] j,f,m:=get4(m,...)+yfj,z,s_mmcf
z M:0 MAN pal.b[2953] .. REPEATUNTIL a=z
z M:0 MAN pal.b[3018] z,y0
z M:0 MAN pal.b[3024] .. REPEATUNTIL a=z
z M:0 MAN pal.b[3031] TEST a1=z|a1>=yloc&h1!a1=z THEN .. ELSE ..
z M:0 MAN pal.b[3050] .. REPEATUNTIL v=z
z M:0 MAN pal.b[3057] IF a=z DO ..
z M:0 MAN pal.b[3133] .. REPEATUNTIL g=z
z M:0 MAN pal.b[3143] RESULTIS z
z M:0 MAN pal.b[3167] RESULTIS z
z M:0 MAN pal.b[3230] flat1(a,zc,e,...)
z M:0 MAN pal.b[3247] IF c=zc&(f~=z|cstac) DO ..
z M:0 MAN pal.b[3274] TEST f=z THEN .. ELSE ..
z M:0 MAN pal.b[3307] .. REPEATUNTIL g=z
z M:0 MAN pal.b[3320] get4(s_mb,f,zsy,z)
z M:0 MAN pal.b[3323] .. REPEATUNTIL h1!t=z
z M:0 MAN pal.b[3335] c:=get4(s_cd,c,z,ll_st)
z M:0 MAN pal.b[3341] c:=get4(s_cd,c,z,ll_st)
z M:0 MAN pal.b[3349] c:=get4(s_cd,c,z,ll_st)
z M:0 MAN pal.b[3356] c:=get4(s_cd,c,z,ll_st)
z M:0 MAN pal.b[3357] c:=get4(s_cd,c,z,ll_rsc)
z M:0 MAN pal.b[3363] c:=get4(s_cd,c,z,ll_svc)
z M:0 MAN pal.b[3389] TEST f=z THEN .. ELSE ..
z M:0 MAN pal.b[3400] TEST f=z THEN .. ELSE ..
z M:0 MAN pal.b[3435] TEST f=z THEN .. ELSE ..
z M:0 MAN pal.b[3448] TEST f=z THEN .. ELSE ..
z M:0 MAN pal.b[3451] c:=get4(s_cd,c,z,ll)
z M:0 MAN pal.b[3452] get4(s_mb,f,zsy,z)
z M:0 MAN pal.b[3459] c:=get4(s_cd,c,z,ll_st)
z M:0 MAN pal.b[3465] c:=get4(s_cd,c,z,ll_st)
z M:0 MAN pal.b[3492] a3:=z
z M:0 MAN pal.b[3508] get4(s_mb,f,zsy,z)
z M:0 MAN pal.b[350] ze,z,z
z M:0 MAN pal.b[3517] c:=get4(s_cd,c,z,ll_st)
z M:0 MAN pal.b[3518] a:=z
z M:0 MAN pal.b[3552] IF c=z|m<-3 DO ..
z M:0 MAN pal.b[3558] RESULTIS get4(s_cd,c,z,ll_st)
z M:0 MAN pal.b[3583] .. REPEATUNTIL b=z
z M:0 MAN pal.b[3605] .. REPEATUNTIL b=z
z M:0 MAN pal.b[3609] IF b=z|simtup(b) DO ..
z M:0 MAN pal.b[3610] c:=get4(s_cd,c,z,ll_bvf1)
z M:0 MAN pal.b[3611] UNLESS b=z DO ..
z M:0 MAN pal.b[3615] c:=get4(s_cd,c,z,ll_bvfz)
z M:0 MAN pal.b[3616] UNTIL h1!b=z DO ..
z M:0 MAN pal.b[3621] c:=get4(s_cd,c,z,ll_bvf)
z M:0 MAN pal.b[3624] RESULTIS get4(s_cd,c,z,ll_bvfa)
z M:0 MAN pal.b[3635] UNLESS b=z DO ..
z M:0 MAN pal.b[3650] .. REPEATUNTIL v=z
z M:0 MAN pal.b[3660] UNLESS v=z DO ..
z M:0 MAN pal.b[3667] UNTIL l=z DO ..
z M:0 MAN pal.b[3714] IF t=z DO ..
z M:0 MAN pal.b[3729] IF k2=z DO ..
z M:0 MAN pal.b[3750] arg1,c2:=c2,z
z M:0 MAN pal.b[3775] RESULTIS z
z M:0 MAN pal.b[3815] IF a=z DO ..
z M:0 MAN pal.b[3817] IF b=z DO ..
z M:0 MAN pal.b[3829] RESULTIS getx(s_numj,z,...)+sg
z M:0 MAN pal.b[3833] z,@b|signbit
z M:0 MAN pal.b[3848] IF a=z DO ..
z M:0 MAN pal.b[3854] .. REPEATUNTIL b=z
z M:0 MAN pal.b[3868] IF a=z DO ..
z M:0 MAN pal.b[3869] h1!c0:=getx(s_numj,z,0,1)
z M:0 MAN pal.b[3892] .. REPEATUNTIL b=z
z M:0 MAN pal.b[3908] TEST gw1=0&0=gw2&h1!a=z THEN .. ELSE ..
z M:0 MAN pal.b[3910] s:=z
z M:0 MAN pal.b[3912] h1!s0:=z
z M:0 MAN pal.b[3916] IF a=z DO ..
z M:0 MAN pal.b[3972] IF a=z DO ..
z M:0 MAN pal.b[3973] h1!c0:=getx(s_numj,z,0,1)
z M:0 MAN pal.b[3986] IF gw2=0&a=z DO ..
z M:0 MAN pal.b[4005] TEST gw2=0&0=gw1&h1!a=z THEN .. ELSE ..
z M:0 MAN pal.b[4006] h1!c0:=z
z M:0 MAN pal.b[4020] RESULTIS getx(s_numj,z,...)+sg
z M:0 MAN pal.b[4028] gl1,n:=n-y0,z
z M:0 MAN pal.b[4053] .. REPEATUNTIL a=z
z M:0 MAN pal.b[4055] h1!n0:=z
z M:0 MAN pal.b[4056] h1!n0:=getx(s_numj,z,0,gl2)
z M:0 MAN pal.b[4066] UNTIL a1=z DO ..
z M:0 MAN pal.b[4070] .. REPEATUNTIL b1=z
z M:0 MAN pal.b[4095] .. REPEATUNTIL b1=z
z M:0 MAN pal.b[4099] IF a=z DO ..
z M:0 MAN pal.b[4126] .. REPEATUNTIL b1=z
z M:0 MAN pal.b[4129] .. REPEATUNTIL a=z
z M:0 MAN pal.b[4134] h1!c0:=z
z M:0 MAN pal.b[4135] h1!cc:=z
z M:0 MAN pal.b[4165] RESULTIS z
z M:0 MAN pal.b[4171] .. REPEATUNTIL a=z
z M:0 MAN pal.b[4191] z
z M:0 MAN pal.b[4230] !aa:=z
z M:0 MAN pal.b[4433] UNLESS trz=z DO ..
z M:0 MAN pal.b[4690] .. REPEATUNTIL u=z|v=z
z M:0 MAN pal.b[4698] TEST u=z THEN .. ELSE ..
z M:0 MAN pal.b[4703] IF u=z|v=z DO ..
z M:0 MAN pal.b[4871] RESULTIS z
z M:0 MAN pal.b[4952] RESULTIS z
z M:0 MAN pal.b[5090] RESULTIS z
z M:0 MAN pal.b[5171] RESULTIS z
z M:0 MAN pal.b[5190] RESULTIS z
z M:0 MAN pal.b[5346] UNLESS v=z DO ..
z M:0 MAN pal.b[5416] UNTIL p=z DO ..
z M:0 MAN pal.b[5599] RESULTIS z
z M:0 MAN pal.b[5606] RESULTIS z
z M:0 MAN pal.b[5740] .. REPEATUNTIL s=z
z M:0 MAN pal.b[5759] writen,z
z M:0 MAN pal.b[5763] IF t=z DO ..
z M:0 MAN pal.b[5771] UNTIL q=z DO ..
z M:0 MAN pal.b[5801] TEST h1!p=z THEN .. ELSE ..
z M:0 MAN pal.b[5822] TEST h1!h1!p2=z THEN .. ELSE ..
z M:0 MAN pal.b[5836] .. REPEATUNTIL p=z
z M:0 MAN pal.b[5889] .. REPEATUNTIL a=z
z M:0 MAN pal.b[5916] .. REPEATUNTIL p=z
z M:0 MAN pal.b[5930] h3!p,z
z M:0 MAN pal.b[5936] IF q=z DO ..
z M:0 MAN pal.b[5940] .. REPEATUNTIL p=z
z M:0 MAN pal.b[5945] IF p=z DO ..
z M:0 MAN pal.b[6000] h1!zu:=z
z M:0 MAN pal.b[6018] IF c=z DO ..
z M:0 MAN pal.b[6096] UNLESS c=z DO ..
z M:0 MAN pal.b[6249] RESULTIS z
z M:0 MAN pal.b[6307] UNTIL c0!g=z DO ..
z M:0 MAN pal.b[6312] c0!g:=get4(s_name,z,a,z)
z M:0 MAN pal.b[6319] UNTIL c0!g=z DO ..
z M:0 MAN pal.b[6329] UNTIL c0!g=z DO ..
z M:0 MAN pal.b[6333] c0!g:=get4(s_name,z,b,z)
z M:0 MAN pal.b[6348] .. REPEATUNTIL s1=z
z M:0 MAN pal.b[6380] IF a=z DO ..
z M:0 MAN pal.b[6382] IF b=z DO ..
z M:0 MAN pal.b[6444] RESULTIS z
z M:0 MAN pal.b[6450] RESULTIS z
z M:0 MAN pal.b[6456] RESULTIS z
z M:0 MAN pal.b[6459] p=z
z M:0 MAN pal.b[6467] TEST p=z THEN .. ELSE ..
z M:0 MAN pal.b[6478] .. REPEATUNTIL a=z
z M:0 MAN pal.b[6479] RESULTIS z
z M:0 MAN pal.b[6483] z
z M:0 MAN pal.b[6487] .. REPEATUNTIL a=z
z M:0 MAN pal.b[6492] y1,z
z M:0 MAN pal.b[6514] RESULTIS z
z M:0 MAN pal.b[6521] IF p=z DO ..
z M:0 MAN pal.b[6522] RESULTIS get4(s_tuple,z,q,y1)
z M:0 MAN pal.b[6532] RESULTIS z
z M:0 MAN pal.b[6551] .. REPEATUNTIL t=z
z M:0 MAN pal.b[6556] RESULTIS z
z M:0 MAN pal.b[6564] z,y1
z M:0 MAN pal.b[6565] .. REPEATUNTIL p=z
z M:0 MAN pal.b[6567] RESULTIS z
z M:0 MAN pal.b[6571] z,y1
z M:0 MAN pal.b[6616] get4(s_xtupl,z,p,y0)
z M:0 MAN pal.b[6625] .. REPEATUNTIL e=z
z M:0 MAN pal.b[6626] RESULTIS z
z M:0 MAN pal.b[6630] UNLESS e>=yloc&g_np(e,s_e)~=z DO ..
z M:0 MAN pal.b[6632] RESULTIS z
z M:0 MAN pal.b[6714] IF h1!a=z DO ..
z M:0 MAN pal.b[6752] RESULTIS getx(s_numj,z,...)+v
z M:0 MAN pal.b[6765] RESULTIS z
z M:0 MAN pal.b[6789] RESULTIS z
z M:0 MAN pal.b[6793] RESULTIS z
z M:0 MAN pal.b[6803] RESULTIS a=z
z M:0 MAN pal.b[6835] c0,v:=v&p_addr,z
z M:0 MAN pal.b[6849] v:=getx(s_numj,z,n,m)
z M:0 MAN pal.b[6873] h1!gg:=z
z M:0 MAN pal.b[6880] RESULTIS linkword(s_glz,a,zsy,z)
z M:0 MAN pal.b[6882] RESULTIS z
z M:0 MAN pal.b[6899] RESULTIS get4(s_glg,n,v,z)
z M:0 MAN pal.b[6961] RESULTIS z
z M:0 MAN pal.b[6974] RESULTIS z
z M:0 MAN pal.b[7077] RESULTIS z
z M:0 MAN pal.b[7114] .. REPEATUNTIL ee=z
z M:0 MAN pal.b[7137] IF v=z DO ..
z M:0 MAN pal.b[7140] w:=get4(s_clos,e,z,w)
z M:0 MAN pal.b[7160] h3!v:=z
z M:0 MAN pal.b[7163] UNLESS v=z DO ..
z M:0 MAN pal.b[7170] z
z M:0 MAN pal.b[7187] w:=get4(s_clos,e,z,w)
z M:0 MAN pal.b[7208] h3!v:=z
z M:0 MAN pal.b[7212] UNLESS v=z DO ..
z M:0 MAN pal.b[7214] IF f=z DO ..
z M:0 MAN pal.b[7217] UNLESS f2=z DO ..
z M:0 MAN pal.b[7230] IF v=z DO ..
z M:0 MAN pal.b[7296] RESULTIS z
z M:0 MAN pal.b[7302] UNLESS h3!c=z DO ..
z M:0 MAN pal.b[7319] IF s1=z DO ..
z M:0 MAN pal.b[7326] h1!s:=get4(s_mb,z,b,n)
z M:0 MAN pal.b[7392] .. REPEATUNTIL p=z|q=z
z M:0 MAN pal.b[7398] TEST p=z THEN .. ELSE ..
z M:0 MAN pal.b[7401] IF p=z|q=z DO ..
z M:0 MAN pal.b[7486] RESULTIS z
z M:0 MAN pal.b[7520] get4(s_polyj,z,y1,y1)
z M:0 MAN pal.b[7550] .. REPEATUNTIL (p&p_addr)=z
z M:0 MAN pal.b[7571] IF p=z DO ..
z M:0 MAN pal.b[7580] IF (q&p_addr)=z DO ..
z M:0 MAN pal.b[7591] IF (p&p_addr)=z DO ..
z M:0 MAN pal.b[7592] TEST (q&p_addr)=z THEN .. ELSE ..
z M:0 MAN pal.b[7599] h1!r1:=z
z M:0 MAN pal.b[7603] IF (q&p_addr)=z DO ..
z M:0 MAN pal.b[7648] .. REPEATUNTIL p=z
z M:0 MAN pal.b[7649] h1!qq:=z
z M:0 MAN pal.b[7697] IF (q1&p_addr)=z DO ..
z M:0 MAN pal.b[7708] .. REPEATUNTIL (p&p_addr)=z
z M:0 MAN pal.b[7709] h1!r1:=z
z M:0 MAN pal.b[7719] z
z M:0 MAN pal.b[7735] UNLESS vv=z DO ..
z M:0 MAN pal.b[7740] .. REPEATUNTIL vv=z
z M:0 MAN pal.b[7742] IF r=z DO ..
z M:0 MAN pal.b[7746] TEST u=z THEN .. ELSE ..
z M:0 MAN pal.b[7748] TEST h3!u=y0&h1!u=z THEN .. ELSE ..
z M:0 MAN pal.b[7751] TEST h3!r=y0&h1!r=z THEN .. ELSE ..
z M:0 MAN pal.b[7775] UNLESS vv=z DO ..
z M:0 MAN pal.b[7782] .. REPEATUNTIL vv=z
z M:0 MAN pal.b[7793] TEST u=z THEN .. ELSE ..
z M:0 MAN pal.b[7795] TEST h3!u=y0&h1!u=z THEN .. ELSE ..
z M:0 MAN pal.b[7821] .. REPEATUNTIL (p&p_addr)=z
z M:0 MAN pal.b[7827] z,0
z M:0 MAN pal.b[7831] UNLESS q=z DO ..
z M:0 MAN pal.b[7835] .. REPEATUNTIL (p&p_addr)=z
z M:0 MAN pal.b[7842] z
z M:0 MAN pal.b[7853] UNTIL h1!q=z DO ..
z M:0 MAN pal.b[7871] h1!rr:=get4(s_polyj,z,...)XORrr&ysg
z M:0 MAN pal.b[7883] UNTIL h1!d1=z DO ..
z M:0 MAN pal.b[7950] TEST a=z THEN .. ELSE ..
z M:0 MAN pal.b[7953] IF a=z|b=z DO ..
z M:0 MAN pal.b[8210] !i:=z
z M:0 MAN pal.b[8213] zsy:=get4(s_unset,z,y0,...)
z M:0 MAN pal.b[8217] zc:=get4(s_cd,z,z,ll_zc)
z M:0 MAN pal.b[8218] ze:=get4(s_e,z,z,z)
z M:0 MAN pal.b[8220] zj:=get4(s_j,ze,z,z)
z M:0 MAN pal.b[8221] zs:=get4(s_string,z,0,0)
z M:0 MAN pal.b[8993] UNLESS erz=z DO ..
z M:0 MAN pal.b[8995] erz:=z
z M:0 MAN pal.b[9252] RESULTIS z
z M:0 MAN pal.b[9287] IF alphc&h1!s0=z DO ..
z M:0 MAN pal.b[9332] getx(s_string,z,0,0)
z M:0 MAN pal.b[9446] h1!gg:=z
z M:0 MAN pal.b[9454] RESULTIS z
z M:0 MAN pal.b[9462] a:=linseq(a,z,z,signbit)
z M:0 MAN pal.b[9482] z
z M:0 MAN pal.b[9496] z
z M:0 MAN pal.b[9526] z,y1,z
z M:0 MAN pal.b[9546] z
z M:0 MAN pal.b[9586] z
z M:0 MAN pal.b[9698] aug(z,h2!d)
z M:0 MAN pal.b[9720] RESULTIS z
z M:0 MAN pal.b[9722] RESULTIS z
z M:0 MAN pal.b[9723] z
z M:0 MAN pal.b[9755] d:=aug(z,d)
z M:0 MAN pal.b[9783] .. REPEATUNTIL a=z
z M:0 MAN pal.b[9879] .. REPEATUNTIL d=z
z M:0 MAN pal.b[9891] UNTIL a=z DO ..
z M:0 MAN pal.b[9971] RESULTIS get4(sg,a,b,z)
z M:0 MAN pal.b[9976] b:=aug(z,b)
zc G:429 DEF palhdr.h[522] zc=
zc G:429 LG pal.b[3230] flat1(a,zc,e,...)
zc G:429 LG pal.b[3247] IF c=zc&(f~=z|cstac) DO ..
zc G:429 LG pal.b[3270] TEST c=zc THEN .. ELSE ..
zc G:429 LG pal.b[3385] TEST c=zc THEN .. ELSE ..
zc G:429 LG pal.b[3396] TEST c=zc THEN .. ELSE ..
zc G:429 LG pal.b[3431] TEST c=zc THEN .. ELSE ..
zc G:429 LG pal.b[3444] TEST c=zc THEN .. ELSE ..
zc G:429 SG pal.b[8217] zc:=get4(s_cd,z,z,ll_zc)
ze G:430 DEF palhdr.h[523] ze=
ze G:430 LG pal.b[1934] get4(s_e,ze,zsy,z)
ze G:430 LG pal.b[2036] e:=get4(s_e,ze,arg1,...)
ze G:430 LG pal.b[2813] e:=get4(s_e,ze,arg1,...)
ze G:430 LG pal.b[2821] e:=get4(s_e,ze,arg1,...)
ze G:430 LG pal.b[2828] e:=get4(s_e,ze,arg1,...)
ze G:430 LG pal.b[350] ze,z,z
ze G:430 LG pal.b[6083] UNLESS h1!c=ze DO ..
ze G:430 LG pal.b[6230] IF e=ze DO ..
ze G:430 LG pal.b[6234] IF e=ze DO ..
ze G:430 LG pal.b[6239] writes(e=ze->"*n end'ronment*n","*n etc*n")
ze G:430 LG pal.b[8219] e:=ze
ze G:430 LG pal.b[8220] zj:=get4(s_j,ze,z,z)
ze G:430 LG pal.b[8252] typ!s_e:=ze
ze G:430 LG pal.b[8362] dy("E",ze,s_pp)
ze G:430 LG pal.b[9493] h1!e1:=ze
ze G:430 LG pal.b[9787] mclos1(ze,a,b)
ze G:430 LG pal.b[9963] IF t=a_fclos&h1!a=ze DO ..
ze G:430 SG pal.b[8218] ze:=get4(s_e,z,z,z)
zero G:278 DEF palhdr.h[350] zero=
zero G:278 LG pal.b[1481] zero,wrc
zero G:278 LG pal.b[1502] zero
zero G:278 LG pal.b[3080] zero,dummy,wrc
zero G:278 LG pal.b[5401] zero
zero G:278 LG pal.b[5597] stream(findinput,s,zero)
zero G:278 LG pal.b[5604] stream(findoutput,s,zero)
zero G:278 LG pal.b[5621] s0,s1:=zero,0
zero G:278 LG pal.b[5798] h2!p,zero,"- "|signbit
zero G:278 LG pal.b[5823] prinpoly(p2,f,FALSE,...)
zero G:278 LG pal.b[6580] g_get(findinput,s,zero)
zero G:278 LG pal.b[6602] s:=stream(findinput,s,zero)
zero G:278 SG pal.b[727] zero:=@zz|signbit
zj G:431 DEF palhdr.h[524] zj=
zj G:431 LG pal.b[1701] j,m:=zj,s_j
zj G:431 LG pal.b[1891] TEST j=zj THEN .. ELSE ..
zj G:431 LG pal.b[2233] TEST j=zj THEN .. ELSE ..
zj G:431 LG pal.b[2241] TEST j=zj THEN .. ELSE ..
zj G:431 LG pal.b[3752] j,m:=zj,s_j
zj G:431 LG pal.b[5998] !zu,h1!zu,h2!zu:=s_poly,c,zj
zj G:431 LG pal.b[6247] UNLESS tyv(j)=zj&j~=zj DO ..
zj G:431 LG pal.b[6251] UNLESS tyv(j)=zj&j~=zj DO ..
zj G:431 LG pal.b[6255] IF tyv(k)=zj DO ..
zj G:431 LG pal.b[6270] UNLESS tyv(f)=zj DO ..
zj G:431 LG pal.b[8272] typ!i:=zj
zj G:431 LG pal.b[8363] dy("J",zj,s_pp)
zj G:431 SG pal.b[8220] zj:=get4(s_j,ze,z,z)
zs G:432 DEF palhdr.h[525] zs=
zs G:432 LG pal.b[6864] zs
zs G:432 LG pal.b[6872] UNLESS g=zs DO ..
zs G:432 LG pal.b[9418] zs
zs G:432 LG pal.b[9445] UNLESS g=zs DO ..
zs G:432 SG pal.b[8221] zs:=get4(s_string,z,0,0)
zsc G:434 DEF palhdr.h[527] zsc=
zsc G:434 LG pal.b[6597] RESULTIS zsc
zsc G:434 LG pal.b[8224] svv,svu:=zsc,zsc-4
zsc G:434 LG pal.b[9499] e:=cond(e,zsc,e1)
zsc G:434 LG pal.b[9521] e:=zsc
zsc G:434 LG pal.b[9712] IF d=zsc DO ..
zsc G:434 LG pal.b[9726] RESULTIS zsc
zsc G:434 SG pal.b[8222] zsc:=get4(s_unset1,0,0,0)
zsq G:435 DEF palhdr.h[528] zsq=
zsq G:435 LG pal.b[8443] fff!i:=zsq
zsq G:435 LG pal.b[8487] UNTIL s=zsq DO ..
zsq G:435 LG pal.b[8518] UNTIL s=zsq DO ..
zsq G:435 LG pal.b[8530] UNTIL s=zsq DO ..
zsq G:435 LG pal.b[8584] IF (t&p_addr)=zsq DO ..
zsq G:435 LG pal.b[8593] b0:=zsq+(b0&p_tag)
zsq G:435 LG pal.b[8635] .. REPEATUNTIL (a0&p_addr)=zsq
zsq G:435 LG pal.b[8850] h1!a:=a1t+zsq
zsq G:435 SG pal.b[8216] zsq:=get4(s_mb,zsy+p_tagp,...,...)
zsy G:433 DEF palhdr.h[526] zsy=
zsy G:433 LG pal.b[1436] r:=get4(s_poly,zsy,...,...)
zsy G:433 LG pal.b[1439] t:=get4(s_polyj,zsy,...)+(p1&ysg)
zsy G:433 LG pal.b[1761] e:=get4(s_e,e,zsy,...)
zsy G:433 LG pal.b[1765] e:=get4(s_e,e,zsy,...)
zsy G:433 LG pal.b[1784] f,m,c:=get4(m,...)+yfj,s_mmal,h1!c
zsy G:433 LG pal.b[1934] get4(s_e,ze,zsy,z)
zsy G:433 LG pal.b[2108] f,m:=get4(m,...)+yfj,s_mmal
zsy G:433 LG pal.b[2728] e:=get4(s_e,e,zsy,...)
zsy G:433 LG pal.b[2973] e:=get4(s_e,e,zsy,...)
zsy G:433 LG pal.b[3049] e:=get4(s_e,e,zsy,...)
zsy G:433 LG pal.b[3114] UNTIL c=zsy DO ..
zsy G:433 LG pal.b[3228] zsy,gseqf|signbit
zsy G:433 LG pal.b[3231] UNTIL g=zsy DO ..
zsy G:433 LG pal.b[3281] c:=get4(s_cd,c,zsy,ll)
zsy G:433 LG pal.b[3320] get4(s_mb,f,zsy,z)
zsy G:433 LG pal.b[3452] get4(s_mb,f,zsy,z)
zsy G:433 LG pal.b[3508] get4(s_mb,f,zsy,z)
zsy G:433 LG pal.b[3524] get4(s_cd,zsy,zsy,ll_cond)
zsy G:433 LG pal.b[3658] RESULTIS get4(s_mb,e,zsy,v)
zsy G:433 LG pal.b[3846] h1!c0:=getx(s_numj,zsy,gw2,gw1)
zsy G:433 LG pal.b[3866] h1!c0:=getx(s_numj,zsy,0,0)
zsy G:433 LG pal.b[3878] zsy
zsy G:433 LG pal.b[3905] h1!s0:=getx(s_numj,zsy,numbb,numbb)
zsy G:433 LG pal.b[3922] IF h1!c=zsy DO ..
zsy G:433 LG pal.b[3930] IF t=zsy DO ..
zsy G:433 LG pal.b[3959] getx(s_numj,zsy,0,gw1)
zsy G:433 LG pal.b[3970] h1!c0:=getx(s_numj,zsy,0,0)
zsy G:433 LG pal.b[3991] getx(s_numj,zsy,numbb,gw1)
zsy G:433 LG pal.b[4002] h1!c0:=getx(s_numj,zsy,numbb,numbb)
zsy G:433 LG pal.b[4051] h1!n0:=getx(s_numj,zsy,gw2,gw3)
zsy G:433 LG pal.b[4062] getx(s_numj,zsy,...)+((aXORb)&ysg)
zsy G:433 LG pal.b[4159] gl1,n:=n-y0,zsy
zsy G:433 LG pal.b[4184] .. REPEATUNTIL n=zsy
zsy G:433 LG pal.b[4187] IF h1!a=zsy&h2!a=0 DO ..
zsy G:433 LG pal.b[4194] IF t=zsy DO ..
zsy G:433 LG pal.b[4234] IF t=zsy DO ..
zsy G:433 LG pal.b[5351] erz:=zsy
zsy G:433 LG pal.b[5417] IF (p&p_addr)=zsy|h2!p=y0 DO ..
zsy G:433 LG pal.b[6529] IF p=zsy DO ..
zsy G:433 LG pal.b[6574] IF t=zsy DO ..
zsy G:433 LG pal.b[6869] c1,h1!gg,gg:=str1,getx(s_string,...),h1!gg
zsy G:433 LG pal.b[6880] RESULTIS linkword(s_glz,a,zsy,z)
zsy G:433 LG pal.b[7560] get4(s_poly,zsy,...,...)
zsy G:433 LG pal.b[7568] get4(s_polyj,zsy,...)+sg
zsy G:433 LG pal.b[7577] get4(s_polyj,zsy,...)+(q&ysg)
zsy G:433 LG pal.b[7588] f:=get4(s_polyj,zsy,...)+(p&ysg)
zsy G:433 LG pal.b[7616] get4(s_poly,zsy,...,...)
zsy G:433 LG pal.b[7642] get4(s_poly,zsy,...)+(p&ysg)
zsy G:433 LG pal.b[7646] r:=get4(s_polyj,zsy,...)+(p&ysg)
zsy G:433 LG pal.b[7662] get4(s_poly,zsy,...,...)
zsy G:433 LG pal.b[7784] UNTIL uu=zsy DO ..
zsy G:433 LG pal.b[7810] zsy,y0
zsy G:433 LG pal.b[7833] q:=get4(s_polyj,q,t,zsy)
zsy G:433 LG pal.b[7847] .. REPEATUNTIL p=zsy
zsy G:433 LG pal.b[7863] get4(s_poly,zsy,...)+(a&ysg)
zsy G:433 LG pal.b[7868] s:=get4(s_polyj,zsy,...)+(a&ysg)
zsy G:433 LG pal.b[8046] RESULTIS h2!linkword(s_glo,a,...)
zsy G:433 LG pal.b[8215] zu:=get4(s_mb,0,0,zsy)
zsy G:433 LG pal.b[8216] zsq:=get4(s_mb,zsy+p_tagp,...,...)
zsy G:433 LG pal.b[8226] !i:=zsy
zsy G:433 LG pal.b[8779] IF s2=0|a2=zsy|a3=zsy DO ..
zsy G:433 LG pal.b[8844] IF a1=zsy DO ..
zsy G:433 LG pal.b[9439] s2,h1!gg,gg:=str1,getx(s_string,...),h1!gg
zsy G:433 LG pal.b[9452] zsy,gseq|signbit
zsy G:433 LG pal.b[9457] UNTIL g=zsy DO ..
zsy G:433 LG pal.b[9486] h1!e1:=mlet(zsy,zsy,zsy)
zsy G:433 LG pal.b[9592] e2:=mlet(zsy,zsy,zsy)
zsy G:433 LG pal.b[9606] e:=aug(zsy,e)
zsy G:433 LG pal.b[9699] aug(zsy,h3!d)
zsy G:433 SG pal.b[8213] zsy:=get4(s_unset,z,y0,...)
ztab G:290 DEF palhdr.h[362] ztab=
ztab G:290 LG pal.b[1238] ztab(20)
ztab G:290 LG pal.b[1663] ztab(12)
ztab G:290 LG pal.b[5371] ztab(4)
ztab G:290 LG pal.b[5375] ztab(4)
ztab G:290 LG pal.b[5395] ztab(10)
ztab G:290 LG pal.b[5858] ztab(20)
ztab G:290 LG pal.b[924] f:=ztab
ztab G:290 LLG pal.b[8307] set_r("ZTAB",@ztab)
ztab G:290 RT pal.b[855] LET ztab(n)BE..
zu G:436 DEF palhdr.h[529] zu=
zu G:436 LG pal.b[5998] !zu,h1!zu,h2!zu:=s_poly,c,zj
zu G:436 LG pal.b[5999] prinpoly(zu,FALSE,FALSE,FALSE)
zu G:436 LG pal.b[6000] h1!zu:=z
zu G:436 SG pal.b[8215] zu:=get4(s_mb,0,0,zsy)
zz S:3 DEF pal.b[726] zz=0
zz S:3 LLL pal.b[727] zero:=@zz|signbit
