vectors.m

it is a source code for geodesy

%  Ashtech Z-12 receiver observations made by 3-year's
%  students at Aalborg University June 1994
A = [...
  48    11        -868.520    770.266    467.497;
	1     7        1250.141    552.787   -887.448;
	1     7        1250.151    552.779   -887.452;
	1     7        1250.158    552.776   -887.476;
	1    12 	       849.403   1328.909   -727.271;
	1    10        1124.855   1079.926   -872.555;
	1    28        1504.338     35.901   -988.346;
	1    40        1468.097    403.749  -1008.776;
	1    29        1395.419    687.513   -997.007;
	1    30        1310.008    900.875   -967.752;
	1    39        1563.881    -74.800  -1016.707;
	1    41        1245.848   1152.174   -958.046;
	1     8        1519.458    628.723  -1069.528;
	1     9        1433.933    879.615  -1046.370;
	1    42        1244.098   1264.868   -970.778;
	1     2        1697.661   -247.158  -1080.437;
	1     3        1695.506    149.016  -1126.160;
	1     3        1695.505    149.015  -1126.163;
	1    47        1369.230   1127.636  -1033.189;
	1    47        1369.228   1127.641  -1033.188;
	1    47        1369.233   1127.634  -1033.194;
	1    11        1242.868   1376.617   -982.106;
	1    11        1242.866   1376.622   -982.102;
	1     4        1864.287      5.704  -1217.730;
	1     4        1864.294      5.703  -1217.726;
	1     6        1876.103    392.863  -1273.842;
	1     6        1876.108    392.864  -1273.856;
	1    23        1935.607    712.642  -1346.462;
	1    48        2111.399    606.354  -1449.592;
	1    48        2111.421    606.370  -1449.580;
	1    24        2179.910    703.212  -1505.166;
	1    24        2179.923    703.202  -1505.175;
	1    21        2327.484   -175.164  -1500.031;
	1    36        2153.971    917.583  -1514.959;
	1    25        2281.471    520.543  -1547.823;
	1    25        2281.475    520.550  -1547.835;
	1    38        2117.896   1174.536  -1516.260;
	1    17        1928.758   1606.799  -1439.527;
	1    43        1987.630   1601.871  -1478.169;
	1    37        2078.397   1458.876  -1525.628;
	1    16        1979.422   1717.389  -1482.366;
	1    18        2252.273   1202.786  -1605.624;
	1    31        1836.346   1940.101  -1417.976;
	1     5        2589.726     51.385  -1688.454;
	1     5        2589.748     51.396  -1688.433;
	1     5        2589.764     51.401  -1688.418;
	1    52        1839.643   2082.237  -1433.930;
	1    22        2813.677   -174.710  -1808.645;
	1    15        2407.265   1641.425  -1751.263;
	1    13        2166.814   2148.018  -1643.823;
	1    51        2260.132   2188.548  -1710.358;
	1    50        2428.594   1956.848  -1792.071;
	1    26        2957.978    612.899  -1995.724;
	1    26        2957.998    612.897  -1995.710;
  49    46        1933.282  -3000.313   -836.857;
	1    19        2802.472   1412.296  -1989.104;
	1    45        2847.950   1399.258  -2017.498;
	1    35        2978.246   1021.025  -2056.973;
	1    46        1952.046   2813.216  -1565.966;
	1    20        2937.218   1167.642  -2046.896;
	1    20        2937.227   1167.637  -2046.915;
	1    44        2937.655   1178.460  -2048.946;
	1    33        2646.378   1956.765  -1934.372;
	1    34        2794.417   1670.026  -2002.732;
	1    27        3129.000    732.614  -2116.194;
	1    32        2618.270   2115.210  -1929.245;
	1    14        2552.201   2268.933  -1901.908;
  49    52        1820.884  -3731.298   -704.829;
  49    31        1817.598  -3873.428   -688.882;
  54    13        2148.126  -3665.570   -914.771;
  49    51        2241.395  -3624.968   -981.236;
  54    14        2533.510  -3544.662  -1172.844;
  54    12       	830.717  -4484.684	1.800;
  49    16        1960.674  -4096.145   -753.261;
  49    11        1224.102  -4436.912   -253.007;
  54    11        1224.184  -4436.969   -253.037;
  49    50        2409.854  -3856.678  -1062.949;
  49    17        1910.010  -4206.733   -710.416;
  49    32        2599.526  -3698.315  -1200.125;
  49    43        1968.877  -4211.660   -749.098;
  49    42        1225.331  -4548.661   -241.675;
  49    33        2627.634  -3856.783  -1205.257;
  49    41        1227.081  -4661.359   -228.979;
  54    10        1106.171  -4733.660   -143.515;
  49    37        2059.635  -4354.653   -796.526;
  49    47        1350.472  -4685.880   -304.170;
  49    47        1350.479  -4685.896   -304.103;
  49    47        1350.457  -4685.914   -304.091;
  54    15        2388.565  -4172.165  -1022.205;
  54    30        1291.323  -4912.718   -238.682;
  54     9        1415.247  -4933.968   -317.306;
  49    34        2775.676  -4143.515  -1273.619;
  49    38        2099.157  -4639.000   -787.130;
  49    18        2233.524  -4610.749   -876.522;
  53    29        1376.672  -5126.002   -267.897;
  49    19        2783.732  -4401.229  -1259.977;
  49    36        2135.228  -4895.949   -785.842;
  49    45        2829.180  -4414.282  -1288.416;
  53     7        1231.394  -5260.739   -158.355;
  49     7        1231.416  -5260.741   -158.332;
  49     7        1231.389  -5260.749   -158.380;
  54     8        1500.768  -5184.857   -340.504;
  49    23        1916.852  -5100.884   -617.368;
  49    24        2161.157  -5110.318   -776.055;
  54    24        2161.243  -5110.387   -776.112;
  49    40        1449.340  -5409.780   -279.698;
  49    44        2918.908  -4635.073  -1319.832;
  49    20        2918.456  -4645.900  -1317.787;
  49    20        2918.479  -4645.893  -1317.793;
  49    48        2092.643  -5207.169   -720.498;
  54    48        2092.711  -5207.235   -720.538;
  53     6        1857.356  -5420.658   -544.745;
  49     6        1857.357  -5420.660   -544.743;
  49    35        2959.505  -4792.500  -1327.864;
  49    25        2262.725  -5292.981   -818.726;
  54    25        2262.778  -5293.051   -818.810;
	1    53 	 18.749   5813.524   -729.076;
	1    49 	 18.767   5813.534   -729.079;
	1    49 	 18.762   5813.536   -729.080;
	1    49 	 18.750   5813.534   -729.111;
	1    54 	 18.700   5813.593   -729.052;
  53     3        1676.761  -5664.497   -397.050;
  49     3        1676.752  -5664.519   -397.047;
  53    28        1485.587  -5777.621   -259.251;
  49    39        1545.124  -5888.326   -287.591;
  49    26        2939.225  -5200.630  -1266.619;
  54    26        2939.540  -5200.935  -1266.441;
  53     4        1845.541  -5807.822   -488.632;
  49     4        1845.529  -5807.826   -488.657;
  54    27        3110.311  -5080.982  -1387.116;
  49     2        1678.908  -6060.675   -351.309;
  49     2        1678.888  -6060.693   -351.356;
  49     5        2570.986  -5762.132   -959.333;
  49     5        2571.022  -5762.127   -959.301;
  54     5        2571.049  -5762.201   -959.376;
  49    21        2308.729  -5988.691   -770.940;
  49    22        2794.908  -5988.253  -1079.557];
v_loops(A);
%%%%%%%%%%%%%%%%%% end vectors.m  %%%%%%%%%%%%%%%%%%%