#include "spice.h"
#include <math.h>
#include "distodef.h"
Go to the source code of this file.
Definition at line 18 of file tanderiv.c.
25 new->value = tan(temp.
value);
27 new->d1_p = (1 +
new->value*
new->value)*temp.
d1_p;
29 new->d1_r = (1 +
new->value*
new->value)*temp.
d1_r;
31 new->d2_q2 = (1 +
new->value*
new->value)*temp.
d2_q2 + 2*new->
value*temp.
d1_q*new->
d1_q;
33 new->d2_pq = (1 +
new->value*
new->value)*temp.
d2_pq + 2*new->
value*temp.
d1_p*new->
d1_q;
35 new->d2_pr = (1 +
new->value*
new->value)*temp.
d2_pr + 2*new->
value*temp.
d1_p*new->
d1_r;
37 temp.
d2_p2*
new->d1_p + temp.
d2_p2*
new->d1_p +
new->d2_p2*
39 new->d3_q3 = (1 +
new->value*
new->value)*temp.
d3_q3 +2*( new->
value*(
41 temp.
d1_q) + temp.
d1_q*
new->d1_q*
new->d1_q);
42 new->d3_r3 = (1 +
new->value*
new->value)*temp.
d3_r3 +2*( new->
value*(
44 temp.
d1_r) + temp.
d1_r*
new->d1_r*
new->d1_r);
45 new->d3_p2r = (1 +
new->value*
new->value)*temp.
d3_p2r +2*( new->
value*(
47 temp.
d1_p) + temp.
d1_p*
new->d1_p*
new->d1_r);
48 new->d3_p2q = (1 +
new->value*
new->value)*temp.
d3_p2q +2*( new->
value*(
50 temp.
d1_p) + temp.
d1_p*
new->d1_p*
new->d1_q);
51 new->d3_q2r = (1 +
new->value*
new->value)*temp.
d3_q2r +2*( new->
value*(
53 temp.
d1_q) + temp.
d1_q*
new->d1_q*
new->d1_r);
54 new->d3_pq2 = (1 +
new->value*
new->value)*temp.
d3_pq2 +2*( new->
value*(
56 temp.
d1_q) + temp.
d1_q*
new->d1_q*
new->d1_p);
57 new->d3_pr2 = (1 +
new->value*
new->value)*temp.
d3_pr2 +2*( new->
value*(
59 temp.
d1_r) + temp.
d1_r*
new->d1_r*
new->d1_p);
60 new->d3_qr2 = (1 +
new->value*
new->value)*temp.
d3_qr2 +2*( new->
value*(
62 temp.
d1_r) + temp.
d1_r*
new->d1_r*
new->d1_q);
63 new->d3_pqr = (1 +
new->value*
new->value)*temp.
d3_pqr +2*( new->
value*(
65 temp.
d1_p) + temp.
d1_p*
new->d1_q*
new->d1_r);
void EqualDeriv(Dderivs *new, Dderivs *old)