Skip to content

Commit 0e9fbbc

Browse files
kMutagenekMutagene
committed
port tracesmith to dynobj v4
1 parent f8d89ba commit 0e9fbbc

File tree

1 file changed

+36
-43
lines changed

1 file changed

+36
-43
lines changed

‎src/Plotly.NET/Traces/TraceSmith.fs

+36-43
Original file line numberDiff line numberDiff line change
@@ -17,11 +17,9 @@ type TraceSmith(traceTypeName) =
1717
type TraceSmithStyle() =
1818

1919
static member SetSmith([<Optional; DefaultParameterValue(null)>] ?SmithId: StyleParam.SubPlotId) =
20-
(fun (trace: TraceSmith) ->
20+
fun (trace: TraceSmith) ->
21+
trace |> DynObj.setOptionalPropertyBy "subplot" SmithId StyleParam.SubPlotId.toString
2122

22-
SmithId |> DynObj.setOptionalPropertyBy trace "subplot" StyleParam.SubPlotId.toString
23-
24-
trace)
2523

2624
/// <summary>
2725
/// Create a function that applies the styles of a scatter smith plot to a Trace object
@@ -108,43 +106,38 @@ type TraceSmithStyle() =
108106
[<Optional; DefaultParameterValue(null)>] ?UIRevision: string
109107
) =
110108
fun (trace: ('T :> Trace)) ->
111-
112-
Name |> DynObj.setOptionalProperty trace "name"
113-
Visible |> DynObj.setOptionalPropertyBy trace "visible" StyleParam.Visible.convert
114-
ShowLegend |> DynObj.setOptionalProperty trace "showlegend"
115-
Legend |> DynObj.setOptionalPropertyBy trace "legend" StyleParam.SubPlotId.convert
116-
LegendRank |> DynObj.setOptionalProperty trace "legendrank"
117-
LegendGroup |> DynObj.setOptionalProperty trace "legendgroup"
118-
LegendGroupTitle |> DynObj.setOptionalProperty trace "legendgrouptitle"
119-
Opacity |> DynObj.setOptionalProperty trace "opacity"
120-
Mode |> DynObj.setOptionalPropertyBy trace "mode" StyleParam.Mode.convert
121-
Ids |> DynObj.setOptionalProperty trace "ids"
122-
Imag |> DynObj.setOptionalProperty trace "imag"
123-
Real |> DynObj.setOptionalProperty trace "real"
124-
(Text, MultiText) |> DynObj.setOptionalSingleOrMultiProperty trace "text"
125-
126-
(TextPosition, MultiTextPosition)
127-
|> DynObj.setOptionalSingleOrMultiPropertyBy trace "textposition" StyleParam.TextPosition.convert
128-
129-
(TextTemplate, MultiTextTemplate) |> DynObj.setOptionalSingleOrMultiProperty trace "texttemplate"
130-
(HoverText, MultiHoverText) |> DynObj.setOptionalSingleOrMultiProperty trace "hovertext"
131-
HoverInfo |> DynObj.setOptionalPropertyBy trace "hoverinfo" StyleParam.HoverInfo.convert
132-
(HoverTemplate, MultiHoverTemplate) |> DynObj.setOptionalSingleOrMultiProperty trace "hovertemplate"
133-
Meta |> DynObj.setOptionalProperty trace "meta"
134-
CustomData |> DynObj.setOptionalProperty trace "customdata"
135-
Subplot |> DynObj.setOptionalProperty trace "subplot"
136-
Marker |> DynObj.setOptionalProperty trace "marker"
137-
Line |> DynObj.setOptionalProperty trace "line"
138-
TextFont |> DynObj.setOptionalProperty trace "textfont"
139-
SelectedPoints |> DynObj.setOptionalProperty trace "selectedpoints"
140-
Selected |> DynObj.setOptionalProperty trace "selected"
141-
Unselected |> DynObj.setOptionalProperty trace "unselected"
142-
ClipOnAxis |> DynObj.setOptionalProperty trace "cliponaxis"
143-
ConnectGaps |> DynObj.setOptionalProperty trace "connectgaps"
144-
Fill |> DynObj.setOptionalPropertyBy trace "fill" StyleParam.Fill.convert
145-
FillColor |> DynObj.setOptionalProperty trace "fillcolor"
146-
HoverLabel |> DynObj.setOptionalProperty trace "hoverlabel"
147-
HoverOn |> DynObj.setOptionalPropertyBy trace "hoveron" StyleParam.HoverOn.convert
148-
UIRevision |> DynObj.setOptionalProperty trace "uirevision"
149-
150109
trace
110+
|> DynObj.withOptionalProperty "name" Name
111+
|> DynObj.withOptionalPropertyBy "visible" Visible StyleParam.Visible.convert
112+
|> DynObj.withOptionalProperty "showlegend" ShowLegend
113+
|> DynObj.withOptionalPropertyBy "legend" Legend StyleParam.SubPlotId.convert
114+
|> DynObj.withOptionalProperty "legendrank" LegendRank
115+
|> DynObj.withOptionalProperty "legendgroup" LegendGroup
116+
|> DynObj.withOptionalProperty "legendgrouptitle"LegendGroupTitle
117+
|> DynObj.withOptionalProperty "opacity" Opacity
118+
|> DynObj.withOptionalPropertyBy "mode" Mode StyleParam.Mode.convert
119+
|> DynObj.withOptionalProperty "ids" Ids
120+
|> DynObj.withOptionalProperty "imag" Imag
121+
|> DynObj.withOptionalProperty "real" Real
122+
|> DynObj.withOptionalSingleOrMultiProperty "text" (Text, MultiText)
123+
|> DynObj.withOptionalSingleOrMultiPropertyBy "textposition" (TextPosition, MultiTextPosition) StyleParam.TextPosition.convert
124+
|> DynObj.withOptionalSingleOrMultiProperty "texttemplate" (TextTemplate, MultiTextTemplate)
125+
|> DynObj.withOptionalSingleOrMultiProperty "hovertext" (HoverText, MultiHoverText)
126+
|> DynObj.withOptionalPropertyBy "hoverinfo" HoverInfo StyleParam.HoverInfo.convert
127+
|> DynObj.withOptionalSingleOrMultiProperty "hovertemplate" (HoverTemplate, MultiHoverTemplate)
128+
|> DynObj.withOptionalProperty "meta" Meta
129+
|> DynObj.withOptionalProperty "customdata" CustomData
130+
|> DynObj.withOptionalProperty "subplot" Subplot
131+
|> DynObj.withOptionalProperty "marker" Marker
132+
|> DynObj.withOptionalProperty "line" Line
133+
|> DynObj.withOptionalProperty "textfont" TextFont
134+
|> DynObj.withOptionalProperty "selectedpoints" SelectedPoints
135+
|> DynObj.withOptionalProperty "selected" Selected
136+
|> DynObj.withOptionalProperty "unselected" Unselected
137+
|> DynObj.withOptionalProperty "cliponaxis" ClipOnAxis
138+
|> DynObj.withOptionalProperty "connectgaps" ConnectGaps
139+
|> DynObj.withOptionalPropertyBy "fill" Fill StyleParam.Fill.convert
140+
|> DynObj.withOptionalProperty "fillcolor" FillColor
141+
|> DynObj.withOptionalProperty "hoverlabel" HoverLabel
142+
|> DynObj.withOptionalPropertyBy "hoveron" HoverOn StyleParam.HoverOn.convert
143+
|> DynObj.withOptionalProperty "uirevision" UIRevision

0 commit comments

Comments
 (0)