#include "newmacros.h" #include "runtime.h" #define v193 ((void*)startLabel+145) #define CT_v202 ((void*)startLabel+180) extern Node FN_Prelude_46RealFloat_46Prelude_46RealFrac[]; extern Node FN_Prelude_46RealFrac_46Prelude_46Real[]; extern Node FN_Prelude_46Real_46Prelude_46Num[]; extern Node FN_Prelude_46fromInteger[]; extern Node FN_NHC_46Internal_46_95apply1[]; extern Node FN_Prelude_46Num_46Prelude_46Eq[]; extern Node FN_Prelude_46_61_61[]; extern Node FN_Prelude_46atan2[]; static Node startLabel[] = { bytes2word(0,0,2,0) , bytes2word(1,1,0,2) , useLabel(CT_v202) ,}; Node FN_Complex_46phase[] = { bytes2word(NEEDSTACK_I16,PUSH_ZAP_ARG_I2,EVAL,NEEDHEAP_I32) , bytes2word(UNPACK,2,HEAP_CVAL_I3,HEAP_ARG) , bytes2word(1,HEAP_CVAL_I4,HEAP_OFF_N1,3) , bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,3,HEAP_CVAL_P1) , bytes2word(6,HEAP_OFF_N1,3,PUSH_HEAP) , bytes2word(HEAP_CVAL_P1,7,HEAP_OFF_N1,3) , bytes2word(HEAP_CADR_N1,1,PUSH_P1,0) , bytes2word(PUSH_P1,2,HEAP_CVAL_I3,HEAP_ARG) , bytes2word(1,HEAP_CVAL_I4,HEAP_OFF_N1,3) , bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,3,HEAP_CVAL_P1) , bytes2word(8,HEAP_OFF_N1,3,PUSH_HEAP) , bytes2word(HEAP_CVAL_P1,9,HEAP_OFF_N1,3) , bytes2word(EVAL,NEEDHEAP_I32,APPLY,2) , bytes2word(SLIDE_P1,1,EVAL,NEEDHEAP_I32) , bytes2word(JUMPFALSE,76,0,HEAP_CVAL_I3) , bytes2word(HEAP_ARG,1,HEAP_CVAL_I4,HEAP_OFF_N1) , bytes2word(3,HEAP_CVAL_I5,HEAP_OFF_N1,3) , bytes2word(HEAP_CVAL_P1,6,HEAP_OFF_N1,3) , bytes2word(PUSH_HEAP,HEAP_CVAL_P1,7,HEAP_OFF_N1) , bytes2word(3,HEAP_CADR_N1,1,PUSH_P1) , bytes2word(0,PUSH_P1,3,HEAP_CVAL_I3) , bytes2word(HEAP_ARG,1,HEAP_CVAL_I4,HEAP_OFF_N1) , bytes2word(3,HEAP_CVAL_I5,HEAP_OFF_N1,3) , bytes2word(HEAP_CVAL_P1,8,HEAP_OFF_N1,3) , bytes2word(PUSH_HEAP,HEAP_CVAL_P1,9,HEAP_OFF_N1) , bytes2word(3,EVAL,NEEDHEAP_I32,APPLY) , bytes2word(2,SLIDE_P1,1,EVAL) , bytes2word(NEEDHEAP_I32,JUMPFALSE,23,0) , bytes2word(PUSH_CADR_N1,1,HEAP_CVAL_I3,HEAP_ARG) , bytes2word(1,HEAP_CVAL_I4,HEAP_OFF_N1,3) , bytes2word(HEAP_CVAL_I5,HEAP_OFF_N1,3,PUSH_HEAP) , bytes2word(HEAP_CVAL_P1,6,HEAP_OFF_N1,3) , bytes2word(EVAL,NEEDHEAP_I32,APPLY,1) , /* v193: (byte 1) */ bytes2word(RETURN_EVAL,PUSH_P1,0,PUSH_P1) , bytes2word(2,PUSH_HEAP,HEAP_CVAL_P1,10) , bytes2word(HEAP_ARG,1,ZAP_ARG_I1,ZAP_STACK_P1) , bytes2word(4,ZAP_STACK_P1,3,EVAL) , bytes2word(NEEDHEAP_I32,APPLY,2,RETURN_EVAL) , bytes2word(ENDCODE,0,0,0) , bytes2word(0,0,0,0) , 0 , CONSTRW(0,0) , /* CT_v202: (byte 0) */ HW(8,2) , 0 ,}; Node F0_Complex_46phase[] = { CAPTAG(useLabel(FN_Complex_46phase),2) , VAPTAG(useLabel(FN_Prelude_46RealFloat_46Prelude_46RealFrac)) , VAPTAG(useLabel(FN_Prelude_46RealFrac_46Prelude_46Real)) , VAPTAG(useLabel(FN_Prelude_46Real_46Prelude_46Num)) , VAPTAG(useLabel(FN_Prelude_46fromInteger)) , VAPTAG(useLabel(FN_NHC_46Internal_46_95apply1)) , VAPTAG(useLabel(FN_Prelude_46Num_46Prelude_46Eq)) , VAPTAG(useLabel(FN_Prelude_46_61_61)) , VAPTAG(useLabel(FN_Prelude_46atan2)) ,};