Lines Matching defs:step
20 step s = return $ function
33 step s = return $ function
46 step s = do function
60 step s = do function
70 step [] = Stop () function
71 step (x:xs) = Emit xs x function
81 step x = return $ if x Prelude.> y function
92 step x | x <= y = return $ Emit (x Prelude.+ 1) x function
104 step x = Emit x' x function
131 step' (!b, s) = do function
143 step' (!b, s) = do function
159 step' s = do function
173 step' (_, n) | n <= 0 = return $ Stop () function
174 step' (s, n) = do function
188 step' (output, n, _) | n <= 0 = return $ Stop (output []) function
189 step' (output, n, s) = do function
201 step' s = do function
213 step' s = do function
225 step' s = do function
237 step' s = do function
249 step' s = do function
264 step' s = do function
280 step' s = do function
293 step' ([], s) = do function
299 step' ((x:xs), s) = return (Emit (xs, s) x) function
306 step' ([], s) = do function
312 step' ((x:xs), s) = return (Emit (xs, s) x) function
319 step' ([], s) = do function
327 step' ((x:xs), s) = return (Emit (xs, s) x) function
334 step' (accum, [], s) = do function
342 step' (accum, (x:xs), s) = return (Emit (accum, xs, s) x) function
349 step' (accum, s) = do function
363 step' (accum, s) = do function
377 step' (accum, [], s) = do function
385 step' (accum, (x:xs), s) = return (Emit (accum, xs, s) x) function
392 step' ([], s) = do function
398 step' ((x:xs), s) = return (Emit (xs, s) x) function
405 step' ([], s) = do function
413 step' ((x:xs), s) = return (Emit (xs, s) x) function
420 step' (front, s) = do function
445 step' (GBStart s) = do function
451 step' (GBLoop rest x0 fx0 s) = do function
459 step' GBDone = return $ Stop () function
466 step' (n, _) | n <= 0 = return $ Stop () function
467 step' (n, s) = do function
479 step' s = do function
492 step' s = do function