17 lines
329 B
Text
17 lines
329 B
Text
|
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
|