Plot[1/2(Erf[(t-10)/Sqrt[10]]-Erf[(t-30)/Sqrt[10]]),{t,0,40}]