enrich
stream-old
with
variables
lf : Nat → List('a);
ii : Nat → Nat;
jj : Nat → Nat;
iigen : Nat → Nat → Nat;
nfgen : Nat → Nat → 'a;
nextl : Nat × 'a → List('a);
nextj : Nat × 'a → Nat;
lfgen : Nat → Nat → List('a);
nf : Nat → 'a;
m : Nat;
n : Nat;
σ : Stream('a);
a : 'a;
end enrich