|
|
@ -5,9 +5,12 @@ |
|
|
|
open Console.Waterworks |
|
|
|
open Console.Waterworks |
|
|
|
open SmoulderingBeachBall |
|
|
|
open SmoulderingBeachBall |
|
|
|
open SmoulderingBeachBall.Services |
|
|
|
open SmoulderingBeachBall.Services |
|
|
|
|
|
|
|
open System |
|
|
|
|
|
|
|
|
|
|
|
let test () = "This program is working." |
|
|
|
let test () = "This program is working." |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
let exit () = Environment.Exit (Environment.ExitCode) |
|
|
|
|
|
|
|
|
|
|
|
let ``draw-image`` () = |
|
|
|
let ``draw-image`` () = |
|
|
|
// makeImage |
|
|
|
// makeImage |
|
|
|
//"Image completed." |
|
|
|
//"Image completed." |
|
|
|