Floating Point Error

[Asta1]

Can anyone help me?

I get a warning for this line saying Comparing floating point quantities for equality may give misleading results.
(step is an real)

DO TIME=0+STEP,15,STEP

I then get a run time error stating 'floating point co-processor fault at address 004014ee in file...'
at this line (the line it fails on varies depending on what step is set at but it's a similar equation)

VELK2=STEP*(((-DAMPC*(VELO+(VELK1/2)))-(SPRING*(DISP+(DISK1/2))))/MASS)

Can anyone shed some light on what might be causing this?

I'm running F95 on Windows 2000 Pro

Thanks

 

[xwb]

The easiest way to work out something like that is to break up the formula. It is possible that MASS is zero

 

[Asta1]

Nope all the variables are set to a value

 

[zeitghost]

As xwb suggested, break the formula into little pieces.

Then you'll find where it gets screwed up.

 

[zeitghost]

Nice to see classical FORTRAN WITHEVERTHINGINCAPITALSWITHNOSPACESWHATEVER by the way...

 

[xwb]

Quite refreshing isn't it, Fortran written in its traditional form.

 

[zeitghost]

Yup.

Makes me want to fire up the card punch & start typing.

Or not...