clamp :: (Ord a) => a -> a -> a -> a
clamp minV maxV inV = (min (max inV minV) maxV)
clamp :: (Ord a) => a -> a -> a -> a
clamp minV maxV inV = (min (max inV minV) maxV)
clamp minV maxV inV = (min (max inV minV) maxV)