Exponentiation operator: Difference between revisions
→{{header|OCaml}}
m (→{{header|OCaml}}: slightly simpler (to write and to prove !)) |
|||
Line 665:
pow [ ] ( @ ) [ 1; 2 ] 10;; (* [1; 2; 1; 2; 1; 2; 1; 2; 1; 2; 1; 2; 1; 2; 1; 2; 1; 2; 1; 2] *)
(* more unusual
Array.init 200 (fun n -> (1 - pow 1 ( - ) 0 n)/2);;
|