SociaLite code that integrates all the features of a fully-operational lamp.