Browse Source

begin adding record types for image specs.

master
Craig Oates 6 years ago
parent
commit
cecb8682c8
  1. 5
      SmoulderingBeachBall/ImageMaker.fs

5
SmoulderingBeachBall/ImageMaker.fs

@ -5,6 +5,11 @@ module ImageMaker =
open System
open System.Drawing
open System.IO
open System
type OverlaySpec = { colour: Brush}
type ImageSpec = { width: int; height: int; colour: Brush; filePath: string; overlay: Overlay }
let private validateDimension dimension =
match dimension with

Loading…
Cancel
Save