DIRAZM PROGRAM

• Document Type: CREST
• Collection: NGA Records (Formerly NIMA)
• Document Number (FOIA) /ESDN (CREST): CIA-RDP94T00858R000601150001-6
• Release Decision: RIPPUB
• Original Classification: U
• Document Page Count: 10
• Document Creation Date: December 28, 2016
• Document Release Date: March 7, 2008
• Sequence Number: 1
• Publication Date: April 13, 1983
• Content Type: REPORT

Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
ADMINNIS - -) AL C V
DATA CENTER OPERATIONS BRANCH
NDS OPERATIONS PROCEDURE MANUAL APPLICATIONS SOFTWARE
NO. P-D004 13 April 1983
SYMBOLIC TITLE: DIRAZM
PROGRAMMER: STAT
MiNU d6N R S MY
Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6 i I
 1.
Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
APPROVALS
This operations manual has been reviewed and approved by the
following persons:
USE OXLY
Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
STAT
 Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
Page
SUMMARY
INPUT
DATA CARDS
ELLIPSOID CARD
LATITUDE CARD
LONGITUDE CARD
AZIMUTH CARD
UNIT OF DISTANCE CARD
DISTANCE CARD
ARRANGING YOUR CARD DECK
THE OUTPUT
SAMPLE CARD DECK
Approved For Release 2008/03/07: CIA-RDP94TOO858R000601150001-6 i
 Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
UM 0 1111W
Given a pair of points (point 1 and point 2) and given the geodetic latitude
and longitude of point 1, the azimuth from point 1 to point 2, and the distance
from point 1 to point 2, DIRAZM computes and prints--
a. The geodetic latitude and longitude of point 2.
b. The azimuth from point 2 to point 1.
The program can make computations on more than one pair of points.
The following items must be input to DIRAZM for each pair of points.
a. Ellipsoid - Eight ellipsoids are available. You will input the
mnemonic for the ellipsoid you have chosen. The ellipsoid must
be specified for each pair of points. The ellipsoids are listed
below:
WGS-72
WGS-66
WGS-60
KVY
Bessel
Clarke
International
b. Latitude and longitude of point 1. You must input degrees and
direction; you may also input minutes and seconds. Decimal
portions of degrees, minutes and seconds may be input if known.
c. Units of distance - the distance between points 1 and 2 may be
measured in feet, meters, statutory miles, or nautical miles.
d. Azimuth from point 1 to point 2. You must input degrees; you
may also input minutes and seconds.
You will need six data cards for each pair of points. One data card will
indicate the ellipsoid. The remaining five cards will show the latitude of
point 1, the longitude of point 1, the azimuth from point 1 to-point 2, the unit
of distance used in measuring the distance between the two points, and the dis-
tance between point 1 and point 2.
M UG JC `~U~/1 1i`Vg~O ~ ~3~ ^G1s usz- MW
Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
 Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
Begin in column one and punch the mnemonic for the ellipsoid you are using.
You will punch one of the following:
WGS-72
WGS-66
WGS-60
KVY
Bessel
Clarke
International
AMS
A sample card appears below.
0 00000000000000000000000000000000000000000000000000000000000000000000000000000
2 3 4 5 6 7 9 9 10 11 17 13 14 15 16 11 1) 19 70 21 22 23 14 25 26 11 20 29 30 31 31 33 14 35 36 37 38 39 40 41 47 43 44 45 46 41 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 11 72 13 74 15 76 77 10 73 63
This card indicates
for point 1 and one for
the
point
latitude
2.
of
a
point.
You will need a latitude card
Col
1
X if dir is North
Col
2
X if dir is South
Col
3
Degrees
Col
8
Minutes
Col
13
Seconds
00 0 1 10 10 100 10 10090000000000000000000000000000000000000000000000000000000000000
2 3 4 5 6 1 6 9 10 11 12 13 14 15 16 11 b 19 70 21 22 23 24 20 26 21 16 29 30 31 32 33 34 35 36 37 31 39 40 41 47 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 50 6t 62 63 64 65 65 616869 70 11 12 73 14 15 76 71 18 79 68
2
Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
 Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
This card indicates the longitude of a point. You will need a longitude
card for point 1 and one for point 2.
Col
1
X if direction is East
Col
2
X if.direction is West
Col
3
Degrees
Col
9
Minutes
Col
14
Seconds
10 0 0 0 0' 0010100000000000000000000000000000000000000000000a00000000000000a000
2 3 4 5 6 1 8 9 10 11 12 3 14 15 16 11 'i 19 70 11 22 23 24 25 26 11,20 29 30 31 32 33 34 35 35 31 38 39 40 41 47 43 44 45 46 41 48 49 50 51 52 53 54 55 56 51 58 59 60 6: 67 63 64 65 66 51 60 69 10 11 72 13 14 15 16 71 18 19 60
This card indicates the azimuth from point 1 to point 2. You must input
degrees. You may also input minutes and seconds.
0 0 0 0 00 00,10 0000000000000000000000000000000000000000000000000000000000000000
1 3 4 5 6 1 0 9 10 11 17 13 14 15 16 11', 19 70 21 27 23 24 25 26 27 70 29 30 31 32 33 14 35 36 37 38 39 40 41 47 43 44 45 45 41 48 49 50 51 52 53 54 55 56 51 58 59 60 6: 62 63 64 65 66 61 60 69 70 71 77 73 14 15 15 71 10 19 80
I 1 o v -UN L ~ X ,AL U L c1m;_ V
Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
 Approved For Release 2008/03/07: CIA-RDP94T00858R000601150001-6
This card indicates what unit is being used in measuring the distance
between point 1 and point 2. Begin in column one and punch one of the following:
METERS
NAUT MILES
FEET
STAT MILES
000000 0000000000000000000000000000000000000000000000000000000000000000000000
2 3 4 5 6 1 0 9 10 11 12 13 14 15 16 11 ', 19 70 21 22 23 24 25 26 27 20 29 30 31 32 33 34 35 36 31 38 33 40 41 47 43 44 45 46 41 48 49 50 51 52 53 54 55 56 57 50 59 60 5; 52 63 64 65 66 67 69 69 10 71 12 73 14 15 16 11 18 13 80
This card indicates the distance between point 1 and point 2. The number
input may not exceed 14 characters, including the decimal, if any. Begin in
column one.
000000` 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0
0 0 0
1 3 4 5 6 1 8 9 10 11 12 13 14 15 15 17 ', 19 78 11 22 23 24 25 26 21 78 29 30 31 32 33 34 35 36 31 38 39 49 41 42 42 14 45 46 41 48 49 50 51 52 53 54 55 56 57 58 59 60 fi. 91 63 64 65 65 61 68 59
10 11 12 13 14 15 16 71
18 19 85
IJS'~>l'/\6`,~j V l`? i_^16ar,. uh5 ~~'