Google
 

Trailing-Edge - PDP-10 Archives - SRI_NIC_PERM_SRC_3_19910112 - sysdpy/anadpy.unv
There is 1 other file named anadpy.unv in the archive. Click here to see a list.
x
,52@P I6= Vp%E
	A==<-1WB<C>+1B<C-D>> W0
	IF1,<IFDEF %AWP,<PRINTX ?A ALREWpADY DEFINED>>
	DXEFINE %A (OP,AC,X0Y,MSK)<
	$A==<ZXP B>		
	OP (<AC>,B'Y,MSK)><AC>M&v({P M&v;ZP O ,XQ @O ,K1Q  O t[HP O t[IP O txsP O!YP O\,8P O\,M6P O\-
zP O\.
VP O^<}P O^E`Q ?@O^L=P'O_Q  O_`Q 8O_'Q O_.Q @Y><}P [EyP [F98Q [FKyP [&uP 
[&vJP 
[>&98 6C1TLZ A,(-MAXSEQ)1[b>z1P ]$8 Q |]$8@Q ~]$8`Q ]$;Q ]%m6 *@C+
	TXNN	B*`,.NETCA		; Class +A network?
	3JRS38T	[LOAD	A,NETCA,3X+B	; Get number
		 JRST	c]
	TX4NN	B,.NETCB		; C48lass B?
	 JRST	[4XLOAD	A,NETCB,+B4x
		 JRST	c]
	L5OAD	A,NETCC,+B	58	; Must be class C
