Block 2160
( workload-8.4th - fib )
: FIB-SEQ
  0 1
  100000 0 DO
    OVER + SWAP
  LOOP
  DROP DROP
;
: RUN-FIB
  20 0 DO
    FIB-SEQ 46 EMIT
  LOOP
;
( FABRIC-3.8 3.9: defs only; the DoE SENDs WL-RUN )
: WL-RUN FIB-SEQ RUN-FIB RUN-FIB ;