search

TU-CSCI2322-FL22 / solver-connect-three

solver-connect-three created by GitHub Classroom
0 stars 0 forks source link

Use pattern matching instead of fst and snd #15

Open sfogarty opened 1 year ago

sfogarty commented 1 year ago

https://github.com/TU-CSCI2322-FL22/solver-connect-three/blob/3b398642bada87d610c043c993389cc52d8ec5ec/Main.hs#L75-L81

 makeMicroPlay game@(board, vicState) play player = 
     let numOfTile   = playToTile play 
         newBoard    = [if ((board !! numOfTile) == tl) then Just player else tl | tl <- board]