gnss-converters 0.1.1 → 0.1.2
raw patch · 2 files changed
+3/−3 lines, 2 files
Files
- gnss-converters.cabal +1/−1
- src/Data/RTCM3/SBP.hs +2/−2
gnss-converters.cabal view
@@ -1,5 +1,5 @@ name: gnss-converters-version: 0.1.1+version: 0.1.2 synopsis: GNSS Converters. description: Haskell bindings for GNSS converters. homepage: http://github.com/swift-nav/gnss-converters
src/Data/RTCM3/SBP.hs view
@@ -27,13 +27,13 @@ toGPSTime :: GpsObservationHeader -> ObsGPSTime toGPSTime hdr = ObsGPSTime { _obsGPSTime_tow = hdr ^. gpsObservationHeader_tow- , _obsGPSTime_wn = 1874+ , _obsGPSTime_wn = 1875 } fromGpsObservationHeader :: GpsObservationHeader -> ObservationHeader fromGpsObservationHeader hdr = ObservationHeader { _observationHeader_t = toGPSTime hdr- , _observationHeader_n_obs = fromIntegral $ hdr ^. gpsObservationHeader_n+ , _observationHeader_n_obs = 0x10 } toP :: GpsL1Observation -> GpsL1ExtObservation -> Word32