anchor.diff:          [ Switch.switch [ Switch.isChecked; Switch.isSmall ] [ str "Small" ]
             Switch.switch [ Switch.isChecked ] [ str "Normal" ]
             Switch.switch [ Switch.isChecked; Switch.isMedium ] [ str "Medium" ]
  -          Switch.switch [ Switch.isChecked; Switch.isLarge ] [ str "Large" ] 
  +          Switch.switch [ Switch.isChecked; Switch.isLarge ] [ str "Large" ]
           ]
  -            
   
  -        
  +
  +
   
   let stylesInteractive =
       Columns.columns [ ]
  -            [ 
  +            [
                 Column.column [ ]
                   [
                       div [ ClassName "block" ]
  
positive.code: open Fable.Helpers.React.Props
  open Types
  open Fulma.Elements
  open Fulma.Grids
  open Fulma.Extensions
  open Fulma.Extra.FontAwesome
  
  let inlineBlockInteractive = 
      Columns.columns [ ]
          [ 
              Column.column [ ]
                  [ div [ ClassName "block" ]
                        [ 
                          b [] [str "Block"]
                          Switch.switch [ ] [ str "One" ]
                          Switch.switch [ ] [ str "Two" ]
                          
                          b [] [str "Inline"]
                          div [ ClassName "field"] [
                              yield! Switch.switchInline [ ] [ str "One " ]
                              yield! Switch.switchInline [ ] [ str "Two " ]
                          ]
                        ] 
                  ]
              
          ]
  
  let colorInteractive =
      Columns.columns [ ]
          [ 
              Column.column [ ]
                  [
                      div   [ ClassName "block" ]
  
negative.code: The switch can be **rounded, outlined or both**.
                              """
                              (Viewer.View.root stylesInteractive model.CircleViewer (CircleViewerMsg >> dispatch))
  
                          Render.docSection
                              "### States"
                              (Viewer.View.root stateInteractive model.StateViewer (StateViewerMsg >> dispatch))
  
                          Render.docSection
                              "### Event handler"
                              (Viewer.View.root (eventInteractive model dispatch) model.EventViewer (EventViewerMsg >> dispatch))
                      ]
  