arb/acb/real_ceil.c

28 lines
710 B
C
Raw Permalink Normal View History

/*
Copyright (C) 2018 Fredrik Johansson
This file is part of Arb.
Arb is free software: you can redistribute it and/or modify it under
the terms of the GNU Lesser General Public License (LGPL) as published
by the Free Software Foundation; either version 2.1 of the License, or
(at your option) any later version. See <http://www.gnu.org/licenses/>.
*/
#include "acb.h"
void
acb_real_ceil(acb_t res, const acb_t z, int analytic, slong prec)
{
if (!acb_is_finite(z) || (analytic && arb_contains_int(acb_realref(z))))
{
acb_indeterminate(res);
}
else
{
arb_ceil(acb_realref(res), acb_realref(z), prec);
arb_zero(acb_imagref(res));
}
}