atkins.lib
LIB "atkins.lib"; ring r = (real,30),x,dp; number z=40.35; expo(z,1000); ==> 334027593585379682.006907602277