function u=DIPPR100(U,T);

A=U(1);B=U(2);C=U(3);D=U(4);E=U(5);
u=A+B*T+C*T.^2+D*T.^3+E*T.^4;