Update SmartArray.hs