(declaim (optimize (speed 3) (safety 0))) (loop (princ (aref "/\\" (random 2))))