diff --git a/SmoulderingBeachBall/InternalServices.fs b/SmoulderingBeachBall/InternalServices.fs index 5844f54..96e11f2 100644 --- a/SmoulderingBeachBall/InternalServices.fs +++ b/SmoulderingBeachBall/InternalServices.fs @@ -28,8 +28,8 @@ let width = float32 imgWidth let height = float32 imgHeight if (width >= height) then - width * (float32 0.05) - else height * (float32 0.05) + height * (float32 0.05) + else width * (float32 0.05) let createBorderPath penWidth spec = let offset = penOffset penWidth