Anonymous user
Loop over multiple arrays simultaneously: Difference between revisions
Loop over multiple arrays simultaneously (view source)
Revision as of 21:17, 2 January 2010
, 14 years ago→{{header|OCaml}}
(added factor implementation) |
|||
Line 357:
let len = Array.length x in
let b = List.fold_left (fun b a -> b && (Array.length a = len)) true xs in
if not b then
for i = 0 to pred len do
let ai = List.map (fun a -> a.(i)) al in
| |||