From a8ab24abaee3a708e4d9f4358a0a12751aa6886b Mon Sep 17 00:00:00 2001
From: Yorik van Havre <yorik@uncreated.net>
Date: Fri, 12 Jan 2018 14:07:46 -0200
Subject: [PATCH] Arch: Fixed CTH profiles - fixes #2826

---
 src/Mod/Arch/ArchProfile.py       | 4 ++--
 src/Mod/Arch/Presets/profiles.csv | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Mod/Arch/ArchProfile.py b/src/Mod/Arch/ArchProfile.py
index 2a9d230376..777c63d294 100644
--- a/src/Mod/Arch/ArchProfile.py
+++ b/src/Mod/Arch/ArchProfile.py
@@ -118,9 +118,9 @@ class _ProfileC(_Profile):
         import Part
         pl = obj.Placement
         c1=Part.Circle()
-        c1.Radius=obj.OutDiameter.Value
+        c1.Radius=obj.OutDiameter.Value/2
         c2=Part.Circle()
-        c2.Radius=obj.OutDiameter.Value-2*obj.Thickness.Value
+        c2.Radius=obj.OutDiameter.Value/2-obj.Thickness.Value
         cs1=c1.toShape()
         cs2=c2.toShape()
         p=Part.makeRuledSurface(cs2,cs1)
diff --git a/src/Mod/Arch/Presets/profiles.csv b/src/Mod/Arch/Presets/profiles.csv
index 01495b3653..4ab49dd82b 100644
--- a/src/Mod/Arch/Presets/profiles.csv
+++ b/src/Mod/Arch/Presets/profiles.csv
@@ -8,7 +8,7 @@
 #U= U-profile
 ###########################################
 #Circular tube
-#Category,Name,H,Outside diameter,Thickness
+#Category,Name,C,Outside diameter,Thickness
 CTH,CTH423,C,42.4,3.2
 #H- or I-profile
 #Category,Name,H,width,height,web thickness,flange thickness