0votos

La ruta mas rapida del SENO en Haskell

por josejuan hace 6 años

La parte del where creo que se puede mejorar.

Se trata del ejercicio SENO sin lazos simplemente que esta vez unicamente tienes que conseguir el camino mas corto del inicio al fin.

1
2
3
shortCut = m.sortBy (flip=<<(((.).compare).)$xor 5.ord) 
  where m u = if u == v then v else m v 
          where v = subRegex (mkRegex "(NS|EO)") u "" 

Comenta la solución

Tienes que identificarte para poder publicar tu comentario.