tilia-0.0.1.0: corpora/vendored/other/comment-carried-on-past-its-second-line-out.hs

module Kiln.Schedule where

rampRate :: Int -> Int
rampRate held =
  clamp
    ( between
        (floorOf held)
        (ceilingOf held) -- the kiln never reports
        -- a reading below this
        -- once the burners are lit
    )

soakTime :: Int -> Int
soakTime held =
  clamp
    ( between
        (floorOf held)
        (ceilingOf held)
      -- a remark of its own, begun here
      -- and carried on to a second line
    )