Groups | Search | Server Info | Login | Register

Groups > comp.soft-sys.math.mathematica > #16943

Re: Compiler output type

Show all headers | View raw

collatz = Compile[{{n, _Integer}}, If[EvenQ[n], n/2, 3 n + 1] //
IntegerPart];


collatz2 = Compile[{{n, _Integer}}, If[EvenQ[n], n/2, 3 n + 1] // Round];


m = 1000000;


Timing[t1 = Table[collatz[n], {n, m}];]


{0.291132, Null}


Timing[t2 = Table[collatz2[n], {n, m}];]


{0.322116, Null}


Timing[t3 = Table[If[EvenQ[n], n/2, 3 n + 1], {n, m}];]


{2.352646, Null}


t1 == t2 == t3


True



Bob Hanlon




On Mon, May 12, 2014 at 12:43 AM, Harvey P. Dale <hpd@hpdale.org> wrote:

>         Some compiled functions yield reals even if the input and
> necessary output are integers.  How can I force the output to be an integer
> rather than a real in such cases?  To be clear, not all compiled program
> output produces reals; some compiled programs, given integer inputs,
> produce integer outputs.  But some do not.  An example is:
>
> collatz = Compile[{{n, _Integer}}, If[EvenQ[n], n/2, 3 n + 1]]
>
> It produces real rather than integer output, and I'd like to force integer
> output if possible.
>
>         Thanks
>
>         Best,
>
>         Harvey
>
>

Back to comp.soft-sys.math.mathematica | Previous | Next | Find similar

Thread

Re: Compiler output type Bob Hanlon <hanlonr357@gmail.com> - 2014-05-13 02:26 +0000

csiph-web