t=1.5;
S=100;
T=2;
E=100;
r=0.03;
sigma=0.2;
eta=50;
ti=100;
z=log(eta);
m=z^0.25;
square=m^2;
quart=m^4;
a=2*m*eta;
b=rem(2*m*eta,1);
steps1=a-b;
nsteps1=steps1+1;
c=2*square*eta;
d=rem(2*square*eta,1);
steps2=c-d;
nsteps2=steps2+1;
stepsize=1/eta;
steps3=ti^2;
nsteps3=steps3+1;
stepsizeti=1/ti;
truevalue=violet(t,S,T,E,r,sigma)
fftvalue=indigo(r,sigma,t,S,T,eta,E,ti)