Good idea. Attached is the best solution I could think of. I think it reads quite elegantly :)


On Sun, Jun 29, 2014 at 2:05 AM, Francesco Ariis <fa-ml@ariis.it> wrote:
On Sat, Jun 28, 2014 at 11:16:31PM -0300, Rafael Almeida wrote:
> I'm trying to practice my Haskell. So I had the idea of making a program
> which, given a mother's and a child blood type, it can determine whether a
> certain father is possible or not.
>
> Please take a look on this gist with my implementation:
>
>     https://gist.github.com/aflag/14429dfb2e89791a44e2#file-parentaltesting
>
> Would you care to comment on it? It looks a bit cumbersome to my eyes. I'm
> trying to find the most intuitive and elegant way of do it. I'm not so much
> worried with performance.

Since your 'main' function returns a Bool (possible/impossible), a simpler
way to approach the problem is to calculate the potential blood-type of child
C given parents A and B and then check the actual blood-type passed against
this list (I attach a .hs with such solution).

The 'cumbersome' part is the |Genes -> BloodType| conversion (and vice-versa);
you can calculate the inverse instead of typing it out, but it will still be
cumbersome.



_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe