Προσομοιωτής ρομπότ

Οδηγίες

Γράψε έναν προσομοιωτή ρομπότ.

Οι εγκαταστάσεις δοκιμών ενός εργοστασίου ρομπότ χρειάζονται ένα πρόγραμμα για να επαληθεύουν τις κινήσεις των ρομπότ.

Τα ρομπότ έχουν τρεις δυνατές κινήσεις:

• στρίψε δεξιά
• στρίψε αριστερά
• προχώρησε

Τα ρομπότ τοποθετούνται σε ένα υποθετικό άπειρο πλέγμα, κοιτώντας προς μια συγκεκριμένη κατεύθυνση (βόρεια, ανατολικά, νότια ή δυτικά) και βρίσκονται σε ένα σύνολο συντεταγμένων {x,y}, π.χ. {3,8}, με τις συντεταγμένες να αυξάνονται προς τα βόρεια και τα ανατολικά.

Στη συνέχεια το ρομπότ λαμβάνει έναν αριθμό εντολών, και τότε οι εγκαταστάσεις δοκιμών επαληθεύουν τη νέα θέση του ρομπότ και προς τα πού δείχνει.

• Η συμβολοσειρά γραμμάτων "RAALAL" σημαίνει:
  • Στρίψε δεξιά
  • Προχώρησε δύο φορές
  • Στρίψε αριστερά
  • Προχώρησε μία φορά
  • Στρίψε αριστερά για άλλη μια φορά
• Ας πούμε ότι ένα ρομπότ ξεκινά από το {7, 3} κοιτώντας βόρεια. Τότε, εκτελώντας αυτή τη σειρά εντολών θα πρέπει να καταλήξει στο {9, 4} κοιτώντας δυτικά.

Υποδείξεις

Για να ολοκληρώσεις αυτή την άσκηση, πρέπει να δημιουργήσεις τον τύπο δεδομένων Robot και να υλοποιήσεις τις παρακάτω συναρτήσεις:

• bearing
• coordinates
• mkRobot
• move

Θα βρεις ήδη στη θέση τους μια δήλωση εικονικών δεδομένων και τις υπογραφές τύπων, αλλά εξαρτάται από εσένα να ορίσεις τις συναρτήσεις και να δημιουργήσεις έναν τύπο δεδομένων που να έχει νόημα, ένα newtype ή έναν συνώνυμο τύπο.