这段命令流中mooney常数如何确定的

mp,nuxy,1,0.499
*dim,strn,,19,3
*dim,strss,,19,3
*dim,const,,5
*dim,calc,,19,3
*dim,sortss,,19,3
*dim,sortsn,,19,3
*dim,ecalc,table,100
*dim,xval,table,100
strn(1,1)=-0.45,-0.4,-0.35,-0.3,-0.25,-0.2,-0.15,-0.1,-0.05
strss(1,1)=-256e6,-128e6,-64e6,-32e6,-16e6,-8e6,-4e6,-2e6,-1e6
strn(10,1)=0.0,0.1,0.2,0.3,0.4,0.5,0.6,0.7,0.8,0.9
strss(10,1)=0.0,1e6,1.5e6,2.0e6,2.9e6,3.6e6,5e6,7.5e6,9.7e6,17e6
tb,mooney,,,,1
*mooney,strn(1,1),strss(1,1),,const(1),calc(1,1),sortsn(1,1),sortss(1,1)
*eval,1,1,const(1),-0.2,0,xval(1),ecalc(1)
*vplot,xval(1),ecalc(1)
fini