DEFINITION MODULE gpspos; (* decode weather sonde gps data to position by oe5dxl *)

FROM SYSTEM IMPORT CARD16;

TYPE
    SAT=RECORD
      prn:CARDINAL;
      almidx:CARDINAL;
      rang:INTEGER;
      rang1:INTEGER;
      rang3:INTEGER;
      rangabs:INTEGER;
      lastd, lastd1, freq0:INTEGER;
      userspeed:LONGREAL;
      badspeed:BOOLEAN;
    END;
    SATS=ARRAY[0..11] OF SAT;

PROCEDURE getposit(weekms:CARDINAL; VAR systime:CARDINAL; sats:SATS; mylat, mylong,
                   myhigh:LONGREAL; VAR lat, long, heig, speed, dir, climb:LONGREAL;
                   VAR hrms, vrms:REAL; VAR goodsats:CARDINAL):INTEGER;

PROCEDURE readalmanach(fnsem, fnyuma, fnrinex:ARRAY OF CHAR; secondinweek:CARDINAL;
                       VAR tilltime:CARDINAL; verb:BOOLEAN):BOOLEAN;

END gpspos.
