diff options
| author | Adam Russell <adamcrussell@outlook.com> | 2025-05-11 13:05:00 -0400 |
|---|---|---|
| committer | Adam Russell <adamcrussell@outlook.com> | 2025-05-11 13:05:00 -0400 |
| commit | 6492618722ea0f84453ace698d094015a5d9b06b (patch) | |
| tree | 46bf08550645d920cd4f8e8194939c39fe230990 | |
| parent | e73a6f9dae22ec456a182f49fdc7d8bb49599c5f (diff) | |
| download | perlweeklychallenge-club-6492618722ea0f84453ace698d094015a5d9b06b.tar.gz perlweeklychallenge-club-6492618722ea0f84453ace698d094015a5d9b06b.tar.bz2 perlweeklychallenge-club-6492618722ea0f84453ace698d094015a5d9b06b.zip | |
cleaned up code
| -rw-r--r-- | challenge-320/adam-russell/prolog/ch-2.p | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/challenge-320/adam-russell/prolog/ch-2.p b/challenge-320/adam-russell/prolog/ch-2.p index 6e4b4d0f16..16b545b640 100644 --- a/challenge-320/adam-russell/prolog/ch-2.p +++ b/challenge-320/adam-russell/prolog/ch-2.p @@ -9,10 +9,10 @@ digit_sum(Numbers, DigitSum):- - maplist(number_chars, Numbers, Characters), - flatten(Characters, CharactersFlattened), - maplist(char_number, CharactersFlattened, Digits), - sum_list(Digits, DigitSum). + maplist(number_chars, Numbers, Characters), + flatten(Characters, CharactersFlattened), + maplist(char_number, CharactersFlattened, Digits), + sum_list(Digits, DigitSum). sum_differences(Numbers, Differences):- |