#
#	this scripts builds the archive for section 1 of the
#	manual into this directory.  It assumes that the .tcs files are
#	in directories /src and /rsx on this disk.
#
rm sect1
ls /src/.tcs |@
ch "%?*$" "get /src/& >t.w; ar t t.w | find .fmt | args ar xv t.w" | sh -v
ls /rsx/.tcs |@
ch "%?*$" "get /rsx/& >t.w; ar t t.w | find .fmt | args ar xv t.w" | sh -v
rm esh.fmt d.fmt e.fmt
ls .fmt | ch .fmt | tee temp | ch "%?*$" "format &.fmt >&" | sh -v
sort temp | ar uv sect1 - | ch "%?*$" "&@n&.fmt" | rm
rm temp t.w