enrich
cache-asm
with
functions . .trunc ( . ) : abstract-file × nat → abstract-file;
axioms trunc-def : ⊦ af.trunc(n) = af.content:= (af.content upto n);
used for: s, ls;
end enrich