# Fortran to Xojo

**URL:** <https://forum.xojo.com/t/fortran-to-xojo/83030>\
**Category:** General\
**Created:** [October 31, 2024, 5:34pm UTC](https://forum.xojo.com/t/fortran-to-xojo/83030 "2024-10-31T17:34:03Z")\
**Posts on this page:** 3\
**Page:** 1

<div class="post-metadata">

**Author:** ![Benoît\_Bouillon](https://forum.xojo.com/letter_avatar_proxy/v4/letter/b/919ad9/32.png) [@Benoît\_Bouillon](https://forum.xojo.com/u/Beno%C3%AEt_Bouillon)\
**Post date:** [October 31, 2024, 5:34pm UTC](https://forum.xojo.com/t/fortran-to-xojo/83030/1 "2024-10-31T17:34:03Z")

</div>

Hello my friends,  
I’m trying to translate a Fortran program into Xojo.  
This program is about finding all the roots of a polynomial “Algorithm 493: Zeros of a Real Polynomial”.  
I have a few questions regarding certain values.  
ETA : The maximum relative representation error which can be described as the  
smallest positive floating-point number such that 1 + ETA \> 1.  
INFIN : The largest floating-point number.  
SMALNO : The smallest positive floating-point number if the exponent range differs in single and double precision then SMALNO and INFIN should indicate the smaller range.  
BASE : The base of the floating-point number system used.

The values below correspond to the Burroughs B6700 :  
BASE = 8  
ETA = .5\*BASE\*\*(1-26)  
INFIN = 4.3E68  
SMALNO = 1.0E-45

With Xojo (2024):  
BASE = ?  
ETA : I don’t understand the exponent (1-26).  
The maximum value of a Double is (INFIN): ±1.79769313486231570814527423731704357e+308  
The minimum value towards zero is (SMALNO): ±4.94065645841246544176568792868221372e-324

If anyone could enlighten me I would be very grateful.

---

<div class="post-metadata">

**Author:** ![Benoît\_Bouillon](https://forum.xojo.com/letter_avatar_proxy/v4/letter/b/919ad9/32.png) [@Benoît\_Bouillon](https://forum.xojo.com/u/Beno%C3%AEt_Bouillon)\
**Post date:** [November 6, 2024, 3:38pm UTC](https://forum.xojo.com/t/fortran-to-xojo/83030/2 "2024-11-06T15:38:35Z")

</div>

I got the answer from a Fortran forum.  
I discovered and learned a lot about IEEE 754 on number management in computer science. [IEEE 754 — Wikipédia](https://fr.wikipedia.org/wiki/IEEE_754)  
I don’t know how to share a program on this forum but if anyone is interested in a program that gives the roots of any polynomial (even with complex roots), I will be happy to provide it.

---

<div class="post-metadata">

**Author:** ![Anthony\_Dellos](https://forum.xojo.com/user_avatar/forum.xojo.com/anthony_dellos/32/208_2.png) [@Anthony\_Dellos](https://forum.xojo.com/u/Anthony_Dellos)\
**Post date:** [November 6, 2024, 4:00pm UTC](https://forum.xojo.com/t/fortran-to-xojo/83030/3 "2024-11-06T16:00:14Z")

</div>

@Benoit_Griveau smaller files, saved as a Xojo binary project and zipped can be dragged into your post in the browser (just drag it into the text field) and will appear like this:

[sample shared project.xojo\_binary\_project.zip](https://forum.xojo.com/uploads/short-url/4ZC3Ljbk0peioQB6wXdZ49MTrOw.zip) (4.2 KB)