module RandomValues where type RandomValues = { point1 : PointRandomValues , point2 : PointRandomValues } type PointRandomValues = { angle : Float , x : Float , y : Float }