Module name: geometric_types
Author: Ian Stewart (University of Leicester, ims@star.le.ac.uk)
The module defines the following types:
type, public :: Point2dT real(single) :: x, y end type type, public :: Point2dDbleT real(double) :: x, y end type