File: sequential_outer1.fut

package info (click to toggle)
haskell-futhark 0.25.32-3
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 18,236 kB
  • sloc: haskell: 100,484; ansic: 12,100; python: 3,440; yacc: 785; sh: 561; javascript: 558; lisp: 399; makefile: 272
file content (12 lines) | stat: -rw-r--r-- 288 bytes parent folder | download | duplicates (2) 
1
2
3
4
5
6
7
8
9
10
11
12
 
-- Slightly odd result due to interchange.
-- ==
-- random input { [10][10][10]i32 } auto output
-- structure gpu {
--   /Loop 1
--   /Loop/SegRed 1
--   /Loop/SegMap 1
-- }

def main xsss =
  #[incremental_flattening(only_inner)]
  map (\xss -> #[sequential_outer] map i32.sum xss) xsss