aspieEnglish word = do speak "OK Google" speak $ "define " ++ word str <- listen aspieEnglish $ maximumBy complexity $ words str