anchor.diff:                  let character = updater character
                   { model with BattleCharacters = Map.add characterIndex character model.BattleCharacters }
               | None -> model
  -        do ignore tryUpdateCharacter
   
           static let updateCharacter updater characterIndex model =
  +            do ignore tryUpdateCharacter // temporarily quiet error about tryUpdateCharacter being unused
               let character = getCharacter characterIndex model
               let character = updater character
               { model with BattleCharacters = Map.add characterIndex character model.BattleCharacters }
  
positive.code:                    CharacterAnimationSheet = asset "Battle" "Goblin"
                     CharacterAnimationState = { TimeStart = 0L; CharacterAnimationCycle = ReadyCycle; Direction = Leftward; Stutter = 10 }
                     CharacterState = { CharacterType = Enemy Goblin; PartyIndex = 1; ExpPoints = 0; HitPoints = 5; SpecialPoints = 1; PowerBuff = 1.0f; ShieldBuff = 1.0f; MagicBuff = 1.0f; CounterBuff = 1.0f; Statuses = Set.empty; WeaponOpt = Some "Melee"; ArmorOpt = None; Relics = [] }
                     ActionTime = 0 }] |>
                  List.mapi (fun i enemy -> (EnemyIndex i, enemy))
               let characters =
                  Map.ofList (allies @ enemies)
               let model =
                  { BattleState = BattleReady 0L
                    BattleCharacters = characters
                    CurrentCommandOpt = None
                    ActionQueue = Queue.empty }
               model)
  
          static let getAllies model =
              model.BattleCharacters |> Map.toSeq |> Seq.filter (function (AllyIndex _, _) -> true | _ -> false) |> Seq.map snd |> Seq.toList
  
negative.code:                 let source = currentCommand.ActionCommand.Source
                  let targetOpt = currentCommand.ActionCommand.TargetOpt
                  tickAttack source targetOpt time timeLocal model
              | Defend -> just model // TODO: make the act of defending grant a significant counter buff
              | Consume _ -> just model
              | Special _ -> just model
              | Wound ->
                  let source = currentCommand.ActionCommand.Source
                  let (model, signal) = tickWound source time timeLocal model
                  match model.CurrentCommandOpt with
                  | Some _ -> withSig model signal // keep ticking wound
                  | None ->
                      let (model, signal2) =
                          let allies = getAllies model
  