anchor.diff:              |> Doc.EmbedView
           )
   
  +    [<Inline>]
       let RenderMany (c: Many.Collection<_,_,_,_,_>) f =
           c.Render f
   
  +    [<Inline>]
       let RenderManyAdder (c: Many.Collection<_,_,_,_,_>) f =
           c.RenderAdder f
   
  +    [<Inline>]
       let RenderPrimary (d: Dependent<_,_,_>) f =
           d.RenderPrimary f
   
  +    [<Inline>]
       let RenderDependent (d: Dependent<_,_,_>) f =
           d.RenderDependent f
   
  +    [<Inline>]
       let GetView (p: Form<_, _ -> _>) =
           p.view
   
  
positive.code:                     p.render (f ops) :> Doc
                  )
  
              member this.Add (x: 'T) =
                  add x
  
  
negative.code:     module Many =
  
          type ItemOperations(delete: unit -> unit, moveUp: Submitter<Result<bool>>, moveDown: Submitter<Result<bool>>) =
              [<Inline>]
              member this.Delete() = delete()
              [<Inline>]
              member this.MoveUp = moveUp
              [<Inline>]
              member this.MoveDown = moveDown
  
          type System.Collections.Generic.List<'T> with
  