以下是B-S模型的程序 ，想要给r s t 这些变量定个数 比如r=0.05 该怎么写？程序的开头怎么写？

start price_c (r,sigma,t,s,x);
d1=(log(s/x)+(r+sigma##2/2)*t)/(sigma*sqrt(t));
d2=d1-sigma*sqrt(t);
c=s*cdf('normal',d1)-x*exp(-r*t)*cdf('normal',d2);
return(c);
finish price_c;
print c;