Refactor TernaryCharts tests

Author: kMutagene

tests/Common/FSharpTestBase/FSharpTestBase.fsproj

@@ -17,6 +17,7 @@
     <Compile Include="TestCharts\Chart3DTestCharts.fs" />
     <Compile Include="TestCharts\ChartPolarTestCharts.fs" />
     <Compile Include="TestCharts\ChartMapTestCharts.fs" />
+    <Compile Include="TestCharts\ChartTernaryTestCharts.fs" />
     <Compile Include="TestCharts\ChartDomainTestCharts.fs" />
   </ItemGroup>
 

tests/Common/FSharpTestBase/TestCharts/ChartTernaryTestCharts.fs

@@ -0,0 +1,40 @@
+module ChartTernaryTestCharts
+
+open Plotly.NET
+open Plotly.NET.TraceObjects
+open Plotly.NET.LayoutObjects
+open System
+
+open TestUtils.DataGeneration
+open Deedle
+
+module ScatterTernary = ()
+
+module PointTernary = 
+
+    let ``Styled ternary point chart`` =
+        Chart.PointTernary(abc = [1,2,3], UseDefaults = false)
+        |> Chart.withAAxis(LinearAxis.init(Title = Title.init("A"), Color = Color.fromKeyword ColorKeyword.DarkOrchid))
+        |> Chart.withBAxis(LinearAxis.init(Title = Title.init("B"), Color = Color.fromKeyword ColorKeyword.DarkRed))
+        |> Chart.withCAxis(LinearAxis.init(Title = Title.init("C"), Color = Color.fromKeyword ColorKeyword.DarkCyan))
+
+module LineTernary = 
+    
+    let ``Styled ternary line chart`` =
+        Chart.LineTernary(
+            A = [10; 20; 30; 40; 50; 60; 70; 80;],
+            B = ([10; 20; 30; 40; 50; 60; 70; 80;] |> List.rev),
+            Sum = 100,
+            ShowMarkers = true,
+            LineDash = StyleParam.DrawingStyle.DashDot, 
+            UseDefaults = false
+        )
+        |> Chart.withTernary(
+            Ternary.init(
+                AAxis = LinearAxis.init(Color = Color.fromKeyword ColorKeyword.DarkOrchid),
+                BAxis = LinearAxis.init(Color = Color.fromKeyword ColorKeyword.DarkRed),
+                CAxis = LinearAxis.init(Color = Color.fromKeyword ColorKeyword.DarkCyan)
+            )
+        )
+
+module BubbleTernary = ()

tests/CoreTests/CoreTests/CoreTests.fsproj

@@ -15,6 +15,7 @@
     <Compile Include="HtmlCodegen\Chart3D.fs" />
     <Compile Include="HtmlCodegen\ChartPolar.fs" />
     <Compile Include="HtmlCodegen\ChartMap.fs" />
+    <Compile Include="HtmlCodegen\ChartTernary.fs" />
     <Compile Include="HtmlCodegen\ChartDomain.fs" />
     <!--HTMLCodegen-->
 
@@ -31,7 +32,6 @@
     <Compile Include="Traces\TraceID.fs" />
     <Compile Include="HtmlCodegen\SimpleTests.fs" />
     <Compile Include="HtmlCodegen\ChartLayout.fs" />
-    <Compile Include="HtmlCodegen\TernaryCharts.fs" />
     <Compile Include="HtmlCodegen\CarpetCharts.fs" />
     <Compile Include="HtmlCodegen\CategoricalCharts.fs" />
     <Compile Include="HtmlCodegen\SmithCharts.fs" />

tests/CoreTests/CoreTests/HTMLCodegen/ChartTernary.fs

@@ -0,0 +1,58 @@
+module CoreTests.HTMLCodegen.ChartTernary
+
+open Expecto
+open Plotly.NET
+open Plotly.NET.LayoutObjects
+open Plotly.NET.TraceObjects
+open Plotly.NET.GenericChart
+
+open TestUtils.HtmlCodegen
+open ChartTernaryTestCharts
+
+module ScatterTernary = 
+    [<Tests>]
+    let ``ScatterTernary chart HTML codegeneration tests`` =
+        testList "HTMLCodegen.ChartTernary" [
+            testList "ScatterTernary" [
+            ]
+        ]
+
+module PointTernary = 
+    [<Tests>]
+    let ``PointTernary chart HTML codegeneration tests`` =
+        testList "HTMLCodegen.ChartTernary" [
+            testList "PointTernary" [
+                testCase "Point data" ( fun () ->
+                    """var data = [{"type":"scatterternary","mode":"markers","a":[1],"b":[2],"c":[3],"marker":{},"line":{}}];"""
+                    |> chartGeneratedContains PointTernary.``Styled ternary point chart``
+                )
+                testCase "Point layout" ( fun () ->
+                    """var layout = {"ternary":{"aaxis":{"color":"rgba(153, 50, 204, 1.0)","title":{"text":"A"}},"baxis":{"color":"rgba(139, 0, 0, 1.0)","title":{"text":"B"}},"caxis":{"color":"rgba(0, 139, 139, 1.0)","title":{"text":"C"}}}};"""
+                    |> chartGeneratedContains PointTernary.``Styled ternary point chart``
+                )
+            ]
+        ]
+
+module LineTernary = 
+    [<Tests>]
+    let ``LineTernary chart HTML codegeneration tests`` =
+        testList "HTMLCodegen.ChartTernary" [
+            testList "LineTernary" [
+                testCase "Line data" ( fun () ->
+                    """var data = [{"type":"scatterternary","mode":"lines+markers","a":[10,20,30,40,50,60,70,80],"b":[80,70,60,50,40,30,20,10],"marker":{},"line":{"dash":"dashdot"},"sum":100}];"""
+                    |> chartGeneratedContains LineTernary.``Styled ternary line chart``
+                )
+                testCase "Line layout" ( fun () ->
+                    """var layout = {"ternary":{"aaxis":{"color":"rgba(153, 50, 204, 1.0)"},"baxis":{"color":"rgba(139, 0, 0, 1.0)"},"caxis":{"color":"rgba(0, 139, 139, 1.0)"}}};"""
+                    |> chartGeneratedContains LineTernary.``Styled ternary line chart`` 
+                )
+            ]
+        ]
+
+module BubbleTernary = 
+    [<Tests>]
+    let ``BubbleTernary chart HTML codegeneration tests`` =
+        testList "HTMLCodegen.ChartTernary" [
+            testList "BubbleTernary" [
+            ]
+        ]

tests/CoreTests/CoreTests/HTMLCodegen/TernaryCharts.fs

@@ -64,7 +64,7 @@ Currently, the following test projects are contained:
 
 #### CoreTests.fsproj
 
-The largets test suirte by far that tests all things Plotly.NET, such as HTML code generation, JSON serialization, Object validity, etc.
+The largets test suite by far that tests all things Plotly.NET, such as HTML code generation, JSON serialization, Object validity, etc.
 
 #### CSharpInteroperabilityTests.csproj