#! /bin/sh
# Shell script for running the large HeatedRod systems to compare
# four integration methods.
# Usage example: Run 100 0.25 runf the 100 segment example at interval 0.25

###############################################################
## Version control history
###############################################################
## $Id$
## $Log$
## Revision 1.1  1998/08/15 13:58:27  peterg
## Initial revision
##
###############################################################


n=$1
DT=$2

if [ -z "$n" ]; then

MinSTEPFACTOR=`awk '{if ($1=="STEPFACTOR") print $3}' HR$1.tmp1`
SparseSTEPFACTOR=`awk '{if ($1=="SparseSTEPFACTOR") print $3}' HR$1.tmp1`

rm -f HR$1_table.txt

#Set the methods of interest
METHODS='ImplicitS Euler ImplicitL Implicit'
METHODS='ImplicitS Euler Implicit'

for METHOD in $METHODS; do

case $METHOD in
    Euler)
		STEPFACTOR=$MinSTEPFACTOR
	;;