-(OR ...) is equivalent to
-
-(LET ((G2407 (NOT WOW)))
- (IF G2407 G2407 (FUNCALL WOW 1 2 3)))
-
-or to
-
-(LET ((G2407 (IF WOW NIL T)))
- (IF G2407 G2407 (FUNCALL WOW 1 2 3)))
+(if Y were used only once, the current compiler would optimize it)
+--------------------------------------------------------------------------------
+#12
+(typep (truly-the (simple-array * (*)) x) 'simple-vector)