Bonjour,
je cherche une fonction pour trouver le type d'une variable.

Je voudrait quelque chose du genre
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
let le_type (x) = match x with
     | int -> "entier"
     | float -> "flottant"
     | _ -> "indefini"
;;


Un exemple de l'utilité de cette fonction, pour calculer la valeur absolue de x :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
let abs x =
     if le_type (x) = "entier"
          then
               if x>0
                    then x
                    else -x
          else
               if le_type (x) = "flottant"
                    then
                         if x>0
                              then x
                              else -. x
                    else failwith "erreur"
     ;;
Comme ça j'ai la même fonction pour trouver la valeur absolue d'un entier ou la valeur absolue d'un flottant.