#!/bin/sh
set -e
# subtract dhf_fslo from dhf_olrc

if [ $# -ne 3 ] ; then
  echo "Error in $0: invalid number of arguments $#"
  exit 1
fi

pfx=$1
inp1=$2
out=$3

mtype=`uname -s|tr '[A-Z]' '[a-z]'`
case $mtype in
    aix) BINDIR=~ccc101/gcm2nc/cmip5_scripts/bin_aix ;;
  linux) BINDIR=~ccc101/gcm2nc/cmip5_scripts/bin_linux ;;
      *) echo "Unkown kernel type $mtype"
         exit 1 ;;
esac
PATH="${BINDIR}:$PATH"
export PATH

access olrc ${pfx}_${inp1}
access fslo sa_extract_fslo_1979_1979_dhf_fslo

gsubl olrc fslo ${pfx}_${out}

release olrc fslo