Added a dpresource<- method