# VERTCON 3 build script for region:  GUAM
# See DRU-12, p. 143-145
#
# This batch file is to be run AFTER the following scripts have already been run:
#      doit.bat
#      doit2.bat
#      doit3.bat
#      doit4.bat
# It calls various standard "grid manipulation" programs to cut out 
# the "pulled in tension" transformation and error grids around the 
# island of Guam itself, and fill in the 
# rest of the region with flag "-999.0"
#
# All code used is listed below:
#  /home/dru/Linux/Mylib/gfill    (Source:  /home/dru/Linux/Mylib/Source/gfill.f)
#  /home/dru/Linux/Mylib/gpull    (Source:  /home/dru/Linux/Mylib/Source/gpull.f)
#  /home/dru/Linux/Mylib/gsplat   (Source:  /home/dru/Linux/Mylib/Source/gsplat.f)
#                          
##########################
# Transformation:
##########################
#
# Step 1:  Fill in the full grid area with flag -999.d0 at 1' x 1' spacing
#
gfill << !
1
143
147  
241
12
13.8
109
guamflag.b
-999.d0
!
#
# Step 2: Pull a tight box "near Guam" from the actual transformation grid out of the 
# full "04.b" grid 
#
gpull << !
vmtcdoht.guvd63.guvd04.guam.000.60.60.04.b
guam01.b
13.2
13.7 
144.6
145  
!
#
# Step 3: Drop (splat) the "near Guam" part into the full size flag-filled grid
#
gsplat << !
guamflag.b
guam01.b
guvd63.guvd04.guam.trn.b
!
##########################
# Error Grid (uses same "flag" grid as transformation):
##########################
#
# Step 1: Pull a tight box "near Guam" from the actual error grid out of the 
# full "04.b" grid 
#
gpull << !
vmeteoht.guvd63.guvd04.guam.000.60.60.b
guam01e.b
13.2
13.7 
144.6
145  
!
#
# Step 2: Drop (splat) the "near Guam" part into the full size flag-filled grid
#
gsplat << !
guamflag.b
guam01e.b
guvd63.guvd04.guam.err.b
!
##########################
# Clean Up
##########################
#
# Step 1: Remove preliminary files
#
rm -f guam01.b
rm -f guam01e.b
rm -f guamflag.b