anchor.diff:  
       let finalPipeline worldPipeline (getTime: unit -> float32) (getPosition: unit -> Vector3Buffer) =
           pipeline {
  -            let! finalShader = getShader "Fullscreen" FinalInput (fun _ -> ())
  -
               let! renderTexture = captureFrame 1280 720 worldPipeline
   
  -            do! finalShader.Run (fun input draw ->
  +            do! runShader "Fullscreen" FinalInput noOutput (fun input draw ->
                   input.Time.Set (getTime ())
                   input.Position.Set (getPosition ())
                   input.RenderTexture.Set renderTexture
  
positive.code:                 shader
          )
  
  open Pipeline
  
  // *****************************************
  
negative.code: 
      let pipeline = PipelineBuilder ()
  
      let noOutput x = ()
  
      let run context p =
          match p with
          | Pipeline f -> f context
  