6238e970b18a77cc33dfa37c09644a216b5282d0
[ghc-hetmet.git] / ghc / compiler / tests / deSugar / ds013.stderr
1
2
3 ================================================================================
4 Desugared:
5 Rec {
6 d.Num_a12Q  :: 
7     {PrelBase.Num{-2c,p-} PrelBase.Double{-3a,p-}}
8 {-# L #-}
9 d.Num_a12Q =
10     PrelNum.$d16{-rrq,p-}
11 +_a19S  :: 
12     PrelBase.Double{-3a,p-}
13     -> PrelBase.Double{-3a,p-}
14     -> PrelBase.Double{-3a,p-}
15 {-# L #-}
16 +_a19S =
17     PrelBase.+{-rcF,p-}
18         _@_ PrelBase.Double{-3a,p-} d.Num_a12Q
19 d.Num_a12T  :: 
20     {PrelBase.Num{-2c,p-} PrelBase.Double{-3a,p-}}
21 {-# L #-}
22 d.Num_a12T =
23     d.Num_a12Q
24 -_a19R  :: 
25     PrelBase.Double{-3a,p-}
26     -> PrelBase.Double{-3a,p-}
27     -> PrelBase.Double{-3a,p-}
28 {-# L #-}
29 -_a19R =
30     PrelBase.-{-817,p-}
31         _@_ PrelBase.Double{-3a,p-} d.Num_a12T
32 d.Fractional_a12W  :: 
33     {PrelNum.Fractional{-26,p-} PrelBase.Double{-3a,p-}}
34 {-# L #-}
35 d.Fractional_a12W =
36     PrelNum.$d14{-rro,p-}
37 fromRational_a19Q  :: 
38     PrelNum.Rational{-3r,p-} -> PrelBase.Double{-3a,p-}
39 {-# L #-}
40 fromRational_a19Q =
41     PrelNum.fromRational{-8T,p-}
42         _@_ PrelBase.Double{-3a,p-} d.Fractional_a12W
43 lit_a19P  :: 
44     PrelBase.Double{-3a,p-}
45 {-# L #-}
46 lit_a19P =
47     fromRational_a19Q
48         _rational_  3 2
49 fromRational_a19O  :: 
50     PrelNum.Rational{-3r,p-} -> PrelBase.Double{-3a,p-}
51 {-# L #-}
52 fromRational_a19O =
53     fromRational_a19Q
54 lit_a19N  :: 
55     PrelBase.Double{-3a,p-}
56 {-# L #-}
57 lit_a19N =
58     fromRational_a19O
59         _rational_  2 1
60 fromRational_a19M  :: 
61     PrelNum.Rational{-3r,p-} -> PrelBase.Double{-3a,p-}
62 {-# L #-}
63 fromRational_a19M =
64     fromRational_a19Q
65 lit_a19L  :: 
66     PrelBase.Double{-3a,p-}
67 {-# L #-}
68 lit_a19L =
69     fromRational_a19M
70         _rational_  62831853 20000000
71 d.Num_a131  :: 
72     {PrelBase.Num{-2c,p-} PrelBase.Double{-3a,p-}}
73 {-# L #-}
74 d.Num_a131 =
75     d.Num_a12Q
76 *_a19K  :: 
77     PrelBase.Double{-3a,p-}
78     -> PrelBase.Double{-3a,p-}
79     -> PrelBase.Double{-3a,p-}
80 {-# L #-}
81 *_a19K =
82     PrelBase.*{-rU,p-}
83         _@_ PrelBase.Double{-3a,p-} d.Num_a131
84 fromRational_a19J  :: 
85     PrelNum.Rational{-3r,p-} -> PrelBase.Double{-3a,p-}
86 {-# L #-}
87 fromRational_a19J =
88     fromRational_a19Q
89 lit_a19I  :: 
90     PrelBase.Double{-3a,p-}
91 {-# L #-}
92 lit_a19I =
93     fromRational_a19J
94         _rational_  21 5
95 fromRational_a19H  :: 
96     PrelNum.Rational{-3r,p-} -> PrelBase.Double{-3a,p-}
97 {-# L #-}
98 fromRational_a19H =
99     fromRational_a19Q
100 lit_a19G  :: 
101     PrelBase.Double{-3a,p-}
102 {-# L #-}
103 lit_a19G =
104     fromRational_a19H
105         _rational_  5111111111111111111111111111 1000000000000000000000000000
106 d.Num_a135  :: 
107     {PrelBase.Num{-2c,p-} PrelBase.Float{-3c,p-}}
108 {-# L #-}
109 d.Num_a135 =
110     PrelNum.$d25{-rrA,p-}
111 +_a19F  :: 
112     PrelBase.Float{-3c,p-}
113     -> PrelBase.Float{-3c,p-}
114     -> PrelBase.Float{-3c,p-}
115 {-# L #-}
116 +_a19F =
117     PrelBase.+{-rcF,p-}
118         _@_ PrelBase.Float{-3c,p-} d.Num_a135
119 d.Num_a138  :: 
120     {PrelBase.Num{-2c,p-} PrelBase.Float{-3c,p-}}
121 {-# L #-}
122 d.Num_a138 =
123     d.Num_a135
124 -_a19E  :: 
125     PrelBase.Float{-3c,p-}
126     -> PrelBase.Float{-3c,p-}
127     -> PrelBase.Float{-3c,p-}
128 {-# L #-}
129 -_a19E =
130     PrelBase.-{-817,p-}
131         _@_ PrelBase.Float{-3c,p-} d.Num_a138
132 d.Fractional_a13b  :: 
133     {PrelNum.Fractional{-26,p-} PrelBase.Float{-3c,p-}}
134 {-# L #-}
135 d.Fractional_a13b =
136     PrelNum.$d23{-rry,p-}
137 fromRational_a19D  :: 
138     PrelNum.Rational{-3r,p-} -> PrelBase.Float{-3c,p-}
139 {-# L #-}
140 fromRational_a19D =
141     PrelNum.fromRational{-8T,p-}
142         _@_ PrelBase.Float{-3c,p-} d.Fractional_a13b
143 lit_a19C  :: 
144     PrelBase.Float{-3c,p-}
145 {-# L #-}
146 lit_a19C =
147     fromRational_a19D
148         _rational_  3 2
149 fromRational_a19B  :: 
150     PrelNum.Rational{-3r,p-} -> PrelBase.Float{-3c,p-}
151 {-# L #-}
152 fromRational_a19B =
153     fromRational_a19D
154 lit_a19A  :: 
155     PrelBase.Float{-3c,p-}
156 {-# L #-}
157 lit_a19A =
158     fromRational_a19B
159         _rational_  2 1
160 fromRational_a19z  :: 
161     PrelNum.Rational{-3r,p-} -> PrelBase.Float{-3c,p-}
162 {-# L #-}
163 fromRational_a19z =
164     fromRational_a19D
165 lit_a19y  :: 
166     PrelBase.Float{-3c,p-}
167 {-# L #-}
168 lit_a19y =
169     fromRational_a19z
170         _rational_  62831853 20000000
171 d.Num_a13g  :: 
172     {PrelBase.Num{-2c,p-} PrelBase.Float{-3c,p-}}
173 {-# L #-}
174 d.Num_a13g =
175     d.Num_a135
176 *_a19x  :: 
177     PrelBase.Float{-3c,p-}
178     -> PrelBase.Float{-3c,p-}
179     -> PrelBase.Float{-3c,p-}
180 {-# L #-}
181 *_a19x =
182     PrelBase.*{-rU,p-}
183         _@_ PrelBase.Float{-3c,p-} d.Num_a13g
184 fromRational_a19w  :: 
185     PrelNum.Rational{-3r,p-} -> PrelBase.Float{-3c,p-}
186 {-# L #-}
187 fromRational_a19w =
188     fromRational_a19D
189 lit_a19v  :: 
190     PrelBase.Float{-3c,p-}
191 {-# L #-}
192 lit_a19v =
193     fromRational_a19w
194         _rational_  21 5
195 fromRational_a19u  :: 
196     PrelNum.Rational{-3r,p-} -> PrelBase.Float{-3c,p-}
197 {-# L #-}
198 fromRational_a19u =
199     fromRational_a19D
200 lit_a19r  :: 
201     PrelBase.Float{-3c,p-}
202 {-# L #-}
203 lit_a19r =
204     fromRational_a19u
205         _rational_  5111111111111111111111111111 1000000000000000000000000000
206 +_a19q  :: 
207     PrelBase.Double{-3a,p-}
208     -> PrelBase.Double{-3a,p-}
209     -> PrelBase.Double{-3a,p-}
210 {-# L #-}
211 +_a19q =
212     +_a19S
213 -_a19p  :: 
214     PrelBase.Double{-3a,p-}
215     -> PrelBase.Double{-3a,p-}
216     -> PrelBase.Double{-3a,p-}
217 {-# L #-}
218 -_a19p =
219     -_a19R
220 lit_a19o  :: 
221     PrelBase.Double{-3a,p-}
222 {-# L #-}
223 lit_a19o =
224     lit_a19P
225 lit_a19n  :: 
226     PrelBase.Double{-3a,p-}
227 {-# L #-}
228 lit_a19n =
229     lit_a19N
230 lit_a19m  :: 
231     PrelBase.Double{-3a,p-}
232 {-# L #-}
233 lit_a19m =
234     lit_a19L
235 *_a19l  :: 
236     PrelBase.Double{-3a,p-}
237     -> PrelBase.Double{-3a,p-}
238     -> PrelBase.Double{-3a,p-}
239 {-# L #-}
240 *_a19l =
241     *_a19K
242 lit_a19k  :: 
243     PrelBase.Double{-3a,p-}
244 {-# L #-}
245 lit_a19k =
246     lit_a19I
247 lit_a19j  :: 
248     PrelBase.Double{-3a,p-}
249 {-# L #-}
250 lit_a19j =
251     lit_a19G
252 +_a19i  :: 
253     PrelBase.Double{-3a,p-}
254     -> PrelBase.Double{-3a,p-}
255     -> PrelBase.Double{-3a,p-}
256 {-# L #-}
257 +_a19i =
258     +_a19q
259 h_a106  :: 
260     PrelBase.Double{-3a,p-}
261 {-# L #-}
262 h_a106 =
263     let { ds_d1hq  :: 
264               PrelBase.Double{-3a,p-}
265           {-# L #-}
266           ds_d1hq =
267       let {
268         ds_d1hC  :: 
269             PrelBase.Double{-3a,p-}
270         {-# L #-}
271         ds_d1hC =
272             +_a19i
273                 lit_a19o lit_a19n
274       } in 
275         -_a19p
276             ds_d1hC lit_a19m
277     } in
278     let {
279       ds_d1hu  :: 
280           PrelBase.Double{-3a,p-}
281       {-# L #-}
282       ds_d1hu =
283           *_a19l
284               lit_a19k lit_a19j
285     } in 
286       +_a19q
287           ds_d1hq ds_d1hu
288 h{-r4,x-}  :: 
289     PrelBase.Double{-3a,p-}
290 {-# L #-}
291 h{-r4,x-} =
292     h_a106
293 +_a1aJ  :: 
294     PrelBase.Float{-3c,p-}
295     -> PrelBase.Float{-3c,p-}
296     -> PrelBase.Float{-3c,p-}
297 {-# L #-}
298 +_a1aJ =
299     +_a19F
300 g_a10L  :: 
301     PrelBase.Float{-3c,p-}
302 {-# L #-}
303 g_a10L =
304     let { ds_d1ib  :: 
305               PrelBase.Float{-3c,p-}
306           {-# L #-}
307           ds_d1ib =
308       let {
309         ds_d1in  :: 
310             PrelBase.Float{-3c,p-}
311         {-# L #-}
312         ds_d1in =
313             +_a1aJ
314                 lit_a19C lit_a19A
315       } in 
316         -_a19E
317             ds_d1in lit_a19y
318     } in
319     let {
320       ds_d1if  :: 
321           PrelBase.Float{-3c,p-}
322       {-# L #-}
323       ds_d1if =
324           *_a19x
325               lit_a19v lit_a19r
326     } in 
327       +_a19F
328           ds_d1ib ds_d1if
329 g{-r2,x-}  :: 
330     PrelBase.Float{-3c,p-}
331 {-# L #-}
332 g{-r2,x-} =
333     g_a10L
334 +_a1bs  :: 
335     PrelBase.Double{-3a,p-}
336     -> PrelBase.Double{-3a,p-}
337     -> PrelBase.Double{-3a,p-}
338 {-# L #-}
339 +_a1bs =
340     +_a19S
341 f_a11q  :: 
342     PrelBase.Double{-3a,p-}
343 {-# L #-}
344 f_a11q =
345     let { ds_d1iW  :: 
346               PrelBase.Double{-3a,p-}
347           {-# L #-}
348           ds_d1iW =
349       let {
350         ds_d1j8  :: 
351             PrelBase.Double{-3a,p-}
352         {-# L #-}
353         ds_d1j8 =
354             +_a1bs
355                 lit_a19P lit_a19N
356       } in 
357         -_a19R
358             ds_d1j8 lit_a19L
359     } in
360     let {
361       ds_d1j0  :: 
362           PrelBase.Double{-3a,p-}
363       {-# L #-}
364       ds_d1j0 =
365           *_a19K
366               lit_a19I lit_a19G
367     } in 
368       +_a19S
369           ds_d1iW ds_d1j0
370 f{-r5,x-}  :: 
371     PrelBase.Double{-3a,p-}
372 {-# L #-}
373 f{-r5,x-} =
374     f_a11q
375 end Rec }