OpenAD/code/cb2m2.bash

for i in `ls *_mod.h | sed 's/\(.*\)_mod\.h/\1/'`
do 
   echo "look for: $i " 
   for j in `egrep -l "include *\"$i" *.F`
   do 
     echo " in file: $j"
     echo  "s/include *\(\"${i}.h\"\)/include \"${i}_mod.h\"/" > script.sed
     cat $j | sed -f script.sed | sed 's/IMPLICIT NONE//' | sed 's/implicit none//' > $j.1
     mv $j.1 $j
  done     
done
1	for i in `ls _mod.h \| sed 's/\(.\)_mod\.h/\1/'`
2	do
3	echo "look for: $i "
4	for j in `egrep -l "include \"$i" .F`
5	do
6	echo " in file: $j"
7	echo "s/include *\(\"${i}.h\"\)/include \"${i}_mod.h\"/" > script.sed
8	cat $j \| sed -f script.sed \| sed 's/IMPLICIT NONE//' \| sed 's/implicit none//' > $j.1
9	mv $j.1 $j
10	done
11	done