Navigation Menu

Skip to content

Instantly share code, notes, and snippets.

@ryanrhymes
Last active October 24, 2017 22:30
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save ryanrhymes/ed52522bc98c19c16b4bfc3d90fe2c5e to your computer and use it in GitHub Desktop.
Save ryanrhymes/ed52522bc98c19c16b4bfc3d90fe2c5e to your computer and use it in GitHub Desktop.
module M = Owl_lazy.Make (Arr);;
let x = Arr.uniform [|8;8|];;
let a = M.of_ndarray x;;
let b = M.(a |> sin |> cos);;
M._eval_term b;;
module M = Owl_lazy.Make (Arr);;
let x = Arr.uniform [|8;8|];;
let y = Arr.uniform [|8;8|];;
let a = M.of_ndarray x;;
let b = M.of_ndarray y;;
let c = M.(add a b);;
M._eval_term c;;
module M = Owl_lazy.Make (Arr);;
let x = Arr.uniform [|8;8|];;
let a = M.of_ndarray x;;
let b = M.(add a a);;
M._eval_term b;;
module M = Owl_lazy.Make (Arr);;
let x = Arr.uniform [|4000;4000|];;
let a = M.of_ndarray x;;
let b = M.(add a a |> sin |> cos |> sin |> cos);;
let c = M.(add_scalar b 5. |> sum);;
M.to_ndarray c;;
module M = Owl_lazy.Make (Arr);;
let x = Arr.uniform [|4000;4000|];;
let a = M.of_ndarray x;;
let b = M.(add a a |> sin |> cos |> sin |> cos);;
let f () = M._eval_term b;;
Utils.time f;;
let a = Arr.uniform [|4000;4000|];;
let f () = Arr.(add a a |> sin |> cos |> sin |> cos);;
Utils.time f;;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment