#open "aintv";; exception Doublon;; exception Inconnue of string;; exception Nb_incorrect of string;; exception F_Inconnue of string;; exception F_Doublon;; value lp : fpar list ref;; type fonction==string*int;; value definies : fonction list ref;; value a_definir : fonction list ref;;