concrete LampsSwe of Lamps = {

pattern 

--aLamp = "LAMPA";
ceilinglamp = variants{"taklampan" ; ["en taklampa"]};
tablelamp = variants{ "bordslampan" ; ["en bordslampa"]};
desklamp = variants{ "skrivbordslampan" ; ["en skrivbordslampa"]};
floorlamp = variants{ "golvlampan" ; ["en golvlampa"]};

}