#LAPLACE
#USEFLOAT=FALSE
#SIMPLIFY=TRUE
#ERRBND=15
#EXPDSP=5
#PREC=8
#F1=f(x)=
#F2=g(x)=
#F3=h(x)=f(x)/g(x)
#F4=matrix(
#F5=vector(
#F6=diff(f)
#F7=diff(g)
#F8=diff(h)
#F9=taylor(f,0)
#F10=taylor(f,1)
#F11=
#F12=
#F13=
#F14=
#F15=
#F16=
#F17=
#F18=
#F19=
#F20=
R_i:=430,dI_i:=0.25e-3,dR_n:=0.11,R_n:=22.6
I(I_i,R_n) = I_i * (R_i/R_n + 1)
eval(I(5,22.6))
dI(I_i)=abs(diff(I,I_i))*dI_i + abs(diff(I,R_n))*dR_n
eval(dI(0.040))
eval(dI(0.060))
eval(dI(0.080))
eval(dI(0.100))
eval(dI(0.120))
eval(dI(0.140))
eval(dI(0.160))
eval(dI(0.180))
eval(dI(0.200))