The number 865398.78 is represented in single precision in your code. Single precision can handle about 7 significant digits, while your number has 8. You can make it double precision by writing
x=x+865398.78_8
More Related Contents:
- Is There a Better Double-Precision Assignment in Fortran 90?
- Where to put `implicit none` in Fortran
- What are the ways to pass a set of variable values through the subroutine to a function without common block?
- gfortran does not allow character arrays with varying component lengths
- What does “real*8” mean?
- What is the purpose of result variables in Fortran?
- Fortran IF statement with numbers/labels rather than another statement
- Function in fortran, passing array in, receiving array out
- Fortran intent(inout) versus omitting intent
- Fortran array cannot be returned in function: not a DUMMY variable
- Using do loop in a Fortran 90 program to read different number of lines for n frames?
- Fortran SAVE statement
- Fortran running error
- Why Segmentation fault is happening in this openmp code?
- Unexpected “padding” in a Fortran unformatted file
- What is an undefined reference/unresolved external symbol error and how do I fix it in Fortran?
- How to initialize two-dimensional arrays in Fortran
- Format string for output dependent on a variable
- How to pass allocatable arrays to subroutines in Fortran
- Sending 2D arrays in Fortran with MPI_Gather
- Print to standard output from a function defined in an Fortran module
- Why is this a function declared inside the module and then used somewhere else in the same module not seen by the linker?
- Does Fortran have undefined behavior?
- Reading data file in Fortran with known number of lines but unknown number of entries in each line
- What flags do you set for your GFORTRAN debugger/compiler to catch faulty code?
- Providing an argument that has not the TARGET attribute to a procedure with a dummy argument that has the TARGET attribute
- Difference between intent(out) and intent(inout)
- How to increase array size on-the-fly in Fortran?
- Passing size as argument VS assuming shape in Fortran procedures
- MPI_Gather gives seg fault in the most basic code