8 lines
224 B
Text
8 lines
224 B
Text
import StdEnv
|
|
|
|
Start :: *World -> { {Real} }
|
|
Start world
|
|
# (console, world) = stdio world
|
|
(_, dim1, console) = freadi console
|
|
(_, dim2, console) = freadi console
|
|
= createArray dim1 (createArray dim2 1.0)
|