add type to element of data structure in haskell
data FightMove = Punch Int | Kick Int Float | Block String chooseMove :: Int -> FightMove chooseMove i = if i == 1 then Punch 3 Else if i == 2 then Kick 3 6.5 else Block “Please Protect Me”
Source: mmhaskell.com