diff options
| -rwxr-xr-x | challenge-193/steve-g-lynn/julia/ch-1.sh | 2 | ||||
| -rwxr-xr-x | challenge-193/steve-g-lynn/raku/ch-2.p6 | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/challenge-193/steve-g-lynn/julia/ch-1.sh b/challenge-193/steve-g-lynn/julia/ch-1.sh index e509f7c40e..d0e78df97f 100755 --- a/challenge-193/steve-g-lynn/julia/ch-1.sh +++ b/challenge-193/steve-g-lynn/julia/ch-1.sh @@ -1,4 +1,4 @@ #!/bin/sh -julia -e 'using Printf;for i in (parse(Int64,"0b"*repeat("0",parse(Int64,ARGS[1]))):parse(Int64,"0b"*repeat("1",parse(Int64,ARGS[1])))); println(SubString(bitstring(i),65-parse(Int64,ARGS[1]))); end;' $@ +julia -e 'for i in (parse(Int64,"0b"*repeat("0",parse(Int64,ARGS[1]))):parse(Int64,"0b"*repeat("1",parse(Int64,ARGS[1])))); println(SubString(bitstring(i),65-parse(Int64,ARGS[1]))); end;' $@ diff --git a/challenge-193/steve-g-lynn/raku/ch-2.p6 b/challenge-193/steve-g-lynn/raku/ch-2.p6 index c4d112b465..28694e2f9b 100755 --- a/challenge-193/steve-g-lynn/raku/ch-2.p6 +++ b/challenge-193/steve-g-lynn/raku/ch-2.p6 @@ -7,8 +7,8 @@ our %code-hash; #-- assume input is conformable list of strings of same length #-- with exactly one string with the wrong difference array -say &odd-string(["adc","wzy","abc"]); #(1,1) -say &odd-string(["aaa","bob","ccc","ddd"]); #(13,-13) +say &odd-string(["adc","wzy","abc"]); #(abc) +say &odd-string(["aaa","bob","ccc","ddd"]); #(bob) multi sub difference-array( Str $s ) { (1 .. $s.chars-1).map({%code-hash{$s.comb[$_]}-%code-hash{$s.comb[$_-1]}}); |