anchor.diff:                              (camera-tf (tf nil))
                               include
                               render
  +                            (time-scale 1d0)
                               include-text
                               (options robray::*render-options*))
  -    (scene-graph-time-animate (motion-plan-configuration-function-time motion-plan)
  -                              :camera-tf camera-tf
  -                              :options options
  -                              :encode-video t
  -                              :render-frames render
  -                              :include include
  -                              :include-text include-text
  -                              :scene-graph (motion-plan-scene-graph motion-plan)))
  +  (scene-graph-time-animate (motion-plan-configuration-function-time motion-plan
  +                                                                     :time-scale time-scale)
  +                            :camera-tf camera-tf
  +                            :options options
  +                            :encode-video t
  +                            :render-frames render
  +                            :include include
  +                            :include-text include-text
  +                            :scene-graph (motion-plan-scene-graph motion-plan)))
   
   (defun render-motion-plans (plans
                               &key
                                 (camera-tf (tf nil))
  +                              (time-scale 1d0)
                                 include
                                 include-text
                                 render
  
positive.code:      with fps = (get-render-option options :frames-per-second)
       for plan in plans
       do
         (scene-graph-frame-animate (motion-plan-configuration-function-frame plan :fps fps)
                                    :camera-tf camera-tf
                                    :append t
                                    :options options
  
negative.code: (in-package :robray)
  
  
  (defun motion-plan-configuration-function-time (motion-plan &key
                                                                (time-scale 1d0))
    (let* ((pts (amino::make-ct-pt-list))
           (m-sg (motion-plan-mutable-scene-graph motion-plan))
           (names (mutable-scene-graph-config-name-array m-sg))
  