# VERTCON 3 build script for region:  VI
# 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
#      (You do NOT run doit3.bat nor doit4.bat for the VI region)
# It calls various standard "grid manipulation" programs to create "flat plate" transformations,
# and "flat plane" error grids, surrounding two of the three U.S. Virgin Islands.  The third,
# St. John, gets no transformation as it has no data.  Anything outside of St. Thomas or
# St. Croix gets 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
294.9
296
67
17
19
121
viflag.b
-999.d0
!
#
# Step 2: Create "flat plane" (constant) transformation for St. Thomas
#
gfill << !
1
294.9333333333333333333333333333333333333333333
295.1833333333333333333333333333333333333333333
16
18.3
18.4
7
vi01.b
0.2407d0
!
#
# Step 3: Create "flat plane" (constant) transformation for St. Croix
#
gfill << !
1
295.0666666666666666666666666666666666666666666
295.4666666666666666666666666666666666666666666
25
17.66666666666666666666666666666666666666666666
17.8
9
vi02.b
0.0787d0
!
#
# Step 4: Drop (splat) the St. Thomas part into the full size flag-filled grid
#
gsplat << !
viflag.b
vi01.b
vi03.b
!
#
# Step 5: Drop (splat) the St. Croix part into the grid from step 4
#
gsplat << !
vi03.b
vi02.b
lt.vivd09.vi.trn.b
!
##########################
# Error Grid (uses same "flag" grid as transformation):
##########################
#
# Step 1: Create "flat plane" (constant) error grid for St. Thomas
#
gfill << !
1
294.9333333333333333333333333333333333333333333
295.1833333333333333333333333333333333333333333
16
18.3
18.4
7
vi01e.b
0.0136d0
!
#
# Step 2: Create "flat plane" (constant) error grid for St. Croix
#
gfill << !
1
295.0666666666666666666666666666666666666666666
295.4666666666666666666666666666666666666666666
25
17.66666666666666666666666666666666666666666666
17.8
9
vi02e.b
0.1643d0
!
#
# Step 3: Drop (splat) the St. Thomas part into the full size flag-filled grid
#
gsplat << !
viflag.b
vi01e.b
vi03e.b
!
#
# Step 4: Drop (splat) the St. Croix part into the grid from step 3
#
gsplat << !
vi03e.b
vi02e.b
lt.vivd09.vi.err.b
!
##########################
# Clean Up
##########################
#
# Step 1: Remove preliminary files
#
rm -f vi01.b
rm -f vi02.b
rm -f vi03.b
rm -f vi01e.b
rm -f vi02e.b
rm -f vi03e.b
rm -f viflag.b