Module Exifanalyze.GPS

type latitude = [ `North | `South ] * Exif.Numbers.rational
type longitude = [ `East | `West ] * Exif.Numbers.rational
type altitude = [ `AboveSeaLevel | `BelowSeaLevel ] * Exif.Numbers.rational
type time_stamp_utc = {
hour : Exif.Numbers.rational;
min : Exif.Numbers.rational;
sec : Exif.Numbers.rational;
}
type direction = [ `True | `Magnetic ] * Exif.Numbers.rational
type map_datum = string
type t = {
version : (int * int * int * int) option;
latitude : latitude option;
longitude : longitude option;
altitude : altitude option;
time_stamp_utc : time_stamp_utc option;
direction : direction option;
map_datum : map_datum option;
}