Skip to content
  • Liam M. Healy's avatar
    Use all-same to determine if elements of a pq grid have all the same dimension · 3dd99b49
    Liam M. Healy authored
    Once again rewrite (grid::make-grid-data (eql 'physical-quantity)) so
    that we no longer use #'reduce at all to find the same dimension, but
    rather #'all-same which now has a new :post-function argument.  Test
    case 
    (MAKE-GRID '((FOREIGN-ARRAY 3) DOUBLE-FLOAT) :INITIAL-CONTENTS '(0.0 #_-3.377500000000000d0_km 0.0))
    formerly would return the double float foreign array, no physical
    quantity, now it returns the correct thing,
    #m(0.000000000000000d0 #_-3.377500000000000d0_km 0.000000000000000d0)
    3dd99b49