Lines Matching refs:sec
4 double precision sec local
5 external sec
7 df(1) = 1.57d+0*cos(x)*sin(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin
9 df(2) = 1.57d+0*sin(x)*cos(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin
11 df(3) = 1.57d+0*sin(x)*sin(y)*cos(z)*sec(1.57d+0*sin(x)*sin(y)*sin
13 df2(1) = 4.9298000000000003d+0*cos(x)**2*sin(y)**2*sin(z)**2*sec(1
15 2 ))-1.57d+0*sin(x)*sin(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z
18 1 *2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(
19 2 y)*sin(z))+1.57d+0*cos(x)*cos(y)*sin(z)*sec(1.57d+0*sin(x)*sin(
21 df2(3) = 4.9298000000000003d+0*sin(x)**2*cos(y)**2*sin(z)**2*sec(1
23 2 ))-1.57d+0*sin(x)*sin(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z
26 1 z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(
27 2 y)*sin(z))+1.57d+0*cos(x)*sin(y)*cos(z)*sec(1.57d+0*sin(x)*sin(
30 1 z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(
31 2 y)*sin(z))+1.57d+0*sin(x)*cos(y)*cos(z)*sec(1.57d+0*sin(x)*sin(
33 df2(6) = 4.9298000000000003d+0*sin(x)**2*sin(y)**2*cos(z)**2*sec(1
35 2 ))-1.57d+0*sin(x)*sin(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z
37 df3(1) = 1.5479572d+1*cos(x)**3*sin(y)**3*sin(z)**3*sec(1.57d+0*si
39 2 7894d+1*cos(x)*sin(x)*sin(y)**2*sin(z)**2*sec(1.57d+0*sin(x)*si
41 4 0001d+0*cos(x)**3*sin(y)**3*sin(z)**3*sec(1.57d+0*sin(x)*sin(y)
42 5 *sin(z))**4-1.57d+0*cos(x)*sin(y)*sin(z)*sec(1.57d+0*sin(x)*sin
45 1 sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(y)*
47 3 **2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
49 5 **2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
51 7 **2*sin(z)**3*sec(1.57d+0*sin(x)*sin(y)*sin(z))**4-1.57d+0*sin(
52 8 x)*cos(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2
54 1 sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(y)*
56 3 **2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
58 5 **2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
60 7 (y)*sin(z)**3*sec(1.57d+0*sin(x)*sin(y)*sin(z))**4-1.57d+0*cos(
61 8 x)*sin(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2
62 df3(4) = 1.5479572d+1*sin(x)**3*cos(y)**3*sin(z)**3*sec(1.57d+0*si
64 2 7894d+1*sin(x)**2*cos(y)*sin(y)*sin(z)**2*sec(1.57d+0*sin(x)*si
66 4 0001d+0*sin(x)**3*cos(y)**3*sin(z)**3*sec(1.57d+0*sin(x)*sin(y)
67 5 *sin(z))**4-1.57d+0*sin(x)*cos(y)*sin(z)*sec(1.57d+0*sin(x)*sin
70 1 sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(y)*
72 3 (z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
74 5 (z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
76 7 (z)*sin(z)**2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**4-1.57d+0*sin(
77 8 x)*sin(y)*cos(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2
79 1 (z)**2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*
81 3 *sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)
83 5 n(y)**2*cos(z)*sin(z)**2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**4+1
84 6 .57d+0*cos(x)*cos(y)*cos(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**
87 1 sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(y)*
89 3 (z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
91 5 (z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
93 7 (z)*sin(z)**2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**4-1.57d+0*sin(
94 8 x)*sin(y)*cos(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2
96 1 sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(y)*
98 3 **2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
100 5 **2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
102 7 (z)**2*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**4-1.57d+0*cos(
103 8 x)*sin(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2
105 1 sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin(y)*
107 3 **2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
109 5 **2*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2*tan(1.57d+0*sin(x)*sin
111 7 (z)**2*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**4-1.57d+0*sin(
112 8 x)*cos(y)*sin(z)*sec(1.57d+0*sin(x)*sin(y)*sin(z))**2
113 df3(10) = 1.5479572d+1*sin(x)**3*sin(y)**3*cos(z)**3*sec(1.57d+0*s
115 2 47894d+1*sin(x)**2*sin(y)**2*cos(z)*sin(z)*sec(1.57d+0*sin(x)*s
117 4 00001d+0*sin(x)**3*sin(y)**3*cos(z)**3*sec(1.57d+0*sin(x)*sin(y
118 5 )*sin(z))**4-1.57d+0*sin(x)*sin(y)*cos(z)*sec(1.57d+0*sin(x)*si
121 double precision function sec(x) function
123 sec=1.d0/cos(x)