17 lines
329 B
Plaintext
17 lines
329 B
Plaintext
const n : int = 33
|
|
|
|
node stopbb(shiftenable : bool) returns (dataout : bool^n)
|
|
var last dataint : bool^n = false^n;
|
|
let
|
|
dataout = (false^n) fby dataint;
|
|
switch shiftenable
|
|
| true do dataint = [true] @ dataout[0 .. n - 2];
|
|
| false do
|
|
end
|
|
tel
|
|
|
|
node main() returns (dataout : bool^n)
|
|
let
|
|
dataout = stopbb(true);
|
|
tel
|