fix streamtube docs, improve 3D docs, add flatshading to mesh constructor

Author: kMutagene

docs/03_2_3d-mesh-plots.fsx

@@ -65,16 +65,10 @@ let c = Array.init 50 (fun _ -> rnd.NextDouble())
 open Plotly.NET.TraceObjects
 
 let mesh3d =
-    Trace3D.initMesh3D 
-        (fun mesh3d ->
-            mesh3d?x <- a
-            mesh3d?y <- b
-            mesh3d?z <- c
-            mesh3d?flatshading <- true
-            mesh3d?contour <- Contours.initXyz(Show=true)
-            mesh3d
-            )
-    |> GenericChart.ofTraceObject true
+    Chart.Mesh3D(
+        a,b,c,
+        FlatShading = true
+    )
 
 (*** condition: ipynb ***)
 #if IPYNB

docs/03_4_3d-streamtube-plots.fsx

@@ -52,13 +52,12 @@ let streamTube =
         u = (tubeData.["u"] |> Series.values),
         v = (tubeData.["v"] |> Series.values),
         w = (tubeData.["w"] |> Series.values),
-        Starts = 
+        TubeStarts = 
             StreamTubeStarts.init(
                 X = Array.init 16 (fun _ -> 80),
                 Y = [20;30;40;50;20;30;40;50;20;30;40;50;20;30;40;50],
                 Z = [0;0;0;0;5;5;5;5;10;10;10;10;15;15;15;15]
-            ),
-        ColorScale = StyleParam.Colorscale.Viridis
+            )
     )
 
 

docs/03_5_3d-volume-plots.fsx

@@ -70,8 +70,7 @@ let volume =
        Opacity=0.1,
        Surface=(Surface.init(Count=17)),
        IsoMin=0.1,
-       IsoMax=0.8,
-       ColorScale = StyleParam.Colorscale.Viridis
+       IsoMax=0.8
     )
 
 (*** condition: ipynb ***)

docs/03_6_3d-isosurface-plots .fsx

@@ -73,8 +73,7 @@ let isoSurface =
             X = (CapFill.init(Show=false)),
             Y = (CapFill.init(Show=false))
         ),
-        Surface = Surface.init(Count=5),
-        ColorScale = StyleParam.Colorscale.Viridis
+        Surface = Surface.init(Count=5)
     )
 
 (*** condition: ipynb ***)

src/Plotly.NET/ChartAPI/Chart3D.fs

@@ -527,29 +527,31 @@ module Chart3D =
                 [<Optional;DefaultParameterValue(null)>] ?ColorScale    : StyleParam.Colorscale,
                 [<Optional;DefaultParameterValue(null)>] ?ShowScale     : bool,
                 [<Optional;DefaultParameterValue(null)>] ?ColorBar      : ColorBar,
+                [<Optional;DefaultParameterValue(null)>] ?FlatShading   : bool,
                 [<Optional;DefaultParameterValue(true)>] ?UseDefaults   : bool
             ) = 
 
                 let useDefaults = defaultArg UseDefaults true
 
                 Trace3D.initMesh3D (
                     Trace3DStyle.Mesh3D(
-                        X           = x,
-                        Y           = y,
-                        Z           = z,
-                        ?I          = I         ,
-                        ?J          = J         ,
-                        ?K          = K         ,
-                        ?Name       = Name      ,
-                        ?ShowLegend = ShowLegend,
-                        ?Opacity    = Opacity   ,
-                        ?Text       = Text      ,
-                        ?MultiText  = MultiText ,
-                        ?Color      = Color     ,
-                        ?Contour    = Contour   ,
-                        ?ColorScale = ColorScale,
-                        ?ShowScale  = ShowScale ,
-                        ?ColorBar   = ColorBar  
+                        X               = x,
+                        Y               = y,
+                        Z               = z,
+                        ?I              = I         ,
+                        ?J              = J         ,
+                        ?K              = K         ,
+                        ?Name           = Name      ,
+                        ?ShowLegend     = ShowLegend,
+                        ?Opacity        = Opacity   ,
+                        ?Text           = Text      ,
+                        ?MultiText      = MultiText ,
+                        ?Color          = Color     ,
+                        ?Contour        = Contour   ,
+                        ?ColorScale     = ColorScale,
+                        ?ShowScale      = ShowScale ,
+                        ?ColorBar       = ColorBar  ,
+                        ?FlatShading    = FlatShading
                     ) 
                 )              
                 |> GenericChart.ofTraceObject useDefaults
@@ -572,6 +574,7 @@ module Chart3D =
                 [<Optional;DefaultParameterValue(null)>] ?ColorScale    : StyleParam.Colorscale,
                 [<Optional;DefaultParameterValue(null)>] ?ShowScale     : bool,
                 [<Optional;DefaultParameterValue(null)>] ?ColorBar      : ColorBar,
+                [<Optional;DefaultParameterValue(null)>] ?FlatShading   : bool,
                 [<Optional;DefaultParameterValue(true)>] ?UseDefaults   : bool
             ) = 
 
@@ -592,6 +595,7 @@ module Chart3D =
                     ?ColorScale = ColorScale ,
                     ?ShowScale  = ShowScale  ,
                     ?ColorBar   = ColorBar   ,
+                    ?FlatShading= FlatShading,
                     ?UseDefaults= UseDefaults
                 )