(in NIL
	(loop
		(setq N (format (read)))
		(T (= "42" N))
		(prinl N))
   	)