also it seems to have tried putting $1- , and it seems that also works unused variable.
alias reverse return $regsubex($1-,/(.)/g,$mid(\A,-\n,1))
but I think your choice is better, thanks
by the way, I'm trying to understand the code and see very complex, I will have to study it calmly. Cheers