#include <tgmath.h>
#include <gmp.h>
#include <mpfr.h>
#include <stdio.h>
#include <stdbool.h>

char *name = "math.arg on complex";

double f_if(float re, float im) {
        float r25647 = im;
        float r25648 = re;
        float r25649 = atan2(r25647, r25648);
        return r25649;
}

double f_id(double re, double im) {
        double r25650 = im;
        double r25651 = re;
        double r25652 = atan2(r25650, r25651);
        return r25652;
}


double f_of(float re, float im) {
        float r25653 = im;
        float r25654 = re;
        float r25655 = atan2(r25653, r25654);
        return r25655;
}

double f_od(double re, double im) {
        double r25656 = im;
        double r25657 = re;
        double r25658 = atan2(r25656, r25657);
        return r25658;
}

void mpfr_fmod2(mpfr_t r, mpfr_t n, mpfr_t d, mpfr_rnd_t rmd) {
        mpfr_fmod(r, n, d, rmd);
        if (mpfr_cmp_ui(r, 0) < 0) mpfr_add(r, r, d, rmd);
}


static mpfr_t r25659, r25660, r25661;

void setup_mpfr_f_im() {
        mpfr_set_default_prec(336);
        mpfr_init(r25659);
        mpfr_init(r25660);
        mpfr_init(r25661);
}

double f_im(double re, double im) {
        mpfr_set_d(r25659, im, MPFR_RNDN);
        mpfr_set_d(r25660, re, MPFR_RNDN);
        mpfr_atan2(r25661, r25659, r25660, MPFR_RNDN);
        return mpfr_get_d(r25661, MPFR_RNDN);
}

static mpfr_t r25662, r25663, r25664;

void setup_mpfr_f_fm() {
        mpfr_set_default_prec(336);
        mpfr_init(r25662);
        mpfr_init(r25663);
        mpfr_init(r25664);
}

double f_fm(double re, double im) {
        mpfr_set_d(r25662, im, MPFR_RNDN);
        mpfr_set_d(r25663, re, MPFR_RNDN);
        mpfr_atan2(r25664, r25662, r25663, MPFR_RNDN);
        return mpfr_get_d(r25664, MPFR_RNDN);
}

static mpfr_t r25665, r25666, r25667;

void setup_mpfr_f_dm() {
        mpfr_set_default_prec(336);
        mpfr_init(r25665);
        mpfr_init(r25666);
        mpfr_init(r25667);
}

double f_dm(double re, double im) {
        mpfr_set_d(r25665, im, MPFR_RNDN);
        mpfr_set_d(r25666, re, MPFR_RNDN);
        mpfr_atan2(r25667, r25665, r25666, MPFR_RNDN);
        return mpfr_get_d(r25667, MPFR_RNDN);
}