geodinverse.for File Reference

Go to the source code of this file.

Functions/Subroutines
*file geodinverse for *brief A test program for	invers ()* > A simple program to solve the inverse geodesic problem.*!*!This program reads in lines with lat1
*file geodinverse for *brief A test program for lat2 and prints *!out lines with	s12 (for the WGS84 ellipsoid).program geodinverse implicit none include 'geodesic.inc'double precision a
*file geodinverse for *brief A test program for lat2 and prints *!out lines with dummy integer omask *WGS84 values lon2 call	invers (a, f, lat1, lon1, lat2, lon2,+s12, azi1, azi2, omask, dummy, dummy, dummy, dummy, dummy) print 20
Variables
*file geodinverse for *brief A test program for	lon1
*file geodinverse for *brief A test program for	lon2
*file geodinverse for *brief A test program for lat2 and prints *!out lines with	azi1
*file geodinverse for *brief A test program for lat2 and prints *!out lines with	azi2
*file geodinverse for *brief A test program for lat2 and prints *!out lines with	f
*file geodinverse for *brief A test program for lat2 and prints *!out lines with	lat1
*file geodinverse for *brief A test program for lat2 and prints *!out lines with	lat2
*file geodinverse for *brief A test program for lat2 and prints *!out lines with	s12
*file geodinverse for *brief A test program for lat2 and prints *!out lines with dummy integer omask *WGS84 values	a

---

Function Documentation

* file geodinverse for* brief A test program for invers

(

)

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with s12

(

for the WGS84

ellipsoid

)

Type Constraints

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with dummy integer omask* WGS84 values lon2 call invers	(	a	,
		f	,
		lat1	,
		lon1	,
		lat2	,
		lon2	,
		+	s12,
		azi1	,
		azi2	,
		omask	,
		dummy	,
		dummy	,
		dummy	,
		dummy	,
		dummy
	)

Type Constraints

---

Variable Documentation

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with dummy integer omask* WGS84 values lon1

Definition at line 6 of file geodinverse.for.

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with lon2

Definition at line 6 of file geodinverse.for.

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with dummy integer omask* WGS84 values lon2 call azi1

Definition at line 6 of file geodinverse.for.

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with dummy integer omask* WGS84 values lon2 call azi2

Definition at line 6 of file geodinverse.for.

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with f

Definition at line 14 of file geodinverse.for.

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with lat1

Definition at line 14 of file geodinverse.for.

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with dummy integer omask* WGS84 values lat2

Definition at line 14 of file geodinverse.for.

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with s12

Definition at line 14 of file geodinverse.for.

* file geodinverse for* brief A test program for lat2 and prints* ! out lines with dummy integer omask* WGS84 values a

Initial value:

 6378137d0
      f = 1/298.257223563d0

      omask = 0

 10   continue
      read(*, *, end=90, err=90) lat1

Definition at line 19 of file geodinverse.for.