fork download 
  1. do
  2.     printfn "Array 1 : \r\n%A" ([|1..3|] |> Array.map (fun e -> (Array2D.init 3 3 (fun a b -> a + b + e))))
  3.     printfn "Array 2 : \r\n%A" ([|1..3|] |> Array.map (fun e -> (Array2D.init 3 3 (fun a b -> [|a + e .. b + e |]))))
Success #stdin #stdout 0.19s 12688KB
comments (?)
stdin 
Standard input is empty
stdout 
Array 1 : 
[|[[1; 2; 3]
   [2; 3; 4]
   [3; 4; 5]]; [[2; 3; 4]
                [3; 4; 5]
                [4; 5; 6]]; [[3; 4; 5]
                             [4; 5; 6]
                             [5; 6; 7]]|]
Array 2 : 
[|[[[|1|]; [|1; 2|]; [|1; 2; 3|]]
   [[||]; [|2|]; [|2; 3|]]
   [[||]; [||]; [|3|]]]; [[[|2|]; [|2; 3|]; [|2; 3; 4|]]
                          [[||]; [|3|]; [|3; 4|]]
                          [[||]; [||]; [|4|]]]; [[[|3|]; [|3; 4|]; [|3; 4; 5|]]
                                                 [[||]; [|4|]; [|4; 5|]]
                                                 [[||]; [||]; [|5|]]]|]
https://ideone.com/h2i4pu
language:
F# (mono 4.1)
created:
11 years ago
visibility:
public

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!