๐Ÿ“ฆ sleepyfran / duets

๐Ÿ“„ Electronics.Items.fs ยท 25 lines
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25module Duets.Data.Items.Electronics

open Duets.Entities

module Dartboard =
    let dartboard: PurchasableItem =
        { Brand = "Bull's"
          Name = "Dartboard"
          Properties = [ Playable(Darts) ] },
        230m<dd>

module GameConsole =
    let xbox: PurchasableItem =
        { Brand = "Microsoft"
          Name = "Xbox Series X"
          Properties = [ Playable(VideoGame) ] },
        550m<dd>

module Tv =
    let lgTv: PurchasableItem =
        { Brand = "LG"
          Name = "TV"
          Properties = [ Watchable ] },
        850m<dd>