Compiler error- Silverfrost FTN95 1

[johnnydarten]

Dear all,

I'm a Fortran beginner and I have a problem with PARAMETER definition within a file that I'm going to include in my main program. The problem arises when I got the following warning:

warning 533 - This declaration of PARAMETER MEASUREPT will result in a loss of precision

Where the line upon which the compiler objects is:

PARAMETER (MEASUREPT=0.0015,MEASUREANGLE=0)

I don't understand what is the problem with this definition and I'm afraid this might cause a hidden numerical error after that which will be hard to track....Can someone help?

Regards,
Johnnydarten

 

[FJacq]

Did you precise that MEASUREPT is a real value ? By default variable starting by I,J,K,L,M or N are integer values. So MEASUREPT becomes equal to zero (the nearest integer just below 0.0015), which justifies the comment of the compiler (loss of precision).

To correct that :

      REAL measurept
      PARAMETER(measurept=0.0015)

François Jacq