       (t/attach-instruction circle-nested?)
       (t/attach-instruction circle-separate?)
       (t/attach-instruction circle-surrounds?)
+      (t/attach-instruction circle-tangent?)
       ))
    (d/push-onto :boolean :result)))


(def line-coincide?
  (i/build-instruction
    line-coincide?

; [X] `:circle-nested?`
; [X] `:circle-inside?`
; [X] `:circle-surrounds?`
; [X] `:circle-tangent?` (to another circle)
; [ ] `:circle-intersections` (with another circle)
; [ ] `:LC-intersect?` (line-circle)
; [ ] `:LC-tangent?` (line-circle)
