### 1.14.3 Ορισμός ενός τελεστή: `user_operator`

`user_operator` παίρνει ως όρισμα :

- ένα αλφαριθμητικό : το όνομα του τελεστή,
- μία συνάρτηση δύο μεταβλητών με τιμές σε ℝ ή σε `true, false`,
- μια επιλογή `Binary` για τον ορισμό ή `Delete` για να ακυρώσετε αυτόν τον ορισμό.

`user_operator` επιστρέφει 1 εάν ο ορισμός έχει γίνει διαφορετικά επιστρέφει 0.

Παράδειγμα 1
Έστω ότι ο R ορίζεται στο ℝ ως x R y= x*y+x+y.
Για να ορίσετε τον κανόνα R, πληκτρολογείστε :

`user_operator("R",(x,y)->x*y+x+y,Binary)`

Έξοδος :

`1`

Είσοδος (μην ξεχνάτε να βάλετε κενά γύρω από το `R`) :

`5 R 7`

Έξοδος :

`47`

Παράδειγμα 2
Έστω ότι ο S ορίζεται στο ℕ ως :
για τους ακεραίους x και y , x S y <=> x και y δεν είναι πρώτοι μεταξύ τους.
Για να ορίσετε τον κανόνα S, πληκτρολογείστε :

`user_operator("S",(x,y)->(gcd(x,y))!=1,Binary)`

Έξοδος :

`1`

Είσοδος (μην ξενχάτε να βάλετε κενά γύρω από το `S`) :

`5 S 7`

Έξοδος :

`0`

Είσοδος (μην ξενχάτε να βάλετε κενά γύρω από το `S`) :

`8 S 12`

Έξοδος :

`1`