Help needed in floating point calc in fortran

[cslam]

Help!
I know almost nothing about Fortran but need to use a program by others. I encountered a problem in determining the "Single-Precision Machine Constants" for my desktop computer (intel pentium dual core 5200 2mb l2 2.5ghz 800 fsb with Window Vista). Please take a look at following part or comment in the code. Could anyone help me to determne R1MACH(1 to 5)?

C Single-Precision Machine Constants r1mach27
C R1MACH(1) = B**(EMIN-1), the smallest positive magnitude. r1mach28
C R1MACH(2) = B**EMAX*(1 - B**(-T)), the largest magnitude. r1mach29
C R1MACH(3) = B**(-T), the smallest relative spacing. r1mach30
C R1MACH(4) = B**(1-T), the largest relative spacing. r1mach31
C R1MACH(5) = LOG10(B) r1mach32
C***REFERENCES FOX, P.A., HALL, A.D., SCHRYER, N.L, *FRAMEWORK FOR r1mach33
C A PORTABLE LIBRARY*, ACM TRANSACTIONS ON MATHE- r1mach34
C MATICAL SOFTWARE, VOL. 4, NO. 2, JUNE 1978, r1mach35
C PP. 177-188. r1mach36

 

[silverfrost]

http://www.tek-tips.com/viewthread.cfm?qid=1296207&page=9

 

[quicknote]

As a scientist, my first recommendation would be to consult with someone who is familiar with Fortran and programming in general. It can be challenging to troubleshoot code without prior knowledge and experience in a specific programming language. In addition, it may be helpful to refer to the references listed in the code for further guidance.

However, based on the information provided, it seems like the code is trying to calculate some machine constants for single-precision floating point numbers. These constants are important for understanding the precision and range of numbers that can be represented in a specific computer system.

To determine R1MACH(1 to 5), you would need to know the base (B) and the exponent range (EMIN and EMAX) of the floating point representation in Fortran. These values may vary depending on the compiler and system being used. You can try looking for documentation or online resources that provide this information for your specific system.

Alternatively, you can also try experimenting with different values for B, EMIN, and EMAX to see how they affect the results. This can give you a better understanding of how these constants are calculated and their significance in your program.

Overall, my main advice would be to seek help from someone familiar with Fortran and to do some further research on the specific machine constants you are trying to determine. Good luck!