tools/OAD_support/insertTemplateDir.bash

b1a3936b07 Jean*0001 #! /usr/bin/env bash
                0002 OADTOOLS=`dirname $0`
                0003 #OADTOOLS=`awk '{print $1 }' < oadtempflile`
8702af1f36 Patr*0004 echo "#generated file" > temp.sed
                0005 for i in `grep '^ *SUBROUTINE ' $1 | awk '{print $2}'`
b1a3936b07 Jean*0006 do
8702af1f36 Patr*0007   # extract the name
                0008   srName=${i%%\(*}
                0009   echo "/^ *SUBROUTINE $srName(/i\\" >> temp.sed
b1a3936b07 Jean*0010   case "$srName" in
b6f3d01b24 Jean*0011     "OpenAD_main_do_loop" )
279dc77b07 Patr*0012       if [ -z ${ALLOW_OPENAD_DIVA+x} ]; then
                0013         echo "c\$openad XXX Template ad_template.revolve.f" >> temp.sed
                0014       else
                0015         echo "c\$openad XXX Template ad_template.regular.f" >> temp.sed
                0016       fi
                0017       ;;
c0f596383c Dani*0018     "OpenAD_streamice_cg_make_a" )
                0019       echo "c\$openad XXX Template ad_template.split_non_anonymous.f" >> temp.sed
                0020       ;;
279dc77b07 Patr*0021     "OpenAD_inner_do_loop" )
01e0754d66 Oliv*0022       echo "c\$openad XXX Template ad_template.revolve.f" >> temp.sed
8702af1f36 Patr*0023       ;;
b1a3936b07 Jean*0024     "OpenAD_cg2d" )
01e0754d66 Oliv*0025       echo "c\$openad XXX Template ad_template.sa_cg2d.f" >> temp.sed
8702af1f36 Patr*0026       ;;
1e77278c1c Jean*0027     "OpenAD_streamice_cg_solve" )
                0028       echo "c\$openad XXX Template ad_template.streamice_cg_solve.f" >> temp.sed
                0029       ;;
6f5d7c9095 Patr*0030     "OpenAD_active_read_xyz" )
                0031       echo "c\$openad XXX Template ad_template.active_read_xyz.f" >> temp.sed
                0032       ;;
1a5e3fa960 Patr*0033     "OpenAD_active_read_xy" )
7a4f8cc4d9 Patr*0034       echo "c\$openad XXX Template ad_template.active_read_xy.f" >> temp.sed
1a5e3fa960 Patr*0035       ;;
4a33dbfb87 Patr*0036     "OpenAD_active_write_xy" )
                0037       echo "c\$openad XXX Template ad_template.active_write_xy.f" >> temp.sed
                0038       ;;
7fd2fa3bc2 Patr*0039     "OpenAD_dummy_in_stepping" )
                0040       echo "c\$openad XXX Template ad_template.dummy_in_stepping.f" >> temp.sed
                0041       ;;
847eec441b Dani*0042     "OpenAD_streamice_vel_phistage" )
                0043       echo "c\$openad XXX Template ad_template.streamice_vel_phistage.f" >> temp.sed
                0044       ;;
                0045     "OpenAD_streamice_get_fp_err_oad" )
                0046       echo "c\$openad XXX Template ad_template.streamice_get_fp_err_oad.f" >> temp.sed
                0047       ;;
eec2e0d4b3 Dani*0048     "OpenAD_streamice_get_vel_resid_err_oad" )
                0049       echo "c\$openad XXX Template ad_template.streamice_get_vel_resid_err_oad.f" >> temp.sed
                0050       ;;
736069790d Dani*0051     "OpenAD_streamice_invert_surf_forthick" )
                0052       echo "c\$openad XXX Template ad_template.streamice_invert_surf_forthick.f" >> temp.sed
                0053       ;;
                0054     "OpenAD_streamice_smooth_adjoint_field" )
                0055       echo "c\$openad XXX Template ad_template.streamice_smooth_adjoint_field.f" >> temp.sed
                0056       ;;
8702af1f36 Patr*0057     "OpenAD_exch1_rl" |          \
                0058     "OpenAD_exch1_rs" |          \
b1a3936b07 Jean*0059     "OpenAD_global_max_r8" |     \
f3dcb81513 Oliv*0060     "OpenAD_global_sum_r8" |     \
                0061     "OpenAD_global_sum_tile_rl" )
8702af1f36 Patr*0062       tmpName=${srName#OpenAD_}
01e0754d66 Oliv*0063       echo "c\$openad XXX Template ad_template.${tmpName}.f" >> temp.sed
8702af1f36 Patr*0064       ;;
b1a3936b07 Jean*0065     *)
01e0754d66 Oliv*0066       echo "c\$openad XXX Template ad_template.split.f" >> temp.sed
8702af1f36 Patr*0067       ;;
                0068   esac
                0069 done
                0070 cat $1 | sed -f temp.sed > $2