let
concat l = fwd (
Input
.concat (bwd l))