| 1 |
utke |
1.1 |
#!/bin/bash |
| 2 |
|
|
file=$1 |
| 3 |
|
|
cp ${file} ${file}.tmp |
| 4 |
|
|
for includeFile in `egrep "\# *include *\"" ${file} | sed 's/# *include *\"\(.*\)\"/\1/'` |
| 5 |
|
|
do |
| 6 |
|
|
modFileName=${includeFile%.h}_mod.h |
| 7 |
|
|
if [ -f ${modFileName} ] |
| 8 |
|
|
then |
| 9 |
|
|
echo "s/\# *include *\(\"${includeFile}\"\)/\#include \"${modFileName}\"/" > temp.sed |
| 10 |
|
|
cat ${file}.tmp | sed -f temp.sed | sed 's/IMPLICIT NONE//' | sed 's/implicit none//' > ${file}.tmp.1 |
| 11 |
|
|
mv ${file}.tmp.1 ${file}.tmp |
| 12 |
|
|
fi |
| 13 |
|
|
done |
| 14 |
|
|
mv ${file}.tmp ${file%.F}_cb2m.FF90 |