#!/bin/csh
# gsocco -- function-set openclose-closeopen of a gray-level image

set argc = ($*)

if ( "$#argc" < "1" ) then
   echo "usage:  gsocco RasFileIn  RasFileOut  SE_spec"
   exit 
endif

morph <$1 >$1.ox -m o -i g -s g -o f -k $3 $4 $5 $6
morph <$1.ox >$1.ocx -m o -i g -s g -o f -k $3 $4 $5 $6
morph <$1 >$1.cx -m c -i g -s g -o f -k $3 $4 $5 $6
morph <$1.cx >$1.cox -m o -i g -s g -o f -k $3 $4 $5 $6
linco 0.5 $1.ocx 0.5 $1.cox -o $2
rm -fr $1.ox $1.cx $1.ocx $1.cox
 


