anchor.diff:                      else just model
                   | _ -> failwithumf ()
   
  -        static let tickReady time timeStart model (_ : World) =
  +        static let tickReady time timeStart model =
               let timeLocal = time - timeStart
               match timeLocal with
               | 0L -> withMsg model ReadyCharacters
  
positive.code:                     let sigs = if cancelled then Command (DisplayCancel targetIndex) :: sigs else sigs
                      let sigs = if hitPointsChange <> 0 then Command (DisplayHitPointsChange (targetIndex, hitPointsChange)) :: sigs else sigs
                      withSigs model sigs
                  | None-> just model
  
              | ConsumeCharacter1 (consumable, sourceIndex) ->
                  let time = World.getTickTime world
  
negative.code:              let model = BattleModel.make (BattleReady 0L) characters None Queue.empty inventory 100
               model)
  
          static let tickAttack sourceIndex (targetIndexOpt : CharacterIndex option) time timeLocal model =
              match targetIndexOpt with
              | Some targetIndex ->
                  let target = BattleModel.getCharacter targetIndex model
  