CL-USER(5): (find-symbol "*APPLICATION-FRAME*" "CLIM")
 
 CLIM:*APPLICATION-FRAME*
 :EXTERNAL