Added method for TYPE-EXPANDER.
Added method for TYPE-EXPANDER.

clasp-developers/SICL,clasp-developers/SICL,vtomole/SICL,vtomole/SICL,clasp-developers/SICL,clasp-developers/SICL,vtomole/SICL,vtomole/SICL