Add test for #'outer

;; Tests

;; Liam Healy 2009-12-28 22:33:55EST higher.lisp

;; Time-stamp: <2012-12-02 23:54:52EST norm-vector-product.lisp>

;; Time-stamp: <2017-11-25 15:07:09EST norm-vector-product.lisp>

;;

;; Copyright 2009, 2012 Liam M. Healy

;; Copyright 2009, 2012, 2017 Liam M. Healy

;; Distributed under the terms of the GNU General Public License

;;

;; This program is free software: you can redistribute it and/or modify

   (cross #(0.0d0 0.0d0 1.0d0) #(1.0d0 0.0d0 0.0d0)))

  (lisp-unit:assert-numerical-equal

   7.0710678118654755d0

   (euclidean #(3.0d0 4.0d0 5.0d0))))

   (euclidean #(3.0d0 4.0d0 5.0d0)))

  (lisp-unit:assert-numerical-equal

   7.0710678118654755d0

   (euclidean #(3.0d0 4.0d0 5.0d0)))

  (lisp-unit:assert-numerical-equal

   #2A((3 4 5) (6 8 10) (9 12 15))

   (outer #(1 2 3) #(3 4 5))))