Create my-first-dfa

First attempt at creating a dfa in prolog.