|tomb| tomb := #(1 #(2 3 #(4 5) 6) #(#(7 8) 9) 10).

|fgv| fgv := [:i | tomb := #().
             i do: [:k | k class = Array ifTrue: [tomb := tomb,k.]
                                         ifFalse: [k print. Transcript show: ' '.].].
             tomb size > 0 ifTrue: [fgv value: tomb.].].

fgv value: tomb!