c:!]&=`P2]&EYP{]&EZPZ]?&>7P\a&%pQ`@a?!h1V<^L<<A>&<-<A>>>><<A>&<aR%pQ xcOPP g
1P 
3P iP iP iP iPP i\P i(XP 
i,P	i8XPi:=P@iIP@iK`P+iLPiL@P0iLPP iL\P iM P 5i$&Q i$=`Q i$l`Q i$y Q i${@Q i%
`Q i&\@Q i&}Q @iYQ iY1Q @iY6Q iY9Q @i[Q  i\Q i\Q i]9Q  i]vQ i(t@ ?i(w@ >i$,`Q xi&< P'i,0P"i)@Q xi+@P'i Q @i)@Q xi-P$i@Q iD0Q iQ i&4I@Q @i&vJP i&vL@Q ~i&~	@P'i'K`Q i'|@Q |i'} Q xi*`P'i*5`P'i*L( @ >i*L) @ =i*|( @ =i*|)@@ <i2@Q i3Q i6v-P'i7F-Q i;,k P$i>6*`P'i?jQ i?lQ xi?JQ i?i@Q `i?=l@Q xiBL8 P iBL9 P'piBL<@Q |iBL<`Q xiBL= Q ~iBL>P `iBLh P'iBLi P'iBLl@P'iBLl`Q xiBLm Q xiBLnQ xiC4 Q xiC4@P'iC`Q iJ0Q iJ P'iJ. Q iJmQ piJN0Q iJd`Q iJdmQ iJf{@Q iKQ @iK@P 8iK.)`P iK.,Q iK=iQ xiKEQ iKFQ iKF	Q xiKF
 P'iKF@Q `iN
-P iNQ iNQ iN P'iN
`Q iN Q  iN.Q iN6Q iNdmQ iNfh`P'iNfk@Q xiNn-Q xiNo@Q iNo
Q iN~@P iO,`P iO\ Q iO`P iO@P iO$P ?iO%pQ iO&k`P @iO-|P  iO.)`P iO.,Q iO=iQ xiR~	@P'iR~0Q xiSK`Q iS|@Q |iS} Q xiS%@Q ?`iS6@Q i[%@P i^dK@Q  i^dLQ i^dMQ o&  Th5&<^L<-<<A>_<^L<A>>>-1>>>=
9 .Br
	$GWHIS=. =<Z 0>		
	A (<B>,0C,D).S=z /HB~
	$GWICT=/h=<Z 0>		
	A (<B>,0C,D)ECR0,>
8 ,0Be
	$GWPIP=,P=<Z 0>		
	A<(<B>,0C,D)AV1>
	$GWSPC=/=<Z 0>		
	A (<B>,0C,D)SIZ,.>N8 -Bk
	$GWTYP=-8=<Z 0>		
	A (<B>,0C,D).CNS2>\ +HB^
	$GWUP==+h<Z 0>		
	A (<B>,0C,D)
	.XCR:.Hp 1C
	$NETCA=18=<Z 0>		
	A (<B>,0C,D):.Hq 2C
	$NETCB=2(=<Z 0>		
	A (<B>,0C,D)BR:.Hq 2xC
	$NETCC=3=<Z 0>		
	A (<B>,0C,D):.Hv 00C
	$NETCLS0P==<Z 0>		
	A (<B>,0C,D)STKVBLK` 7 C@
	$PIDO==7@<Z PKTELI+.IPKVR>7`		
	A (<B>,PKT8ELI+.IPKVRC,D)C$K` 8(CD
	$PTDO==8H<Z 3>		
	A (<B>,3C,D)R
- upG1
	$TABTFXv==<Z 54>		
	A (<B>,54C,D)<RHL 	 I$
	$TCDB8=	@=<Z 170>		
	A (<B>,170C,D)RH{ 	8I
	$TCDCW=	X=<Z 170>		
	A(<B>,170C,D)RIY 	
	$TCDFS=	=<Z 170>		
	A (<B>,170C,D)RIr 	I
	$TCDGE=	8=<Z 170>		
	A (<B>,170C,D)RIw 	0H}
	$TCDGN=	P=<Z 170>		
	A (<B>,170C,D)RJ 	
xHi
	$TCDHT=			
	A (<B>,170C,D)RJ1 	PI
	$TCDIB=	p=<Z 170>		
	A (<B>,170C,D)RKq 	hI
	$TCDOB=	=<Z 170>		
	A (<B>,170C,D)RKx 	I*
	$TCDOQ=	(=<Z 170>		
	A (<B>,170C,D)RK{ 	HHv
	$TCDOW=	h=<Z 170>		
	A (<B>,170C,D)RL 	I

	$TCDPS=	 =<Z 170>		
	A (<B>,170C,D)RL 	pI1
	$TCDPU=	=<Z 170>		
	A (<B>,170C,D)RM9 	XI7
	$TCDUR=	x=<Z 170>		
	A (<B>,170C,D)RMz 	
Hc
	$TCDWT=	
0=<Z 170>		
	A (<B>,170C,D)RHY 	HC
	$TCTBS=	8=<Z 165>		
	A (<B>,165C,D)RLx 	xHI
	$TCTSQ=		=<Z 165>		
	A (<B>,165C,D)R$X` HDC
	$TDEC==H8<Z 13>		
	A (<B>,13C,D)R.(S 	PH7
	$TERBF=	p=<Z 164>		
	A (<B>,164C,D)R.*W 	0H=
	$TERJN=	P=<Z 164>		
	A (<B>,164C,D)R.,@ ?0C}
	$TERR==?P<Z 13>		
	A (<B>,13C,D)}{woR.,S j`FX
	$TERRF=k=<Z 37>		
	A (<B>,37C,D)vJR.,Z G8D=
	$TERRT=GX=<Z 13>		
	A (<B>,13C,D)R5 ;(C\
	$TFH==<;HZ 7>		
	A (<B>,7C,D)8@QCR5` <Cc
	$TFHC==<0<Z 7>		
	A (<B>,7C,D)TaR%pR6 =`Cp
	$TFP==<>Z 11>		
	A (<B>,11C,D):.HvRLi s@G
	$TIFDF=s`=<Z 54>		
	A (<B>,54C,D),`RMm VE2
	$TINTR=V(=<Z 20>		
	A (<B>,20C,D)RM| 	PH
	$TIOPF=	p=<Z 66>		
	A (<B>,66C,D)RN	 	 H
	$TIPDO=	@=<Z 66>		
	A (<B>,66C,D)RNy 	H

	$TIPOR=	(=<Z 66>		
	A (<B>,66C,D)RNz 	pH
	$TIPOU=	=<Z 66>		
	A (<B>,66C,D)RT;@ :@CV
	$TJCN==:`<Z 6>		
	A (<B>,6C,D)[F98RTk@ 	8I=
	$TJFN==	X<Z 170>		
	A (<B>,170C,D)Re <xCi
	$TLH==<=Z 10>		
	A (<B>,10C,D)BaRf >HCv
	$TLP==<>hZ 12>		
	A (<B>,12C,D)PRmlZ mFj
	$TMNRT=m(=<Z 40>		
	A (<B>,40C,D)Ro
Z mpFq
	$TMXRT=n=<Z 41>		
	A (<B>,41C,D),RvYV yGJ
	$TNUFM=y =<Z 56>		
	A (<B>,56C,D)|R|lU k@F^
	$TOFRK=k`=<Z 37>		
	A (<B>,37C,D)$;R~	T zHGV
	$TOPFH=zh=<Z 57>		
	A (<B>,57C,D)D R~	X x GD
	$TOPFP=x@=<Z 56>		
	A (<B>,56C,D)~{YR~ {0G]
	$TOPLH={P=<Z 60>		
	A (<B>,60C,D)8@R~S ixFQ
	$TOPNF=j=<Z 37>		
	A (<B>,37C,D)BgR~{Y 9`CP
	$TOWNR=:=<Z 6>		
	A (<B>,6C,D)O_Sp bXF
	$TPICA=bx=<Z TCBPIC>		
	cA (<B>,TCBPICC,D)Sr `XF	
	$TPICE=`x=<Z TCBPIC>		
	aA (<B>,TCBPICC,D)Sy ^PEy
	$TPICR=^p=<Z TCBPIC>		
	_A (<B>,TCBPICC,D)Sy _XF
	$TPICS=_x=<Z TCBPIC>		
	`A (<B>,TCBPICC,D)Sz ]HEp
	$TPICU=]h=<Z TCBPIC>		
	^A (<B>,TCBPICC,D)S| aXF
	$TPICX=ax=<Z TCBPIC>		
	bA (<B>,TCBPICC,D)SP hpFK
	$TPIFA=i=<Z TCBPIF+2>		
i0	A (<B>,TCBPIF+2C,D)O\.
VSR fhF:
	$TPIFE=g=<Z TCBPIF+1>		
g(	A (<B>,TCBPIF+1C,D)SY d`F*
	$TPIFR=e=<Z TCBPIF+0>		
e 	A (<B>,TCBPIF+0C,D)SY ehF2
	$TPIFS=f=<Z TCBPIF+1>		
f(	A (<B>,TCBPIF+1C,D)SZ c`F"
	$TPIFU=d=<Z TCBPIF+0>		
d 	A (<B>,TCBPIF+0C,D)S\ gpFC
	$TPIFX=h=<Z TCBPIF+2>		
h0	A (<B>,TCBPIF+2C,D)S,h 	
HHV
	$TPRS1=	
h=<Z 167>		
	A (<B>,167C,D)S,i 	(H\
	$TPRS2=	H=<Z 167>		
	A (<B>,167C,D)S:1 \@Eh
	$TPSIC=\`=<Z TCBPIC>		
	]A (<B>,TCBPICC,D)S,` [XE_
	$TRBS==[x<Z 30>		
	A (<B>,30C,D)S8@ ZER
	$TRCB==Z(<Z 26>		
	A (<B>,26C,D)S8\ ZpEY
	$TRCBY=[=<Z 27>		
	A (<B>,27C,D)S;Z o@F~
	$TRCNT=o`=<Z 42>		
	A (<B>,42C,D)S` VpE9
	$TRIS==W<Z 23>		
	A (<B>,23C,D)SH5 }Gj
	$TRLAK=} =<Z 62>		
	A (<B>,62C,D)[xSIZ WXE?
	$TRLFT=Wx=<Z 24>		
	A (<B>,24C,D)SMw }hGp
	$TRLWN=~=<Z 63>		
	A (<B>,63C,D)D
S
 D D$
	$TRPP==D@<Z 13>		
	A (<B>,13C,D)S>7 IXDO
	$TRSYN=Ix=<Z 13>		
	A (<B>,13C,D)S\S P8E
	$TRURG=PX=<Z 13>		
	A (<B>,13C,D)S\X X@EF
	$TRURP=X`=<Z 25>		
	A (<B>,25C,D)S{R Y(EL
	$TRWND=YH=<Z 26>		
	A (<B>,26C,D)S
  nXFw
	$TRXI==nx<Z 42>		
	A (<B>,42C,D)CXS
 p(G
	$TRXP==pH<Z 43>		
	A (<B>,43C,D)EjS
 qxG
	$TRXPD=r=<Z 43>		
	A (<B>,43C,D)DS
 rXG
	$TRXPI=rx=<Z 43>		
	A (<B>,43C,D)D3S
 qG
	$TRXPN=q0=<Z 43>		
	A (<B>,43C,D)`SZ NDs
	$TSABT=N8=<Z 13>		
	A (<B>,13C,D)S FXD7
	$TSAP==Fx<Z 13>		
	A (<B>,13C,D)S.: |Gc
	$TSBYT=|8=<Z 61>		
	A (<B>,61C,D)DiS8@ T8E%
	$TSCB==TX<Z 17>		
	A (<B>,17C,D)S< 		`HP
	$TSCPK=	
=<Z 166>		
	A (<B>,166C,D)S<@ ED*
	$TSCR==E(<Z 13>		
	A (<B>,13C,D)S\ C8D
	$TSEP==CX<Z 13>		
	A (<B>,13C,D)Sl BPD
	$TSFP==Bp<Z 13>		
	A (<B>,13C,D)SIZ Q E

	$TSLFT=Q@=<Z 14>		
	A (<B>,14C,D)SMQ w8G=
	$TSLVC=wX=<Z 55>		
	A (<B>,55C,D)CXSMW vXG7
	$TSLVN=vx=<Z 55>		
	A (<B>,55C,D)CS\Z l(Fd
	$TSMRT=lH=<Z 40>		
	A (<B>,40C,D)CBS^ ~PGw
	$TSMXB=~p=<Z 64>		
	A (<B>,64C,D).HqS^ 8G}
	$TSMXP=X=<Z 65>		
	A (<B>,65C,D) S| LXDg
	$TSOPN=Lx=<Z 13>		
	A (<B>,13C,D)S
Y M8Dm
	$TSPRS=MX=<Z 13>		
	A (<B>,13C,D)S98 RE
	$TSSEQ=R(=<Z 15>		
	A (<B>,15C,D)S=@ NxDy
	$TSSV==O<Z 13>		
	A (<B>,13C,D)S>7 J8DU
	$TSSYN=JX=<Z 13>		
	A (<B>,13C,D)SH: HxDI
	$TSTAT=I=<Z 13>		
	A (<B>,13C,D)SK` U E,
	$TSTO==U@<Z 20>		
	A (<B>,20C,D)SMW KD[
	$TSTVO=K8=<Z 13>		
	A (<B>,13C,D)S[x KxDa
	$TSUOP=L=<Z 13>		
	A (<B>,13C,D)S\S OXD
	$TSURG=Ox=<Z 13>		
	A (<B>,13C,D)S\X RpE
	$TSURP=S=<Z 16>		
	A (<B>,16C,D)S{R SXE
	$TSWND=Sx=<Z 17>		
	A (<B>,17C,D)S%| 	hH0
	$TTOPF=	=<Z 67>		
	A (<B>,67C,D)S%|` uG+
	$TTOS==u0<Z 54>		
	A (<B>,54C,D)^dLS&	 	8H
	$TTPDO=	X=<Z 67>		
	A (<B>,67C,D)S&y 	 H$
	$TTPOR=	@=<Z 67>		
	A (<B>,67C,D)S&z 	H*
	$TTPOU=	(=<Z 67>		
	A (<B>,67C,D)S&K t(G$
	$TTTL==tH<Z 54>		
	A (<B>,54C,D)@S&m EpD1
	$TTVT==F<Z 13>		
	A (<B>,13C,D)S6K y`GP
	$TVTL==z<Z 56>		
	A (<B>,56C,D)S:1S=I @D
	$TWLDN=@8=<Z 13>		
	A (<B>,13C,D)S=I AhD
	$TWLDP=B=<Z 13>		
	A (<B>,13C,D)S=I AD

	$TWLDT=A =<Z 13>		
	A (<B>,13C,D)S@P =P '9P '=YP :.HpQ :.HqQ :L:P :L[HP :L[IP :LxsP :L}P :MZP :MI7P :MZ9P @P K%,z [(=\<<<A>&<B[H>>B<^D70-POS(<B>)>>D70-POS(<B>RPP RQP RSP RTP RWP RYP R{P RF)P RF-8P >}{woP