;; Benchmark: 2.4us
;; Benchmark-Repeat: 785
;; Demonstration of N-dimensional Tuples, Vectors, and Matrices
;; Based on docs/Tupel 1.md
;;
;; This test verifies that the literals are correctly parsed and represented.
;; Type inference is verified via internal compiler unit tests.

(do
  (def tpl [1, 3.14, "text"])
  (def v [10 20 30 40])
  (def mat2d [[1 2], [3 4]])
  (def mat3d [[[1 2] [3 4]] [[5 6] [7 8]]])
  (def mixed [[1 2] [3 4 5]])
  (def rec {:x 1, :y 0.3})

  (assert-eq [[1 3.14 "text"] [10 20 30 40] [[1 2] [3 4]] [[[1 2] [3 4]] [[5 6] [7 8]]] [[1 2] [3 4 5]] {:x 1 :y 0.3}]
             [tpl v mat2d mat3d mixed rec])
)