fork download 
  1. let f n =
  2. 	for i = 1 to n do
  3. 		for j = 1 to n do
  4. 			print_string [|"■"; "□"|].((i + j) mod 2)
  5. 		done;
  6. 		print_newline ()
  7. 	done
  8. let () = List.iter f [-1; 1; 2; 3; 10]
Success #stdin #stdout 0s 5320KB
comments (?)
stdin 
Standard input is empty
stdout 
■
■□
□■
■□■
□■□
■□■
■□■□■□■□■□
□■□■□■□■□■
■□■□■□■□■□
□■□■□■□■□■
■□■□■□■□■□
□■□■□■□■□■
■□■□■□■□■□
□■□■□■□■□■
■□■□■□■□■□
□■□■□■□■□■
https://ideone.com/5s67zO
language:
OCaml (ocamlopt 4.05.0)
created:
146 days ago
visibility:
secret

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!