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.
  2017-08-08 WLB - Removed DEBUG from imake.


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: