1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38module Duets.Entities.State
open Duets.Entities.SituationTypes
/// Creates an empty state with all the fields set to its empty representation.
let empty =
{ Bands =
{ Current = Identity.create () |> BandId
Character = Map.empty
Simulated = Map.empty }
BandSongRepertoire = Band.SongRepertoire.empty
BandAlbumRepertoire = Band.AlbumRepertoire.empty
BankAccounts = Map.empty
Career = None
Characters = Map.empty
CharacterSkills = Map.empty
Concerts = Map.empty
CurrentPosition = (Prague, "", "")
PeopleInCurrentPosition = []
Flights = []
GenreMarkets = Map.empty
Inventories = Inventory.empty
MerchPrices = Map.empty
Notifications = Map.empty
PlayableCharacterId = Identity.create () |> CharacterId
Rentals = Map.empty
Relationships = Relationships.empty
Situation = FreeRoam
SocialNetworks =
{ Mastodon =
{ CurrentAccount =
SocialNetworkCurrentAccountStatus.NoAccountCreated
Accounts = Map.empty } }
Today = Calendar.gameBeginning
TurnMinutes = 0<minute>
CurrentWeatherCondition = Map.empty
WorldItems = Map.empty }