Skip to content

Instantly share code, notes, and snippets.

Created September 30, 2019 00:25
What would you like to do?
namespace MattEland.FSharpGeneticAlgorithm.Logic
open MattEland.FSharpGeneticAlgorithm.Logic.WorldPos
module Actors =
type Actor(pos: WorldPos) =
member this.Pos = pos
abstract member Character: char
type Squirrel(pos: WorldPos, hasAcorn: bool) =
inherit Actor(pos)
member this.HasAcorn = hasAcorn
override this.Character = 'S'
let createSquirrel pos = new Squirrel(pos, false)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment