Free dr. geo software for linux

Dr. Geo is a GTK interactive geometry software. It allows one to create geometric figure plus the interactive manipulation of such figure in respect with their geometric constraints. It is useable in teaching situation with students from primary or secondary level.

Dr. Geo integrates advanced features as an integrated Scheme programming language to define scripts within a figure. The language is also used to define functionnaly interactive figure.

Dr. Geo is a software part of the GNU project. This means it is a free software (as free speech) and you have access to the source code under the GPL license. You can modify and distribute it as long as the same distribution license (GPL) is used.

libipgeo library is written on top of the IP2LOCATION database allowing the user to do geo-targeting of IP addresses. For a given IPv4 address, libipgeo can lookup the following:

Country Code
Country
Region
City
Latitude
Longitude
ISP

NEW:libipgeo now searchs the IP2LOCATION database in O(lg n) and is TONS faster!

Included with the libipgeo distribution is a simple traceroute client that does IPv4 targeting:

[rounder:Projects/libipg/sample] root# ./trig -ien1 -LlCry 4.2.2.2 ../../IP-COUNTRY-REGION-CITY-LATITUDE-LONGITUDE-ISP-FULL/
IP-COUNTRY-REGION-CITY-LATITUDE-LONGITUDE-ISP.CSV
Trig 1.0 [geo-targeting traceroute scanner]
01: 66.123.162.113 US SAN RAMON CALIFORNIA 37.7661 -121.9730
02: 63.203.35.65 US SAN FRANCISCO CALIFORNIA 37.7002 -122.4060
03: 63.203.35.17 US SAN FRANCISCO CALIFORNIA 37.7002 -122.4060
04: 64.161.1.30 CA MONTREAL QUEBEC 45.5000 -73.5830
05: 64.161.1.54 CA MONTREAL QUEBEC 45.5000 -73.5830
06: 144.223.242.81 US KANSAS CITY MISSOURI 39.1749 -94.5804
07: 209.245.146.245 US UNKNOWN UNKNOWN 0.0000 0.0000
08: 209.244.3.137 US BROOMFIELD COLORADO 39.9135 -105.0930
09: 64.159.4.74 US SAN CLEMENTE CALIFORNIA 33.4322 -117.5780
10: 4.24.9.142 EG CAIRO AL QAHIRAH 30.0500 31.2500
11: 4.2.2.2 US PROVIDENCE RHODE ISLAND 41.8231 -71.4204

Graph::Writer::DrGeo can save the graph output DrGeo scheme script.

SYNOPSIS

my $g = new Graph;

# Add some vertices/edges to $g

my $writer = Graph::Writer::DrGeo->new();
$writer->write_graph($g,"graph.scm");

# graph.scm can be evaluated and rendered with Dr.Geo

Dr. Geo is a GTK interactive geometry software. It allows one to create geometric figure plus the interactive manipulation of such figure in respect with their geometric constraints. It is useable in teaching situation with students from primary or secondary level.

Besides the general file format, Dr.Geo also provide a dynamic graph definition using the language of Scheme. This module save any Graph object into Scheme language, which can be evaluated and rendered in Dr.Geo.

So far the default layout is the circle layout, more kind of layout could be added, and patches welcome.

Geo::ECEF is a Perl module that converts between ECEF (earth centered earth fixed) coordinates and latitude, longitude and height above ellipsoid.

SYNOPSIS

use Geo::ECEF;
my $obj=Geo::ECEF->new(); #WGS84 is the default
my ($x, $y, $z)=$obj->ecef(39.197807, -77.108574, 55); #Lat (deg), Lon (deg), HAE (meters)
print "X: $xtY: $ytZ: $zn";

my ($lat, $lon, $hae)=$obj->geodetic($x, $y, $z); #X (meters), Y (meters), Z (meters)
print "Lat: $lat tLon: $lon tHAE $haen";

Geo::ECEF provides two methods ecef and geodetic. The ecef method calculates the X,Y and Z coordinates in the ECEF (earth centered earth fixed) coordinate system from latitude, longitude and height above the ellipsoid. The geodetic method calculates the latitude, longitude and height above ellipsoid from ECEF coordinates.

The formulas were found at http://www.u-blox.ch/ and http://waas.stanford.edu/~wwu/maast/maastWWW1_0.zip.

This code is an object Perl rewrite of a similar package by Morten Sickel, Norwegian Radiation Protection Authority

