#
#	this command file builds [307,31], the distribution uic for
#	the RSX/IAS tools.  The files are built into the current
#	directory, with the input files found on /src, /rsx and /doc
#	of the same disk
#
get /rsx/bspawn.tcs t.w; ar xv t.w >temp
get /rsx/fell.tcs t.w; ar xv t.w >temp fel.mac
ar xv /rsx/rlib.w >temp
ar p minprim.mar >minprim.mac
ar p minlib.mar >minlib.mac
ar x prim.m
ar x lib.m
ratfor - prim.r >primpst.ff <<!
define(TIME_ZONE,"PST")
!
ar xv lib.r | find .r | ch "%" "ratfor " | sh -v >lib.ff
ar t lib.r | rm
rm <temp
get /rsx/fc.tcs t.w; ar xv t.w >temp
ratfor - fc.r >fcf4p.ff <<!
define(FORT_COMP,F4P)
define(COMP_NAME,"F4P")
!
ratfor - fc.r >fcfor.ff <<!
define(FORT_COMP,FOR)
define(COMP_NAME,"FOR")
!
rm <temp
get /rsx/ld.tcs t.w; ar xv t.w >temp
ratfor - ld.r >ldfp.ff <<!
define(FLOAT_PT,YES)
!
ratfor - ld.r >ldnofp.ff <<!
define(FLOAT_PT,NO)
!
rm <temp
get /src/acat.tcs t.w; ar xv t.w >temp; ratfor acat.r >acat.f; rm <temp
get /src/admin.tcs t.w; ar xv t.w >temp; ratfor admin.r >admin.f; rm <temp
get /src/alist.tcs t.w; ar xv t.w >temp; ratfor alist.r >alist.f; rm <temp
get /src/ar.tcs t.w; ar xv t.w >temp; ratfor ar.r >ar.f; rm <temp
get /src/args.tcs t.w; ar xv t.w >temp; ratfor args.r >args.f; rm <temp
get /src/asam.tcs t.w; ar xv t.w >temp; ratfor asam.r >asam.f; rm <temp
get /src/asplit.tcs t.w; ar xv t.w >temp; ratfor asplit.r >asplit.f; rm <temp
get /src/axref.tcs t.w; ar xv t.w >temp; ratfor axref.r >axref.f; rm <temp
get /src/banner.tcs t.w; ar xv t.w >temp; ratfor banner.r >banner.f; rm <temp
ar x t.w bigchar
get /src/bargraph.tcs t.w; ar xv t.w >temp; ratfor bargraph.r >bargraph.f; rm <temp
get /src/box.tcs t.w; ar xv t.w >temp; ratfor box.r >box.f; rm <temp
get /src/cat.tcs t.w; ar xv t.w >temp; ratfor cat.r >cat.f; rm <temp
get /src/ccnt.tcs t.w; ar xv t.w >temp; ratfor ccnt.r >ccnt.f; rm <temp
get /src/ch.tcs t.w; ar xv t.w >temp; ratfor ch.r >ch.f; rm <temp
get /src/cmp.tcs t.w; ar xv t.w >temp; ratfor cmp.r >cmp.f; rm <temp
get /src/comm.tcs t.w; ar xv t.w >temp; ratfor comm.r >comm.f; rm <temp
get /src/cpress.tcs t.w; ar xv t.w >temp; ratfor cpress.r >cpress.f; rm <temp
get /src/crt.tcs t.w; ar xv t.w >temp; ratfor crt.r >crt.f; rm <temp
get /src/crypt.tcs t.w; ar xv t.w >temp; ratfor crypt.r >crypt.f; rm <temp
get /src/date.tcs t.w; ar xv t.w >temp; ratfor date.r >date.f; rm <temp
get /src/dc.tcs t.w; ar xv t.w >temp; ratfor dc.r >dc.f; rm <temp
get /src/delta.tcs t.w; ar xv t.w >temp; ratfor delta.r >delta.f
ratfor - delta.r >pdelta.f <<!
define(DO_PAGING,)
!
rm <temp
get /src/detab.tcs t.w; ar xv t.w >temp; ratfor detab.r >detab.f; rm <temp
get /src/diff.tcs t.w; ar xv t.w >temp; ratfor diff.r >diff.f; rm <temp
get /src/echo.tcs t.w; ar xv t.w >temp; ratfor echo.r >echo.f; rm <temp
get /src/ed.tcs t.w; ar xv t.w >temp
ratfor - ed.r >ed.f <<!
define(DO_PAGING,)
!
rm <temp
ar x t.w ed.hlp
get /src/entab.tcs t.w; ar xv t.w >temp; ratfor entab.r >entab.f; rm <temp
get /src/expand.tcs t.w; ar xv t.w >temp; ratfor expand.r >expand.f; rm <temp
get /src/fb.tcs t.w; ar xv t.w >temp; ratfor fb.r >fb.f; rm <temp
get /src/fd.tcs t.w; ar xv t.w >temp; ratfor fd.r >fd.f; rm <temp
get /src/field.tcs t.w; ar xv t.w >temp; ratfor field.r >field.f; rm <temp
get /src/find.tcs t.w; ar xv t.w >temp; ratfor find.r >find.f; rm <temp
get /src/form.tcs t.w; ar xv t.w >temp; ratfor form.r >form.f; rm <temp
get /src/format.tcs t.w; ar xv t.w >temp; ratfor format.r >format.f; rm <temp
get /src/get.tcs t.w; ar xv t.w >temp; ratfor get.r >get.f; rm <temp
get /src/grep.tcs t.w; ar xv t.w >temp; ratfor grep.r >grep.f; rm <temp
get /src/incl.tcs t.w; ar xv t.w >temp; ratfor incl.r >incl.f; rm <temp
get /src/intro.tcs t.w; ar xv t.w >temp; ratfor intro.r >intro.f; rm <temp
get /src/isam.tcs t.w; ar xv t.w >temp; ratfor isam.r >isam.f; rm <temp
get /src/kwic.tcs t.w; ar xv t.w >temp; ratfor kwic.r >kwic.f; rm <temp
get /src/lam.tcs t.w; ar xv t.w >temp; ratfor lam.r >lam.f; rm <temp
get /src/lcnt.tcs t.w; ar xv t.w >temp; ratfor lcnt.r >lcnt.f; rm <temp
get /src/ll.tcs t.w; ar xv t.w >temp; ratfor ll.r >ll.f; rm <temp
get /src/ls.tcs t.w; ar xv t.w >temp; ratfor ls.r >ls.f; rm <temp
get /src/macro.tcs t.w; ar xv t.w >temp; ratfor macro.r >macro.f; rm <temp
get /src/mail.tcs t.w; ar xv t.w >temp; ratfor mail.r >mail.f; rm <temp
get /src/man.tcs t.w; ar xv t.w >temp; ratfor man.r >man.f; rm <temp
get /src/mcol.tcs t.w; ar xv t.w >temp; ratfor mcol.r >mcol.f; rm <temp
get /src/msg.tcs t.w; ar xv t.w >temp; ratfor msg.r >msg.f; rm <temp
get /src/msplit.tcs t.w; ar xv t.w >temp; ratfor msplit.r >msplit.f; rm <temp
get /src/mv.tcs t.w; ar xv t.w >temp; ratfor mv.r >mv.f; rm <temp
get /src/number.tcs t.w; ar xv t.w >temp; ratfor number.r >number.f; rm <temp
get /src/oldratfor.tcs t.w; ar xv t.w >temp; ratfor oldratfor.r >oldratfor.f
rm <temp
get /src/os.tcs t.w; ar xv t.w >temp; ratfor os.r >os.f; rm <temp
get /src/pack.tcs t.w; ar xv t.w >temp; ratfor pack.r >pack.f; rm <temp
get /src/pl.tcs t.w; ar xv t.w >temp; ratfor pl.r >pl.f; rm <temp
get /src/postmn.tcs t.w; ar xv t.w >temp; ratfor postmn.r >postmn.f; rm <temp
get /src/pr.tcs t.w; ar xv t.w >temp; ratfor pr.r >pr.f; rm <temp
get /src/prlabl.tcs t.w; ar xv t.w >temp; ratfor prlabl.r >prlabl.f; rm <temp
get /src/pwd.tcs t.w; ar xv t.w >temp; ratfor pwd.r >pwd.f; rm <temp
get /src/rar.tcs t.w; ar xv t.w >temp; ratfor rar.r >rar.f; rm <temp
get /src/ratfor.tcs t.w; ar xv t.w >temp; ratfor ratfor.r >ratfor.f; rm <temp
get /src/rc.tcs t.w; ar xv t.w >temp; ratfor rc.r >rc.f; rm <temp
get /src/resolve.tcs t.w; ar xv t.w resolve.sh
get /src/rev.tcs t.w; ar xv t.w >temp; ratfor rev.r >rev.f; rm <temp
get /src/rm.tcs t.w; ar xv t.w >temp; ratfor rm.r >rm.f; rm <temp
get /src/ruler.tcs t.w; ar xv t.w >temp; ratfor ruler.r >ruler.f; rm <temp
get /src/sched.tcs t.w; ar xv t.w >temp; ratfor sched.r >sched.f; rm <temp
get /src/sedit.tcs t.w; ar xv t.w >temp; ratfor sedit.r >sedit.f; rm <temp
get /src/sepfor.tcs t.w; ar xv t.w >temp; ratfor sepfor.r >sepfor.f; rm <temp
get /src/sh.tcs t.w; ar xv t.w >temp; ratfor sh.r >sh.f
ratfor hshdef sh.r >hsh.f; rm <temp
get /src/sleep.tcs t.w; ar xv t.w >temp; ratfor sleep.r >sleep.f; rm <temp
get /src/sndmsg.tcs t.w; ar xv t.w >temp; ratfor sndmsg.r >sndmsg.f; rm <temp
get /src/sort.tcs t.w; ar xv t.w >temp; ratfor sort.r >sort.f; rm <temp
get /src/spell.tcs t.w; ar xv t.w >temp; ratfor spell.r >spell.f; rm <temp
get /src/split.tcs t.w; ar xv t.w >temp; ratfor split.r >split.f; rm <temp
get /src/tail.tcs t.w; ar xv t.w >temp; ratfor tail.r >tail.f; rm <temp
get /src/tee.tcs t.w; ar xv t.w >temp; ratfor tee.r >tee.f; rm <temp
get /src/tr.tcs t.w; ar xv t.w >temp; ratfor tr.r >tr.f; rm <temp
get /src/tsort.tcs t.w; ar xv t.w >temp; ratfor tsort.r >tsort.f; rm <temp
get /src/ttt.tcs t.w; ar xv t.w >temp; ratfor ttt.r >ttt.f; rm <temp
get /src/txtrpl.tcs t.w; ar xv t.w >temp; ratfor txtrpl.r >txtrpl.f; rm <temp
ar x t.w pf
get /src/ul.tcs t.w; ar xv t.w >temp; ratfor ul.r >ul.f; rm <temp
get /src/uniq.tcs t.w; ar xv t.w >temp; ratfor uniq.r >uniq.f; rm <temp
get /src/unrot.tcs t.w; ar xv t.w >temp; ratfor unrot.r >unrot.f; rm <temp
get /src/users.tcs t.w; ar xv t.w >temp; ratfor users.r >users.f; rm <temp
get /src/wc.tcs t.w; ar xv t.w >temp; ratfor wc.r >wc.f; rm <temp
get /src/wcnt.tcs t.w; ar xv t.w >temp; ratfor wcnt.r >wcnt.f; rm <temp
get /src/xch.tcs t.w; ar xv t.w >temp; ratfor xch.r >xch.f; rm <temp
get /src/xfind.tcs t.w; ar xv t.w >temp; ratfor xfind.r >xfind.f; rm <temp
get /src/xref.tcs t.w; ar xv t.w >temp; ratfor xref.r >xref.f; rm <temp
get /rsx/addr.tcs t.w; ar xv t.w >temp; ratfor addr.r >addr.f; rm <temp
get /rsx/chd.tcs t.w; ar xv t.w >temp; ratfor chd.r >chd.f; rm <temp
get /rsx/lsd.tcs t.w; ar xv t.w >temp; ratfor lsd.r >lsd.f; rm <temp
get /rsx/mcrbck.tcs t.w; ar xv t.w >temp; ratfor mcrbck.r >mcrbck.f; rm <temp
get /rsx/mkd.tcs t.w; ar xv t.w >temp; ratfor mkd.r >mkd.f; rm <temp
get /rsx/mubld.tcs t.w; ar xv t.w >temp; ratfor mubld.r >mubld.f; rm <temp
get /rsx/objfix.tcs t.w; ar xv t.w >temp; ratfor objfix.r >objfix.f; rm <temp
get /rsx/prd.tcs t.w; ar xv t.w >temp; ratfor prd.r >prd.f; rm <temp
get /rsx/whereis.tcs t.w; ar xv t.w >temp; ratfor whereis.r >whereis.f; rm <temp
rm t.w temp
cat /doc/sect1 >sect1
cat /doc/sect2 >sect2
cat /doc/sect3 >sect3
cat /doc/sect4 >sect4
cat /src/smalldict >dict
