Changes between Version 42 and Version 43 of DataParallel/Regular

Timestamp:

01/20/10 05:24:22 (3 years ago)

Author:

gckeller

Comment:

--

DataParallel/Regular

@@ -268 +268 @@
 simpleReplicate:: (U.Elt e, Shape dim) => Array dim e -> Int -> Array (dim :*: Int) e
 simpleReplicate arr n =
-  replicate arr (IndexFixed n IndexNil)
+  replicate arr (IndexFixed n IndexNil)  -- (*,n)
 }}}
 replicates the argument array (which can of any dimensionality) `n` times and behaves
@@ -276 +276 @@
   Array (dim :*: Int) e -> Int -> Array (dim :*: Int :*: Int) e
 elementwiseReplicate arr n =
-  replicate arr (IndexAll (IndexFixed n IndexNil))
+  replicate arr (IndexAll (IndexFixed n IndexNil))    -- (*,n,.)
 }}}
 replicates each element of an array `n` times (similarly to `map (replicate n)` on lists).
@@ -408 +408 @@
  where
     arr2T   = forceDArray $ transpose arr2  
-    arr1Ext = replicate arr1 (Array.IndexAll (Array.IndexFixed m2 (Array.IndexAll Array.IndexNil)))
-    arr2Ext = replicate arr2T
-                 (Array.IndexAll (Array.IndexAll (Array.IndexFixed n1 Array.IndexNil)))
+    arr1Ext = replicate arr1 (Array.IndexAll (Array.IndexFixed m2 (Array.IndexAll Array.IndexNil))) --  (*,.,m2,.)
+    arr2Ext = replicate arr2T               
+                 (Array.IndexAll (Array.IndexAll (Array.IndexFixed n1 Array.IndexNil)))                                 -- (*,n1,.,.)
 
 }}}