diff options
| author | Igor Pashev <pashev.igor@gmail.com> | 2011-07-23 01:38:55 +0400 |
|---|---|---|
| committer | Igor Pashev <pashev.igor@gmail.com> | 2011-07-23 01:38:55 +0400 |
| commit | 6d2dc53200f7d693654c22f3d69ca44bb13bd573 (patch) | |
| tree | 49909070751e96e8cc2526066660166df4150b7d | |
| parent | d6405321e883a5347d395be6247230977d4753c4 (diff) | |
| download | gcd-6d2dc53200f7d693654c22f3d69ca44bb13bd573.tar.gz | |
Links are invalid now
| -rw-r--r-- | gcd.pro | 2 |
1 files changed, 0 insertions, 2 deletions
@@ -20,13 +20,11 @@ gcdn(A, [], A). gcdn(A, [B|Bs], G) :- gcd2(A, B, N), gcdn(N, Bs, G). gcdn([A|As], G) :- gcdn(A, As, G). -% http://www.gprolog.org/manual/html_node/gprolog008.html#toc9 :- initialization(main). str2int([], []). str2int([S|St], [N|Nt]) :- number_atom(N, S), str2int(St, Nt). -% http://www.fraber.de/bap/bap76.html main :- argument_list(Args), str2int(Args, Numbers), |