Enforce style : no tab, no trailing whitespace.

compiler/minils/sigali/sigali.ml

@@ -240,16 +240,13 @@ module Printer =
             print_exp e
       | Attractivity(_) -> failwith("Attractivity verification not allowed")
 
-    let sigali_head = "
-set_reorder(2);\
-\
-read(\"Property.lib\");\
-read(\"Synthesis.lib\");\
-read(\"Verif_Determ.lib\");\
-read(\"Simul.lib\");\
-read(\"Synthesis_Partial_order.lib\");\
-read(\"Orbite.lib\");\
-"
+    let sigali_head = "set_reorder(2);\
+                       read(\"Property.lib\");\
+                       read(\"Synthesis.lib\");\
+                       read(\"Verif_Determ.lib\");\
+                       read(\"Simul.lib\");\
+                       read(\"Synthesis_Partial_order.lib\");\
+                       read(\"Orbite.lib\");"
 
     let sigali_foot = ""
 
@@ -405,7 +402,8 @@ read(\"Orbite.lib\");\
               fprintf ff "phantom_vars : [@[";
               print_list ff print_name "," phantom_vars;
               fprintf ff "@]];@,";
-	      fprintf ff "%s_triang : Triang(constraint(%s),controllables,phantom_vars);@," name name;
+              fprintf ff "%s_triang : Triang(constraint(%s),controllables,phantom_vars);@,"
+                name name;
 
               (* controller vars *)
               fprintf ff "controller_inputs : [@[";
@@ -417,7 +415,8 @@ read(\"Orbite.lib\");\
               fprintf ff "@]];@,";
 
               (* Controller generation *)
-	      fprintf ff "heptagon_controller(\"%s_controller.ept\",\"%s\",controller_inputs,controllables,%s_triang);@," name name name;
+              fprintf ff "heptagon_controller(\"%s_controller.ept\",\"%s\",\
+                          controller_inputs,controllables,%s_triang);@," name name name;
             end
       end;