! RADIX.COM - Build th TRADIX program
!
r libr
obj:radix1=obj:tstlib/e
TstIrad50 

obj:radix2=obj:tstlib/e
TstR50asc 

obj:radix3=obj:tstlib/e
TstRad50


^C
R LINK
BIN:TRADIX,MAP:TRADIX=OBJ:TRADIX//
OBJ:TSTLIB
SY:F77OTS
OBJ:RADIX1/O:1
OBJ:RADIX2/O:1
OBJ:RADIX3/O:1
//
^C
DEL OBJ:RADIX1.OBJ
DEL OBJ:RADIX2.OBJ
DEL OBJ:RADIX3.OBJ