(port-map(^n(print(expt n 4)))read)