comment Test One for demo program one.
comment http://www.cc.utah.edu/~nahaj/cave/survey/code/demo1-testdata.txt
comment
comment ===================== TESTS ===============================
comment Pin a point down, no shots.
echo 
0 1  1 2 3
end
comment The adjustement above should have just set the first
comment location to  [ 1 2 3 ]'
comment ======================== Test two ==========================
comment Test: Pin point with weights.
echo
0 1  1 2 3  20 30 40   11 12 13
end
comment The adjustement above should have just set the first
comment location to  [ 1 2 3 ]'
comment ======================== New test ========================
comment Test: one shot survey with pin down.
echo
# Let us try to pin one point down, and shot to another.
0 1  10  20  30
1 2 100 200 300
end
comment The adjustment above should have returned
comment  [  10  20  30 ]'
comment  [ 110 220 330 ]'
comment ======================== New test ========================
comment Test: one shot survey with full weighted pin down.
echo
# Let us try to pin one point down, and shot to another.
0 1  10  20  30    10 20 30   11 12 13
1 2 100 200 300    91 92 93   41 42 42
end
comment The adjustment above should have returned
comment  [  10  20  30 ]'
comment  [ 110 220 330 ]'
comment ====================  New Test  =====================
echo
0     1    0 0 0 # Just tie the first shot to the origin.
1     2    10.0       0.0     0.0   # This is an east shot.
2     3     0.0      10.0     0.0   # This is a north shot.
3     4     0.0       0.0    10.0   # Straight up.
end
comment The above should have returned:
comment [ 10.0   0.0   0.0 ]'
comment [ 10.0  10.0   0.0 ]'
comment [ 10.0  10.0  10.0 ]'
comment ======================= New Test =============================
echo
# Try trivial average
0 1  0 0 0  # Tie first shot down.
1 2  10 10 10
1 2  20 20 20
end
comment The above should have returned:
comment [  0  0  0 ]'
comment [ 15 15 15 ]'
comment =============================
echo
# Try trivial weighted average
0 1  0 0 0  # Tie first shot down.
1 2  10 10 10 3
1 2  20 20 20 1
end
comment The above should have returned:
comment [  0    0    0 ]'
comment [ 12.5 12.5 12.5]'
comment  AND NOW... we just abort.
END