#!/bin/csh
#
set echo
#
mkdir temp
#
cd temp
#
#  Split the original source code into individual files.
#
fsplit ../matman.f
#
cat matman.f > matman1.for
rm matman.f
mv matman1.for ..
#
cat a*.f b*.f c*.f > matman2.for
rm a*.f b*.f c*.f
mv matman2.for ..
#
cat d*.f e*.f f*.f > matman3.for
rm d*.f e*.f f*.f
mv matman3.for ..
#
cat h*.f i*.f la*.f ld*.f le*.f > matman4.for
rm h*.f i*.f la*.f ld*.f le*.f
mv matman4.for ..
#
cat lp*.f > matman5.for
rm lp*.f
mv matman5.for ..
#
cat m*.f n*.f p*.f r*.f > matman6.for
rm m*.f n*.f p*.f r*.f
mv matman6.for ..
#
cat s*.f t*.f > matman7.for
rm s*.f t*.f
mv matman7.for ..
#
#  There should be no files left in this temporary
#  subdirectory.
#
ls -la
cd ..
rmdir temp
