Bump's memory has holes:
alias invert {
var %a = 1,%b = $lines($1-),%c,%d = 0,%e,%f = $remove($1-,.map) $+ _inv.map
while (%a <= %b) {
%c = $read($1-,nt,%a)
if ( if (%d == 0) %d = $lines(%f)
%e = 0
!write -il $+ %d $+(",%f,") %c
!inc %a
while (%c != ) {
!inc %e
%c = $read($1-,nt,%a)
!write -il $+ $calc(%d + %e) $+(",%f,") %c
!inc %a
}
}
else {
!write $+(",%f,") %c
}
!inc %a
}
}
Usage:
/bumpy