📦 sleepyfran / duets

duets / tests / Simulation.Tests / Bank / Queries.Tests.fs
📄 Queries.Tests.fs · 19 lines 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19module Duets.Simulation.Tests.Bank.Queries

open NUnit.Framework
open FsUnit
open Test.Common

open Duets.Entities
open Duets.Simulation.Queries.Bank

[<Test>]
let balanceOfShouldReturnCorrectBalance () =
    balanceOf dummyState dummyCharacterBankAccount.Holder
    |> should equal 1000

[<Test>]
let balanceOfUnknownShouldReturn0 () =
    balanceOf dummyState (Character(CharacterId <| Identity.create ()))
    |> should equal 0