anchor.diff:  open Fable.Helpers.React.Props
   open Types
   open Fulma.Elements
  -open Fulma.Grids
  +open Fulma.Layouts
   open Fulma.Extensions
   open Fulma.Extra.FontAwesome
   
  -let inlineBlockInteractive = 
  +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" ]
  
positive.code:           Switch.switch [ ] [ str "Unchecked" ]
            Switch.switch [ Switch.isChecked;] [ str "checked" ]
          ]
            
  
  
  let eventInteractive model dispatch =
      let state = not model.IsChecked
      
      div [ ClassName "block" ]
          [ Switch.switch 
              [
                  if model.IsChecked then yield Switch.isChecked;  
                  yield Switch.onChange (fun x -> dispatch (Change state))
              ] 
              [ str  (sprintf "%A" model.IsChecked) ]
          
            Switch.switch 
              [ 
                  if model.IsChecked then yield Switch.isChecked;  
                  yield Switch.onChange (fun x -> dispatch (Change state))
              ] 
              [ str  (if model.IsChecked then ":p" else ":'(") ]
          
            Switch.switch 
              [ 
                  if model.IsChecked then yield Switch.isChecked;  
                  yield Switch.onChange (fun x -> dispatch (Change state))
              ] 
              [ (if model.IsChecked then Icon.faIcon [ ] Fa.Plane else Icon.faIcon [ ] Fa.Rocket) ]
          ]
  
  let root model dispatch =
  
negative.code:         [ 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" ]
          ]
  
  
  
  
  let stylesInteractive =
      Columns.columns [ ]
              [
                Column.column [ ]
                  [
                      div [ ClassName "block" ]
  