run_timer

#
echo " "
echo " =>executing: run_timer"
echo " "
#
#  script for testing the "timer.F" module
#
# the following options may also be set
#set OPTIONS ='-Ddebug_timer -Ddebug_tictoc_nesting -Dshow_tictocs'
# if executing on SGI, use -Dsgi
# if executing on CRAY YMP, use -Dcray_ymp
# use cf77 on CRAY YMP and f77 on workstations


set MOM2 = /home/rcp/MOM_2  # base model code
set WORK = TEMP_DIR         # temp directory

if (! -r timer.F) then
  echo '=>Error: "timer.F" is not in this UPDATES directory'
  exit
endif

echo "=>Grabbing sources from $MOM2"
mkdir $WORK
cd $WORK
set list = (stdunits.h timer.h)
foreach file ($list)
  cp $MOM2/$file .
end
cp ../timer.F .


set case = 'sgi'
#set case = 'cray'

if ($case == 'sgi') then
 echo 'running timer test on sgi'
 
 set COMPILER_OPTIONS = "-O2 -mips2 -r8 -align64 -Olimit 2000"
# set COMPILER_OPTIONS = "-O2  -r8  -Olimit 2000"
# set  COMPILER_OPTIONS = " "
 set OPTIONS = '-Dtest_timer -Dsgi -Dtiming'
 echo "=>compiling..."
 f77 -P $OPTIONS timer.F; f77 $COMPILER_OPTIONS -o a.out timer.i
 echo "=> running...results are being written to results_sgi_timer"
 a.out > ../results_sgi_timer
endif

if ($case == 'cray') then
 echo 'running timer test on cray ymp'

 set OPTIONS = '-Dtest_timer -Dcray_ymp -Dtiming'
 echo "=>compiling..."
 cf77 -Zv -P $OPTIONS timer.F; cf77 -Zv timer.i
 echo "=> running...results are being written to results_cray_timer"
 a.out > ../results_cray_timer
endif

cd ../
/bin/rm -r $WORK
echo "Done"