From 7bd8670a2759635b7d1a010d6c5e98582fe63c65 Mon Sep 17 00:00:00 2001
From: "OPTIMUS-PRIME\\craig" <craig@craigoates.net>
Date: Mon, 3 Sep 2018 16:54:23 +0100
Subject: [PATCH] switch setPenWidth values around. The image renders better.

---
 SmoulderingBeachBall/InternalServices.fs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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