anchor.diff:                                                               cell-margin))
                                               (cell-side cell-side))))
                             '(0 1 2 3 4 5 6 7 8) :this this)))))
  +
                
   
   (def-app sudoku-demo ()
  
positive.code:                                    (funcall on-focus 
                                              (@ cell-data :group)
                                              (@ cell-data :seq))))))
            (:span ((class (+ "brown-text" 
                              (if (@ cell-data :is-focused)
                                  " text-lighten-1"
                                  " text-lighten-2")))
                    (style :font-size (if (@ cell-data :is-focused)
                                          "24"
                                          "20")
                           :cursor "pointer"
                           :font-weight "bold"))
                   (@ cell-data :digit)))))
  
  
  
  
negative.code: (def-widget-1 sudoku-board ((cell-side :attribute)
                              (cell-margin :attribute)
                              (group-margin :attribute)
                              ;; states
                              (focused-group :state)
                              (focused-cell :state)
                              (data :state (map (lambda (x)
  