Write output data problem

Write output data problem

Hi,

We have a problem in fortran format ,
What dose the meaning of "++++++++++++++" , "-----------------------"
and "???????????????????????"

Source Code below:
....
REAL*8, allocatable, save :: fnode(:,:),Fvec_xy(:),
& Fvec_yz(:),Fvec_xz(:),BME(:,:),nen(:),ioindex(:,:),
& BME2(:,:),BME3(:,:),BMR(:,:),BMR2(:,:),BMR3(:,:),
& vdr(:,:),xinlet(:,:)
...
real :: invWid(3),areatt(2),fnumref,dtmref,FND,FSP,AA,VMP,DTM,area
...
write (100,*) 'in-IOBS_1_1',FND,FSP
call flush(100)
write (100,*) 'in-IOBS_1_2',AA,VMP
call flush(100)
write (100,*) 'in-IOBS_1_3',DTM,area
call flush(100)
...
write (100,*) 'in IOBS_1_BME',BME(ncn,L)
call flush(100)
write (100,*) 'in IOBS_1_BME2',BME2(ncn,L)
call flush(100)
write (100,*) 'in IOBS_1_BME3',BME3(ncn,L)
call flush(100)
...
Correct output Result:
in-IOBS_1_1 0.000000E+00 1.000000
in-IOBS_1_2 0.000000E+00 353.4730
in-IOBS_1_3 1.000000 8.256124
in IOBS_1_BME 0.00000000000000D+000
in IOBS_1_BME2 0.00000000000000D+000
in IOBS_1_BME3 0.00000000000000D+000
Incorrect output Result:
in-IOBS_1_1 -1.000000 1.000000
in-IOBS_1_2 ++++++++++++++ 353.4730
in-IOBS_1_3 1.000000 8.256124
in IOBS_1_BME -----------------------
in IOBS_1_BME2 -----------------------
in IOBS_1_BME3 -----------------------

in IOBS_1_BME 0.00000000000000D+000
in IOBS_1_BME2 1.00000000000000
in IOBS_1_BME3 ???????????????????????
Regards,

Yuhming

3 posts / 0 new
Last post
For more complete information about compiler optimizations, see our Optimization Notice.

The Intel 6.x and 7.x compilers used these formats to display +Infinity, -Infinity, and NotaNumber results. Those patterns are likely generated by arithmetic exceptions, as specified by IEEE-754 and successor standards.

Thanks a lot ...
We will add somemachine epsilon method to avoid.

Leave a Comment

Please sign in to add a comment. Not a member? Join today