/[MITgcm]/MITgcm/tools/OAD_support/insertTemplateDir.bash
ViewVC logotype

Annotation of /MITgcm/tools/OAD_support/insertTemplateDir.bash

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.14 - (hide annotations) (download)
Fri Jul 3 21:33:55 2015 UTC (8 years, 9 months ago) by heimbach
Branch: MAIN
CVS Tags: checkpoint65r, checkpoint65s, checkpoint65p, checkpoint65q, checkpoint65t, checkpoint65u, checkpoint65n, checkpoint65o
Changes since 1.13: +7 -0 lines
Merge and update from Krishna Narayanan's contrib area:
o genmake2 flag -diva (but only for OpenAD)
o required modifs for OAD_support

1 jmc 1.3 #! /usr/bin/env bash
2     OADTOOLS=`dirname $0`
3     #OADTOOLS=`awk '{print $1 }' < oadtempflile`
4 heimbach 1.1 echo "#generated file" > temp.sed
5     for i in `grep '^ *SUBROUTINE ' $1 | awk '{print $2}'`
6 jmc 1.3 do
7 heimbach 1.1 # extract the name
8     srName=${i%%\(*}
9     echo "/^ *SUBROUTINE $srName(/i\\" >> temp.sed
10 jmc 1.3 case "$srName" in
11 utke 1.2 "OpenAD_main_do_loop" )
12 heimbach 1.14 if [ -z ${ALLOW_OPENAD_DIVA+x} ]; then
13     echo "c\$openad XXX Template ad_template.revolve.f" >> temp.sed
14     else
15     echo "c\$openad XXX Template ad_template.regular.f" >> temp.sed
16     fi
17     ;;
18     "OpenAD_inner_do_loop" )
19 jahn 1.4 echo "c\$openad XXX Template ad_template.revolve.f" >> temp.sed
20 heimbach 1.1 ;;
21 jmc 1.3 "OpenAD_cg2d" )
22 jahn 1.4 echo "c\$openad XXX Template ad_template.sa_cg2d.f" >> temp.sed
23 heimbach 1.1 ;;
24 utke 1.7 "OpenAD_streamice_cg_solve" )
25     echo "c\$openad XXX Template ad_template.streamice_cg_solve.f" >> temp.sed
26     ;;
27 heimbach 1.11 "OpenAD_active_read_xyz" )
28     echo "c\$openad XXX Template ad_template.active_read_xyz.f" >> temp.sed
29     ;;
30 heimbach 1.8 "OpenAD_active_read_xy" )
31 heimbach 1.9 echo "c\$openad XXX Template ad_template.active_read_xy.f" >> temp.sed
32 heimbach 1.8 ;;
33 heimbach 1.10 "OpenAD_active_write_xy" )
34     echo "c\$openad XXX Template ad_template.active_write_xy.f" >> temp.sed
35     ;;
36 dgoldberg 1.12 "OpenAD_streamice_vel_phistage" )
37     echo "c\$openad XXX Template ad_template.streamice_vel_phistage.f" >> temp.sed
38     ;;
39     "OpenAD_streamice_get_fp_err_oad" )
40     echo "c\$openad XXX Template ad_template.streamice_get_fp_err_oad.f" >> temp.sed
41     ;;
42 dgoldberg 1.13 "OpenAD_streamice_get_vel_resid_err_oad" )
43     echo "c\$openad XXX Template ad_template.streamice_get_vel_resid_err_oad.f" >> temp.sed
44     ;;
45 heimbach 1.1 "OpenAD_exch1_rl" | \
46     "OpenAD_exch1_rs" | \
47 jmc 1.3 "OpenAD_global_max_r8" | \
48 jahn 1.5 "OpenAD_global_sum_r8" | \
49     "OpenAD_global_sum_tile_rl" )
50 heimbach 1.1 tmpName=${srName#OpenAD_}
51 jahn 1.4 echo "c\$openad XXX Template ad_template.${tmpName}.f" >> temp.sed
52 heimbach 1.1 ;;
53 jmc 1.3 *)
54 jahn 1.4 echo "c\$openad XXX Template ad_template.split.f" >> temp.sed
55 heimbach 1.1 ;;
56     esac
57     done
58     cat $1 | sed -f temp.sed > $2

  ViewVC Help
Powered by ViewVC 1.1.22