FUNCTION DegF(DegC AS DOUBLE) AS DOUBLE
  DegF = DegC * 9.0 / 5.0 + 32.0
END FUNCTION

FUNCTION DegC(DegF AS DOUBLE) AS DOUBLE
  DegC = (DegF - 32.0) * 5.0 / 9.0
END FUNCTION