diff options
| author | Charles Forsyth <charles.forsyth@gmail.com> | 2018-12-23 13:11:17 +0000 |
|---|---|---|
| committer | Charles Forsyth <charles.forsyth@gmail.com> | 2018-12-23 13:11:17 +0000 |
| commit | 3b2b7dcdedcd732b92403b784d8c3797d80a6599 (patch) | |
| tree | 7135955a3fc5673beb288ab34b563deaf91678a8 /appl/math/mersenne.b | |
| parent | 1921aab2126e947a7bae2a70794abb8c5f74522e (diff) | |
use IPints not Keyring
Diffstat (limited to 'appl/math/mersenne.b')
| -rw-r--r-- | appl/math/mersenne.b | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/appl/math/mersenne.b b/appl/math/mersenne.b index c90254b0..7efc4a97 100644 --- a/appl/math/mersenne.b +++ b/appl/math/mersenne.b @@ -3,9 +3,9 @@ implement Mersenne; include "sys.m"; sys : Sys; include "draw.m"; -include "keyring.m"; - keyring: Keyring; - IPint: import keyring; +include "ipints.m"; + ipints: IPints; + IPint: import ipints; # Test primality of Mersenne numbers @@ -17,7 +17,7 @@ Mersenne: module init(nil: ref Draw->Context, argv: list of string) { sys = load Sys Sys->PATH; - keyring = load Keyring Keyring->PATH; + ipints = load IPints IPints->PATH; p := 3; if(tl argv != nil) p = int hd tl argv; |