summaryrefslogtreecommitdiffstats
path: root/builtins/110/atan
blob: e5542350b51645f1b12264aa8865457bff4b20fb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
((function atan
   (signature float
     (parameters
       (declare (in) float x))
     ((return (call asin ((expression float *
			   (var_ref x)
			   (expression float rsq
			    (expression float +
			     (expression float *
			      (var_ref x)
			      (var_ref x))
			     (constant float (1.0))))))))))

   (signature vec2
     (parameters
       (declare (in) vec2 y_over_x))
     ((return (call asin ((expression vec2 *
			   (var_ref y_over_x)
			   (expression vec2 rsq
			    (expression vec2 +
			     (expression vec2 *
			      (var_ref y_over_x)
			      (var_ref y_over_x))
			     (constant float (1.0))))))))))

   (signature vec3
     (parameters
       (declare (in) vec3 y_over_x))
     ((return (call asin ((expression vec3 *
			   (var_ref y_over_x)
			   (expression vec3 rsq
			    (expression vec3 +
			     (expression vec3 *
			      (var_ref y_over_x)
			      (var_ref y_over_x))
			     (constant float (1.0))))))))))

   (signature vec4
     (parameters
       (declare (in) vec4 y_over_x))
     ((return (call asin ((expression vec4 *
			   (var_ref y_over_x)
			   (expression vec4 rsq
			    (expression vec4 +
			     (expression vec4 *
			      (var_ref y_over_x)
			      (var_ref y_over_x))
			     (constant float (1.0))))))))))

   (signature float
     (parameters
       (declare (in) float y)
       (declare (in) float x))
     ((declare () float r)
      (if (expression bool >
	   (expression float abs (var_ref x))
	   (constant float (.0001)))
       ((assign (constant bool (1))
	 (var_ref r) (call atan ((expression float /
				  (var_ref y)
				  (var_ref x)))))
	(if (expression bool <
	     (var_ref x)
	     (constant float (0.0)))
	 ((assign (constant bool (1))
	   (var_ref r)
	   (expression float +
	    (var_ref r)
	    (expression float *
	     (expression int sign (var_ref y))
	     (constant float (3.1415926))))))
	 ()))
       ())
      (return (var_ref r))))

   (signature vec2
     (parameters
       (declare (in) vec2 y)
       (declare (in) vec2 x))
     ((declare () vec2 r)
      (if (expression bool >
	   (expression vec2 abs (var_ref x))
	   (constant float (.0001)))
       ((assign (constant bool (1))
	 (var_ref r) (call atan ((expression vec2 /
				  (var_ref y)
				  (var_ref x)))))
	(if (expression bool <
	     (var_ref x)
	     (constant float (0.0)))
	 ((assign (constant bool (1))
	   (var_ref r)
	   (expression vec2 +
	    (var_ref r)
	    (expression vec2 *
	     (expression int sign (var_ref y))
	     (constant float (3.1415926))))))
	 ()))
       ())
      (return (var_ref r))))

   (signature vec3
     (parameters
       (declare (in) vec3 y)
       (declare (in) vec3 x))
     ((declare () vec3 r)
      (if (expression bool >
	   (expression vec3 abs (var_ref x))
	   (constant float (.0001)))
       ((assign (constant bool (1))
	 (var_ref r) (call atan ((expression vec3 /
				  (var_ref y)
				  (var_ref x)))))
	(if (expression bool <
	     (var_ref x)
	     (constant float (0.0)))
	 ((assign (constant bool (1))
	   (var_ref r)
	   (expression vec3 +
	    (var_ref r)
	    (expression vec3 *
	     (expression int sign (var_ref y))
	     (constant float (3.1415926))))))
	 ()))
       ())
      (return (var_ref r))))

   (signature vec4
     (parameters
       (declare (in) vec4 y)
       (declare (in) vec4 x))
     ((declare () vec4 r)
      (if (expression bool >
	   (expression vec4 abs (var_ref x))
	   (constant float (.0001)))
       ((assign (constant bool (1))
	 (var_ref r) (call atan ((expression vec4 /
				  (var_ref y)
				  (var_ref x)))))
	(if (expression bool <
	     (var_ref x)
	     (constant float (0.0)))
	 ((assign (constant bool (1))
	   (var_ref r)
	   (expression vec4 +
	    (var_ref r)
	    (expression vec4 *
	     (expression int sign (var_ref y))
	     (constant float (3.1415926))))))
	 ()))
       ())
      (return (var_ref r))))

))