Help for GTIGEOLO
PURPOSE:
1) Parses a particular string for northing easting coordinates.
"ddmmssNdddmmssEddmmssNdddmmssEddmmssNdddmmssEddmmssNdddmmssE"
where dd or ddd is degrees, mm is minutes, and ss is
seconds. The N and E are characters identifying north
or east. The values are computed as
dd+mm/60+ss/3600
and returned in tcl variables.
The n1 and e1 refers the first coordinates in the string
and n4, e4 refers to the last coordinates in the string.
2) Accepts input of n1inp, n2inp, ... , n4inp, e1inp,
e2inp, ... , e4inp, converts the inputs from degrees
to minutes and outputs a string in the form:
"ddmmssNdddmmssEddmmssNdddmmssEddmmssNdddmmssEddmmssNdddmmssE"
EXECUTION:
Examples
gtigeolo
inp="343214N1105258E343208N1110441E342220N1110443E342222N1105251E"
n1=tclreal1 n2=tclreal2 n3=tclreal3 n4=tclreal4 e1=tclreal5
e2=tclreal6 e3=tclreal7 e4=tclreal8
returns the north and east values into the
tcl variables.
gtigeolo n1inp=-3.437277777778e+01 n2inp=-3.453555555556e+01
n3inp=-3.933333333333e+01 n4inp=-3.950000000000e+01
e1inp=1.108808333333e+02 e2inp=1.110780555556e+02
e3inp=8.433333333333e+01 e4inp=8.450000000000e+01
out=tclstr
returns the degrees minutes seconds into the
tclstr string variables.
OPERATION:
gtigeolo does not use VICAR I/O.
TIMING:
As fast as C can parse a string.
ORIGINAL PROGRAMMER: P. Kim 27 Apr 2009
COGNIZANT PROGRAMMER: P. Kim 27 Apr 2009
REVISION HISTORY
2009-04-27 PK - Initial version
2010-03-01 PK - Added reverse functionality
2017-05-31 WLB - Migrated to MIPL.
PARAMETERS:
INP
Ascii input string in degree
minutes seconds
N1
TCL TCL name without &, gets
the first north degree
N2
TCL TCL name without &, gets
the second north degree
N3
TCL TCL name without &, gets
the third north degree
N4
TCL TCL name without &, gets
the fourth north degree
E1
TCL TCL name without &, gets
the first east degree
E2
TCL TCL name without &, gets
the second east degree
E3
TCL TCL name without &, gets
the third east degree
E4
TCL TCL name without &, gets
the fourth east degree
N1INP
Real input for n1 in degrees
N2INP
Real input for n2 in degrees
N3INP
Real input for n3 in degrees
N4INP
Real input for n4 in degrees
E1INP
Real input for e1 in degrees
E2INP
Real input for e2 in degrees
E3INP
Real input for e3 in degrees
E4INP
Real input for e4 in degrees
OUT
Ascii output string as
degrees minutes seconds
.END
See Examples:
Cognizant Programmer: