sdmd :: SDMData
sdmd = SDMData {
  _sdmVperm    = pure $ 160 *~ kmh,
  _sdmVrelease = pure $ Nothing,
  _sdmVtarget  = pure $ 80 *~ kmh,
  _sdmVwarn    = pure $ 165 *~ kmh,
  _sdmVsbi     = pure $ 170 *~ kmh,
  _sdmVindication = pure $ 85 *~ kmh,
  _sdmStatus   = pure TSM
}
sdmd :: SDMData
sdmd = SDMData {
  _sdmVperm    = pure $ 160 *~ kmh,
  _sdmVrelease = pure $ Nothing,
  _sdmVtarget  = pure $ 80 *~ kmh,
  _sdmVwarn    = pure $ 165 *~ kmh,
  _sdmVsbi     = pure $ 170 *~ kmh,
  _sdmVindication = pure $ 85 *~ kmh,
  _sdmStatus   = pure TSM
}
sdmd = SDMData {
  _sdmVperm    = pure $ 160 *~ kmh,
  _sdmVrelease = pure $ Nothing,
  _sdmVtarget  = pure $ 80 *~ kmh,
  _sdmVwarn    = pure $ 165 *~ kmh,
  _sdmVsbi     = pure $ 170 *~ kmh,
  _sdmVindication = pure $ 85 *~ kmh,
  _sdmStatus   = pure TSM
}