From 7509f7f46d0511454dccce2d52545c045cb67e57 Mon Sep 17 00:00:00 2001 From: Lily Lin Date: Tue, 25 Oct 2022 00:09:05 -0700 Subject: Much simpler fractran program Why did I commit the complex one in the first place... --- entries/lilylin/fractran/src/core.rs | 44 ------------------------------------ 1 file changed, 44 deletions(-) delete mode 100644 entries/lilylin/fractran/src/core.rs (limited to 'entries/lilylin/fractran/src/core.rs') diff --git a/entries/lilylin/fractran/src/core.rs b/entries/lilylin/fractran/src/core.rs deleted file mode 100644 index 26e1a67..0000000 --- a/entries/lilylin/fractran/src/core.rs +++ /dev/null @@ -1,44 +0,0 @@ -use num_traits::Pow; - -pub type FracSize = u16; - -#[derive(Debug)] -pub struct Program { - pub fractions: Vec<(FracSize, FracSize)>, - pub initial: u64, -} - -impl Program { - // http://lomont.org/posts/2017/fractran/ - // A lesser known Conway FRACTRAN program is FIBONACCIGAME: - // `{17/65, 133/34, 17/19, 23/17, 2233/69, 23/29, 31/23, 74/341, 31/37, 41/31, 129/287, 41/43, 13/41, 1/13, 1/3}` - // Starting with `78*5^(n-1)`, it halts on `2^Fn` where Fn is the nth [Fibonacci number] - pub fn fibonacci(i: u32) -> Program { - Program { - fractions: vec![ - (17, 65), - (133, 34), - (17, 19), - (23, 17), - (2233, 69), - (23, 29), - (31, 23), - (74, 341), - (31, 37), - (41, 31), - (129, 287), - (41, 43), - (13, 41), - (1, 13), - (1, 3), - ], - initial: 78 * 5u64.pow(i), - } - } -} - -pub trait FractranEngine: IntoIterator -where - Value: From, -{ -} -- cgit v1.2.3-70-g09d2