📦 sleepyfran / duets

duets / src / Duets.Data / Skills.fs
📄 Skills.fs · 13 lines 
1
2
3
4
5
6
7
8
9
10
11
12
13module Duets.Data.Skills

open Duets.Common
open Duets.Entities

/// Generates all the available skills in the game, scoped to a given genre and
/// instrument.
let allFor (genre: Genre) (instrument: InstrumentType) =
    let skillsWithoutParams = Union.allCasesOf<SkillId> ()

    SkillId.Genre genre :: SkillId.Instrument instrument :: skillsWithoutParams
    |> List.map Skill.create