 
     {:foos   '([1 2 3 4 5 6]
                [99 88 77 66])
-     :scalar '(3 1)}      
+     :scalar '(3 1)}
                            :foos-pt-crossover       {:foos '([1 2 3 88 77 66]
                                                              [99 4 5 6])}
     ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
     {:foos   '([1 2 3 4 5 6]
                [99 88 77 66])
-     :scalar '(3/2 -11.7)}      
+     :scalar '(3/2 -11.7)}
                            :foos-pt-crossover       {:foos '([1 99 88 77 66]
                                                              [2 3 4 5 6])}
     ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
     {:foos   '([1 2 3 4 5 6]
                [])
-     :scalar '(3/2 -11.7)}      
+     :scalar '(3/2 -11.7)}
                            :foos-pt-crossover       {:foos '([1]
                                                              [2 3 4 5 6])}
     ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
     {:foos   '([]
                [99 88 77 66])
-     :scalar '(3/2 -11.7)}      
+     :scalar '(3/2 -11.7)}
                            :foos-pt-crossover       {:foos '([99 88 77 66]
                                                              [])}
     ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



(tabular
  (fact "`foos-conj` conjes the top :foo item onto the top :foos vector"
    (check-instruction-with-all-kinds-of-stack-stuff
        ?new-stacks foos-type ?instruction) => (contains ?expected))


    ?new-stacks              ?instruction     ?expected

    {:foos '([3 1 1 2 3 1 2 2])}
                             :foos-distinct
                                              {:foos '([3 1 2])}
    ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    {:foos '([1 2 3])}       :foos-distinct   {:foos '([1 2 3])}
