#!/bin/csh
#
# strmid.src - script for emulating idl strmid function
# (break string into substring)
#
# Calling Sequence:
#       strmid.src string stpos nchar			#prints result
#	set substr=`strmid.src string stpos nchar	#set to variable
#
#      	string - source string
#	stpos  - start position for extraction
#	nchar  - number of characters     
#
# Restrictions:
#    assumes DIR_GEN_SCRIPT contains strmid.awk (awk script to do substring)
echo $1 $2 $3 | awk -f $DIR_GEN_SCRIPT/strmid.awk
exit
