ndist = NormalDistribution[0, 1]
CDF[ndist, .25]

r= .05
T = .25
S=36
X=40
x = ((Log[S/X]  + (((r + (.5*(v^2)))*T))))/(v*Sqrt[T])
			y = x - (v*Sqrt[T])
f[v_]:=  (S* CDF[ndist, x]) - ((X* Exp[-.0125])*CDF[ndist, y] )
	g[v_]:=  (S* (CDF[ndist, x] - 1)) - ((X* Exp[-.0125])*(CDF[ndist, y] - 1) )
FindRoot[f[v]==2.2584,{v,.4}]