(loop(doseq(x(asdf::split(read-line)))(or(boundp #1=(intern x))(format t"~&~A"(set #1#x)))))