PleiadesGeocoder is used for geocode and process Plone objects for use with Google Earth or PleiadesOpenLayers.
PleiadesGeocoder provides basic geospatial capabilities for Plone and enables content to be marshalled into Google Earth or OpenLayers maps.
Main features:
- Interfaces that will cover the first ~80 percent of content georeferencing use cases.
- Adapters for Plone content types. Implementations are modeled after the GeoRSS Simple profile.
- A geospatial protocol -- the @@geo logical view.
- GeoRSS and KML views of AT content, folders, and topics.
- Location geocoding tool based on geopy.
The geocoding tool uses the Google geocoding API to find matches for Plone locations, and return spatial coordinates. The API gives you worldwide city-level geocoding precision and address-level precision for the United States.
Chances are you have locations in your site already. Its a standard Plone metadata field, and appears in your user personal preferences form. PleiadesGeocoder includes methods for geocoding site user locations and serializing information about users into KML for use with Google Earth, or GeoRSS for use with other services.
Enhancements:
- Switch to use of geopy for geocoding (ticket #68, #183).

Geo::Google is a Perl module to perform geographical queries using Google Maps.

SYNOPSIS

use strict;
use Data::Dumper;
use Geo::Google;

#My office
my $gonda_addr = 695 Charles E Young Dr S, Westwood, CA 90024;
#Stans Donuts
my $stans_addr = 10948 Weyburn Ave, Westwood, CA 90024;

#Instantiate a new Geo::Google object.
my $geo = Geo::Google->new();

#Create Geo::Google::Location objects. These contain
#latitude/longitude coordinates, along with a few other details
#about the locus.
my ( $gonda ) = $geo->location( address => $gonda_addr );
my ( $stans ) = $geo->location( address => $stans_addr );
print $gonda->latitude, " / ", $gonda->longitude, "n";
print $stans->latitude, " / ", $stans->longitude, "n";

#Create a Geo::Google::Path object.
my ( $donut_path ) = $geo->path($gonda,$stans);

#A path contains a series of Geo::Google::Segment objects with
#text labels representing turn-by-turn driving directions between
#the two loci.
my @segments = $donut_path->segments();

#This is the human-readable directions for the first leg of the
#journey.
print $segments[0]->text(),"n";

#Geo::Google::Segment objects contain a series of
#Geo::Google::Location objects -- one for each time the segment
#deviates from a straight line to the end of the segment.
my @points = $segments[1]->points;
print $points[0]->latitude, " / ", $points[0]->longitude, "n";

#Now how about some coffee nearby?
my @coffee = $geo->near($stans,coffee);
#Too many. How about some Coffee Bean & Tea Leaf?
@coffee = grep { $_->title =~ /Coffee.*?Bean/i } @coffee;

#Still too many. Lets find the closest with a little trig and
#a Schwartzian transform
my ( $coffee ) = map { $_->[1] }
sort { $a->[0] $b->[0] }
map { [ sqrt(
($_->longitude - $stans->longitude)**2
+
($_->latitude - $stans->latitude)**2
), $_ ] } @coffee;

Geo::Google provides access to the map data used by the popular Google Maps web application.

Geo::Spline is a Perl module to calculate geographic locations between GPS fixes.

SYNOPSIS

use Geo::Spline;
my $p0={time=>1160449100.67, #seconds
lat=>39.197807, #degrees
lon=>-77.263510, #degrees
speed=>31.124, #m/s
heading=>144.8300}; #degrees clockwise from North
my $p1={time=>1160449225.66,
lat=>39.167718,
lon=>-77.242278,
speed=>30.615,
heading=>150.5300};
my $spline=Geo::Spline->new($p0, $p1);
my %point=$spline->point(1160449150);
print "Lat:", $point{"lat"}, ", Lon:", $point{"lon"}, "nn";

my @points=$spline->pointlist();
foreach (@points) {
print "Lat:", $_->{"lat"}, ", Lon:", $_->{"lon"}, "n";
}

This program was developed to be able to calculate the position between two GPS fixes using a 2-dimensional 3rd order polynomial spline.

f(t) = A + B(t-t0) + C(t-t0)^2 + D(t-t0)^3 #position in X and Y
f(t) = B + 2C(t-t0) + 3D(t-t0)^2 #velocity in X and Y

I did some simple Math (for an engineer with a math minor) to come up with these formulas to calculate the unknowns from our knowns.

A = x0 # when (t-t0)=0 in f(t)
B = v0 # when (t-t0)=0 in f(t)
C = (x1-A-B(t1-t0)-D(t1-t0)^3)/(t1-t0)^2 # solve for C from f(t)
C = (v1-B-3D(t1-t0)^2)/2(t1-t0) # solve for C from f(t)
D = (v1(t1-t0)+B(t1-t0)-2x1+2A)/(t1-t0)^3 # equate C=C then solve for D

Geo::Inverse is a Perl module to calculate geographic distance from a lat & lon pair.

SYNOPSIS

use Geo::Inverse;
my $obj = Geo::Inverse->new(); # default "WGS84"
my ($lat1,$lon1,$lat2,$lon2)=(38.87, -77.05, 38.95, -77.23);
my ($faz, $baz, $dist)=$obj->inverse($lat1,$lon1,$lat2,$lon2); #array context
my $dist=$obj->inverse($lat1,$lon1,$lat2,$lon2); #scalar context
print "Input Lat: $lat1 Lon: $lon1n";
print "Input Lat: $lat2 Lon: $lon2n";
print "Output Distance: $distn";
print "Output Forward Azimuth: $fazn";
print "Output Back Azimuth: $bazn";

This module is a pure Perl port of the NGS program in the public domain "inverse" by Robert (Sid) Safford and Stephen J. Frakes.

CONSTRUCTOR

new

The new() constructor may be called with any parameter that is appropriate to the ellipsoid method which establishes the ellipsoid.

my $obj = Geo::Inverse->new(); # default "WGS84"

METHODS

ellipsoid

Method to set or retrieve the current ellipsoid object. The ellipsoid is a Geo::Ellipsoids object.

my $ellipsoid=$obj->ellipsoid; #Default is WGS84

$obj->ellipsoid(Clarke 1866); #Built in ellipsoids from Geo::Ellipsoids
$obj->ellipsoid({a=>1}); #Custom Sphere 1 unit radius
inverse

This method is the user frontend to the mathematics. This interface will not change in future versions.

my ($faz, $baz, $dist)=$obj->inverse($lat1,$lon1,$lat2,$lon2);