>>> :set -XNegativeLiterals >>> ratio (Rect (-1) 1 (-0.5) 0.5) 2.0
>>> parse (equivalentPositions ratio) "" "x+1,y+2,z+3" Right [[1 % 1,0 % 1,0 % 1,1 % 1],[0 % 1,1 % 1,0 % 1,2 % 1],[0 % 1,0 % 1,1 % 1,3 % 1]]
connectionUtilizationRate :: IO (Gauge IO) connectionUtilizationRate = gauge $ ratio openConnectionCount $ return connectionPoolSize