Skip to content
Snippets Groups Projects
Commit 8763af76 authored by erwan's avatar erwan
Browse files

Make sure all sasa output are preceed by a rif comment so that sim2chro works

parent ae201309
No related branches found
No related tags found
No related merge requests found
...@@ -137,7 +137,7 @@ let (simustep: int -> int -> SasArg.t -> string -> ...@@ -137,7 +137,7 @@ let (simustep: int -> int -> SasArg.t -> string ->
raise (Legitimate (n-i)) raise (Legitimate (n-i))
| Some ff -> | Some ff ->
print_step n i pot args e pl activate_val enab_ll; print_step n i pot args e pl activate_val enab_ll;
let str = if args.rif then "#" else "" in let str = if args.rif then "#" else "#" in
Printf.eprintf Printf.eprintf
"\n%sThis algo reached a legitimate configuration after %i move%s, %i step%s, %i round%s.\n" "\n%sThis algo reached a legitimate configuration after %i move%s, %i step%s, %i round%s.\n"
str !moves (plur !moves) (n-i) (plur (n-i)) !rounds (plur !rounds); str !moves (plur !moves) (n-i) (plur (n-i)) !rounds (plur !rounds);
...@@ -204,7 +204,7 @@ let () = ...@@ -204,7 +204,7 @@ let () =
let str = if args.rif then "#" else "" in let str = if args.rif then "#" else "" in
Printf.printf Printf.printf
"\n%s%sThis algo reached a legitimate configuration after %i move%s, %i step%s, %i round%s.\n%!" "\n%s%sThis algo reached a legitimate configuration after %i move%s, %i step%s, %i round%s.\n%!"
(if args.rif then "#" else "") (if args.rif then "#" else "#")
str !moves (plur !moves) i (plur i) !rounds (plur !rounds); str !moves (plur !moves) i (plur i) !rounds (plur !rounds);
flush stderr; flush stderr;
flush stdout; flush stdout;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment