atkins.lib
LIB "atkins.lib"; ring R = (real,50),x,dp; number r=7357683445788723456321.6788643224; round(r); ==> 7357683445788723456322