| 932 |
fi |
fi |
| 933 |
let modsCount=modsCount+1 |
let modsCount=modsCount+1 |
| 934 |
done |
done |
| 935 |
if test modsCount -gt 1 ; then |
if test $modsCount -gt 1 ; then |
| 936 |
echo "ERROR: some uses of MODS break with more than one directory specified" |
echo "ERROR: some uses of MODS break with more than one directory specified" |
| 937 |
exit -1; |
exit -1; |
| 938 |
fi |
fi |
| 1908 |
if test -z "$toBeIgnored" ; then |
if test -z "$toBeIgnored" ; then |
| 1909 |
echo " \\" >> nonADF77srclist.tmp |
echo " \\" >> nonADF77srclist.tmp |
| 1910 |
printf " $sf" >> nonADF77srclist.tmp |
printf " $sf" >> nonADF77srclist.tmp |
| 1911 |
|
else |
| 1912 |
|
echo "Ignoring $sf" |
| 1913 |
fi |
fi |
| 1914 |
fi |
fi |
| 1915 |
;; |
;; |
| 1940 |
done |
done |
| 1941 |
rm -rf .links.tmp |
rm -rf .links.tmp |
| 1942 |
echo "" >> F77srclist.tmp |
echo "" >> F77srclist.tmp |
| 1943 |
|
for i in `cat ${MODS}/keepOriginal` |
| 1944 |
|
do |
| 1945 |
|
echo " \\" >> nonADF77srclist.tmp |
| 1946 |
|
printf " $i" >> nonADF77srclist.tmp |
| 1947 |
|
done |
| 1948 |
echo "" >> nonADF77srclist.tmp |
echo "" >> nonADF77srclist.tmp |
| 1949 |
echo "" >> csrclist.tmp |
echo "" >> csrclist.tmp |
| 1950 |
echo "" >> F90srclist.tmp |
echo "" >> F90srclist.tmp |
| 2295 |
OpenAD_tape.f90 |
OpenAD_tape.f90 |
| 2296 |
|
|
| 2297 |
OPENAD_SUPPORT_C_SRC_FILES = \ |
OPENAD_SUPPORT_C_SRC_FILES = \ |
| 2298 |
iaddr.c |
iaddr.c \ |
| 2299 |
|
timeRatio.c |
| 2300 |
|
|
| 2301 |
f95_test_mods.f90: \$(OPENAD_SUPPORT_F90_SRC_FILES) |
f95_test_mods.f90: \$(OPENAD_SUPPORT_F90_SRC_FILES) |
| 2302 |
cat \$^ > \$@ |
cat \$^ > \$@ |
| 2379 |
|
|
| 2380 |
# XAIF -> XAIF' |
# XAIF -> XAIF' |
| 2381 |
ad_input_code_sf.w2f.canon.xb.xaif : ad_input_code_sf.w2f.canon.xaif xaif.xsd xaif_base.xsd xaif_inlinable_intrinsics.xsd xaif_derivative_propagator.xsd xaif_output.xsd openad_adm |
ad_input_code_sf.w2f.canon.xb.xaif : ad_input_code_sf.w2f.canon.xaif xaif.xsd xaif_base.xsd xaif_inlinable_intrinsics.xsd xaif_derivative_propagator.xsd xaif_output.xsd openad_adm |
| 2382 |
./openad_adm -i \$< -c \${XAIFSCHEMAROOT}/schema/examples/inlinable_intrinsics.xaif -o \$@ -I -r |
./openad_adm -i \$< -c \${XAIFSCHEMAROOT}/schema/examples/inlinable_intrinsics.xaif -o \$@ -I -r -p "recip_hFacC recip_rA" |
| 2383 |
|
|
| 2384 |
# XAIF' -> WHIRL' |
# XAIF' -> WHIRL' |
| 2385 |
ad_input_code_sf.w2f.canon.xb.x2w.B : ad_input_code_sf.w2f.canon.xb.xaif xaif2whirl |
ad_input_code_sf.w2f.canon.xb.x2w.B : ad_input_code_sf.w2f.canon.xb.xaif xaif2whirl |
| 2411 |
# and remove for now the duplicate variables |
# and remove for now the duplicate variables |
| 2412 |
# and fix 2 data statements |
# and fix 2 data statements |
| 2413 |
ad_input_code.w2f.canon.xb.x2w.w2f.rs.pp.f: ad_input_code_sf.w2f.canon.xb.x2w.w2f.rs.pp.f ${MODS}/fixData.sed |
ad_input_code.w2f.canon.xb.x2w.w2f.rs.pp.f: ad_input_code_sf.w2f.canon.xb.x2w.w2f.rs.pp.f ${MODS}/fixData.sed |
| 2414 |
cat \$< | sed '/MODULE /,/END MODULE/d' | sed '/^ INTEGER(w2f__i4) DOLOOP_UB/d' | sed -f ${MODS}/fixData.sed > \$@ |
# cat \$< | sed '/MODULE /,/END MODULE/d' | sed '/^ INTEGER(w2f__i4) DOLOOP_UB/d' | sed -f ${MODS}/fixData.sed > \$@ |
| 2415 |
|
cat \$< | sed '/MODULE /,/END MODULE/d' | sed '/^ INTEGER(w2f__i4) DOLOOP_UB/d' > \$@ |
| 2416 |
|
|
| 2417 |
# setup some links |
# setup some links |
| 2418 |
%.xsd: |
%.xsd: |