Scrivi un programma o una funzione che includa un elenco non vuoto di disuguaglianze matematiche che utilizzano l'operatore less than ( <). Ogni riga nell'elenco avrà il modulo

[variable] < [variable]

dove a [variable]può essere qualsiasi stringa non vuota di caratteri az minuscoli. Come nella normale matematica e programmazione, le variabili con lo stesso nome sono identiche.

Se è possibile assegnare un numero intero positivo a ciascuna variabile in modo tale da soddisfare tutte le disuguaglianze, stampare o restituire un elenco delle variabili con tale assegnazione. Ogni riga in questo elenco dovrebbe avere il modulo

[variable] = [positive integer]

e tutte le variabili devono presentarsi esattamente una volta in qualsiasi ordine.

Si noti che ci possono essere molte possibili soluzioni intere positive all'insieme di disuguaglianze. Uno di questi è un output valido.

Se non ci sono soluzioni alle disuguaglianze, allora non emettere nulla o produrre un valore falso ( dipende da te).

Vince il codice più breve in byte.

Esempi

Se l'input fosse

mouse < cat
mouse < dog

quindi tutti questi sarebbero output validi:

mouse = 1
cat = 2
dog = 2

mouse = 37
cat = 194
dog = 204

mouse = 2
cat = 2000000004
dog = 3

Se l'input fosse

rickon < bran
bran < arya
arya < sansa
sansa < robb
robb < rickon

quindi nessuna assegnazione è possibile perché si riduce a rickon < rickon, quindi non c'è output o output errato.

Altri esempi con soluzioni:

x < y

x = 90
y = 91

---

p < q
p < q

p = 1
q = 2

---

q < p
q < p

p = 2
q = 1

---

abcdefghijklmnopqrstuvwxyz < abcdefghijklmnopqrstuvwxyzz

abcdefghijklmnopqrstuvwxyz = 123456789
abcdefghijklmnopqrstuvwxyzz = 1234567890

---

pot < spot
pot < spot
pot < spots

pot = 5
spot = 7
spots = 6

---

d < a
d < b
d < c
d < e

d = 1
a = 4
b = 4
c = 5
e = 4

---

aa < aaaaa
a < aa
aaa < aaaa
aa < aaaa
a < aaa
aaaa < aaaaa
aaa < aaaaa
a < aaaaa

aaaa = 4
aa = 2
aaaaa = 5
a = 1
aaa = 3

---

frog < toad
frog < toaster
toad < llama
llama < hippo
raccoon < science
science < toast
toaster < toad
tuna < salmon
hippo < science
toasted < toast

raccoon = 1
frog = 2
toaster = 3
toasted = 4
toad = 5
llama = 6
hippo = 7
science = 8
toast = 9
tuna = 10
salmon = 11

Altri esempi senza soluzioni: (separati da linee vuote)

z < z

ps < ps
ps < ps

q < p
p < q

p < q
q < p

a < b
b < c
c < a

d < a
d < b
d < c
d < d

abcdefghijklmnopqrstuvwxyz < abcdefghijklmnopqrstuvwxyz

bolero < minuet
minuet < bolero

aa < aaaaa
a < aa
aaa < aaaa
aa < aaaa
aaaaa < aaaa
a < aaa
aaaa < aaaaa
aaa < aaaaa
a < aaaaa

g < c
a < g
b < a
c < a

g < b
a < g
b < a
c < a

g < b
a < g
b < a
c < b

g < c
a < g
b < a
c < b

geobits < geoborts
geobrits < geoborts
geology < geobits
geoborts < geology

Pyth, 39 byte

V>1f.A<MxMLTN.pS{s=Nm%2cd).zVNjd[H\==hZ

Provalo online: dimostrazione

Forze brutali attraverso tutte le possibili permutazioni (e interpretarle come ordinamenti), verificare se corrispondono alle disuguaglianze e assegnare loro i valori 1, 2, ...., n.

Spiegazione

f.A<MxMLTN.pS{s=Nm%2cd).z  
                 m     .z  map each input line d to:
                    cd)       split d by spaces
                  %2          and remove the second element
               =N          save this list of pairs to N
              s            combine these pairs to a big list of variable names
             {             set (remove duplicates)
          .pS              generate all permutations
f                          filter for permutations T, which satisfy:
     xMLTN                    replace each variable in N by their index in T
 .A<M                         check if each pair is ascending

V>1...VNjd[H\==hZ          implicit: Z = 0
 >1                        remove all but the last filtered permutation (if any)
V                          for each permutation N in ^ (runs zero times or once):
      VN                      for each variable H in N:
          [                      generate a list containing:
           H                        H
            \=                      "="
              =hZ                   Z incremented by 1 (and update Z)
        jd                       join this list by spaces and print

CJam ( 53 52 49 byte)

qS-N/'<f/:A:|e!{A{1$1$&=!},!*},:ee{()" = "\N}f%1<

Demo online

Questo bruto forza tutte le permutazioni dei token distinti, filtrando per quelle assegnazioni dei numeri 0an-1 cui obbedire a tutti i vincoli, e quindi li formatta, incrementando i numeri, e presenta il primo. Questo è sicuro di trovare una soluzione se ce n'è uno, perché è essenzialmente un ordinamento topologico.

Grazie a Reto Koradi per 3 caratteri e Martin Büttner per 1.

Mathematica, 83 byte

Quiet@Check[Equal@@@FindInstance[Join[#,#>0&/@(v=Sequence@@@#)],v,Integers][[1]],]&

Prende input come un elenco di disuguaglianze. Emette un elenco di incarichi o Nullse è impossibile.