+load std
+load wx
+define GUIdouble wx
+ kind DEFAULT_GUI
+ new Slider slider
+ set slider.Label true
+# set slider.ReactiveOnTrack true
+ set slider.ChangeResolution true
+ set slider.Max 100
+ new Div div
+ set div.In2 100
+ connect slider.Out div.In1
+ new Mul mul
+ set mul.In2 100
+ connect mul.Out slider.In
+ input In mul.In1 "Initial position"
+ input Label slider.Title "Label"
+ output Out div.Out "Current position"
+ output Widget slider.Widget "Widget"
+ output BoxChange slider.BoxChange "BoxChange"
+endefine