git.iko.soy/wock
on master help sign in
roll
c17ddfciko
nock/src/jets.rs+10
compare with master
unifiedsplit
@@ -44,6 +44,7 @@ pub fn generate_jets() -> Jets {
44 (206209714924463645290290379601675245373, REAP),
44 (206209714924463645290290379601675245373, REAP),
45 (266278769253331237088430651317345081031, REAR),
45 (266278769253331237088430651317345081031, REAR),
46 (146282575960509029931248602154898675358, REEL),
46 (146282575960509029931248602154898675358, REEL),
47+ (218516926094890651045754335042357820192, ROLL),
47 ])
48 ])
48}
49}
49
50
@@ -344,3 +345,12 @@ static REEL: Jet = |ctx, n| {
344 |acc, next| slam(ctx, gate.clone(), cell(next.clone(), acc)),
345 |acc, next| slam(ctx, gate.clone(), cell(next.clone(), acc)),
345 )
346 )
346};
347};
348+
349+static ROLL: Jet = |ctx, n| {
350+ let (list, gate) = n.as_cell().unwrap();
351+
352+ list.list_iter().fold(
353+ gate.clone().gate_sample().unwrap().as_cell().unwrap().1,
354+ |acc, next| slam(ctx, gate.clone(), cell(next.clone(), acc)),
355+ )
356+};