Try to make a module of afn and fix the result of compute function.
remove test function.
chance afn module visible functions. New module on afd.
back to work.
Add Function to create matrix with (Set Int, Char) -> Set Int . This will help when I have to bring a AFN to a AFD. For normal AFD just use create a state as Data.Set.singleton Int.
New form of AFD is ready.