1 |
#!/bin/bash |
2 |
OADTOOLS=`awk '{print $1 }' < oadtempflile` |
3 |
echo "#generated file" > temp.sed |
4 |
for i in `grep '^ *SUBROUTINE ' $1 | awk '{print $2}'` |
5 |
do |
6 |
# extract the name |
7 |
srName=${i%%\(*} |
8 |
echo "/^ *SUBROUTINE $srName(/i\\" >> temp.sed |
9 |
case "$srName" in |
10 |
"OpenAD_main_do_loop" ) |
11 |
echo "c\$openad XXX Template $OADTOOLS/ad_template.revolve.f" >> temp.sed |
12 |
;; |
13 |
"OpenAD_cg2d" ) |
14 |
echo "c\$openad XXX Template $OADTOOLS/ad_template.sa_cg2d.f" >> temp.sed |
15 |
;; |
16 |
"OpenAD_exch1_rl" | \ |
17 |
"OpenAD_exch1_rs" | \ |
18 |
"OpenAD_global_max_r8" | \ |
19 |
"OpenAD_global_sum_r8" ) |
20 |
tmpName=${srName#OpenAD_} |
21 |
echo "c\$openad XXX Template $OADTOOLS/ad_template.${tmpName}.f" >> temp.sed |
22 |
;; |
23 |
*) |
24 |
echo "test $OADTOOLS" |
25 |
echo "c\$openad XXX Template $OADTOOLS/ad_template.split.f" >> temp.sed |
26 |
;; |
27 |
esac |
28 |
done |
29 |
cat $1 | sed -f temp.sed > $2 |
30 |
|