:

INCL_DIR="main strfun service events usr"

for dir in $INCL_DIR 
do
   grep -ni  $1 $dir/*.f
done
