# This shell script is designed to search recursively through the
# WEPS source directory structure looking for "strings" in *.for,
# *.inc and *.fi files.

# It has been tested under "tcsh" shell on Unix
# Probably should also work in the CYGWIN environment also
# but haven't tested it yet.

# Use "rgrep.sh" under Thompson Toolkit.

# LEW

find . \( -name '*.for' -o -name '*.f95' -o -name '*.inc' -o -name '*.fi' \) -type f -exec grep -l "$*" {} \;