(port-map(.$ print abs)read)