(*FUNCIONES*)

# let <f> = function <x> -> <e>
# let <f> <x> = <e>
# function x ->
        if x>=0 then x
        else -x;;
# let abs x = if x >= 0 then x else –x;;

(*FUNCIONES RECURSIVAS*)

# let fact n = if n = 0 then 1
    else n * fact(n-1);;
----------------------------------------------------------------------
(*Forma correcta*)
# let rec fact n = if n=0 then 1
    else n * fact(n-1);;

(*LISTA*)

# [1;3;3] @ [7,9];;                                      //concatenación
# list.lenght [true:false];;
# list.map                                                    //aplica una función a toda una lista
# let par n = n mod = 0;;
# list.filter par [3;7;9;12;3;4]                   //sale la lista de pares
# list.for_all                                                //devuelve un bool si todos son pares