fractionalIntegral[alpha_,x_]:=1/Gamma[alpha]Integrate[(x-t)^(alpha-1)E^t,{t,0,x}]
fractionalDerivative[v_,x_]:=D[fractionalIntegral[1-v,s],s]/.{s->x}

fractionalDerivative[v,x]

niceForm[v_,x_]:=((x^(-v))/(Gamma[1-v]))+(((E^x) (Gamma[1-v]-Gamma[1-v,x]))/(Gamma[1-v]))

piecewiseForm[v_,x_,cutOff_]:=Piecewise[{{niceForm[v,x],x≥cutOff},{niceForm[v,cutOff],x<cutOff}}]
graph = Plot3D[piecewiseForm[1-v,t,0.07],{v,0,0.999},{t,0.06,1},PlotRange->{1,3}, Boxed->False,Exclusions->None,MaxRecursion->12,PlotTheme->"FilledSurface"]

Export[NotebookDirectory[]<>"graph.stl",graph]