Funzione segno Caml

[Dadde11]

Salve. Qualcuno sa aiutarmi in questo esercizio???

Si definisca la funzione segno, di tipo int -> int, che restituisce 1 se l'argomento µe positivo, -1 se l'argomento µe negativo e 0 se l'argomento è 0.

Io ho pensato a questo codice, ma non riesco ad aggiungere lo 0:

# let segno x= if x<0 then -1 else 1;;
val segno : int -> int =

Qualcuno mi aiuta???

[hamming_burst]

Ciao,

"Dadde11":Salve. Qualcuno sa aiutarmi in questo esercizio???

Si definisca la funzione segno, di tipo int -> int, che restituisce 1 se l'argomento µe positivo, -1 se l'argomento µe negativo e 0 se l'argomento è 0.

Io ho pensato a questo codice, ma non riesco ad aggiungere lo 0:

# let segno x= if x<0 then -1 else 1;;
val segno : int -> int =

Qualcuno mi aiuta???

si potrebbe risolvere in mille modi. Se non hai già fatto il pattern matching, puoi inserire un secondo if-then-else annidato.
Oppure qualcosa di più simpatico, utilizzare il costrutto in

PC (Pura Curiosità): stai studiando Caml per un qualche corso di programmazione funzionale?

[Dadde11]

Si sto studiando per un corso di laurea, ma nelle dispense c'è questo esercizio senza aver spiegato l'if annidato o l'in.Comunque mi è riuscito. Grazie mille!!!