let _Generation_Module_Save ce_module = match ce_module.declar with Var(liste_var)::_ -> "\tpublic void save() \n\t{\n" ^(_Traitement_Sauvegarde liste_var) ^"\t}\n\n" | _ -> raise Declaration_non_valide