#! /bin/sh
#*****************************************
#*   D S T W A V  compilation script - NRB     
#*****************************************
#
if [ ! -f macproc.o ]
then
echo "macproc object module needs to be (re-)created!"
f77 -c -o macproc.o macproc.f
fi
#
if [ ! -f colalg.o -o ! -f dwmods.o ]
then
cat > specs << eof
+     MACRO SPECIFICATIONS TOP SECTION
*     PROG = 'DSTWAV'
*     MACHINE = 'DEFAULT'
+ NB:  IBM rather than DEFAULT where INTEGER*2 is available!
*     PRECSN = 'DOUBLE'
+++++ PRECSN = 'SINGLE'
*     TIMES = 'OFF'
+     PACK = 'ON'
+ NB: PACK  is only for CRAY machines!
*     NAG = 'OFF'
+
PRINT 0
eof
cat > prompt << eof
'source.f'
'specs'
'macspecs'
'source'
eof
f77 macproc.o
#
if [ ! -f colalg.o ]
then
cp colalg.u source
a.out < prompt
f77 -O3 -c -o colalg.o source.f
rm source.f
echo " colalg.o now recompiled."
fi # ---------------------------
if [ ! -f dwmods.o ]
then
cp dwmods.u  source
a.out < prompt
f77 -O3 -c -o dwmods.o source.f
rm source.f
echo " dwmods.o now recompiled."
fi # ---------------------------
rm specs prompt source a.out
f77 -O3 dwmods.o colalg.o -o dstwav.x 
#-lnag
rm dwmods.o colalg.o
echo " dstwav.x recompilation complete."
fi # ===================================
#
# Uncomment to RUN
#rm dwout
#dstwav.x <dwin >dwout
#mv fort.7 DW_kmat
exit