View previous topic :: View next topic |
Author |
Message |
acw
Joined: 04 Nov 2005 Posts: 165 Location: Darkest Devon
|
Posted: Thu Oct 24, 2019 1:28 pm Post subject: Extraneous space in auto-width real format |
|
|
When using auto-width format descriptor for real numbers a leading space is incorrectly added. This does not happen with auto-width integer format.
Code: |
real*8:: fvalue = 42.5
integer:: ivalue = 23
print 100, fvalue ! expected "f0.2=42.50", actual "f0.2= 42.50"
100 format('f0.2=',F0.2)
print 200, ivalue ! expected and actual "I0=23"
200 format('I0=',I0)
|
This is in FTN95 8.50, used to work in 7.10 but I haven't tried any intermediate releases. |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7924 Location: Salford, UK
|
Posted: Mon Oct 28, 2019 11:22 am Post subject: |
|
|
I have made a note that this needs investigation. |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7924 Location: Salford, UK
|
Posted: Thu Oct 31, 2019 5:23 pm Post subject: |
|
|
This regression has now been fixed for the next release of the DLLs. |
|
Back to top |
|
|
DanRRight
Joined: 10 Mar 2008 Posts: 2816 Location: South Pole, Antarctica
|
Posted: Fri Nov 01, 2019 12:55 pm Post subject: |
|
|
Never heard about 0 format.
Couple questions about format
1) What is format like this '(es13.6)' I found on the web?
2) How to read this format with commas xxx,xxx,xxx from Windows DIR
Total Files Listed:
16 File(s) 719,806,745 bytes
2 Dir(s) 206,787,850,240 bytes free |
|
Back to top |
|
|
John-Silver
Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Sat Nov 02, 2019 12:57 am Post subject: |
|
|
Paul wriìote:
Quote: | ... fixed for the next release of the DLLs. |
... due when ? _________________ ''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... " |
|
Back to top |
|
|
JohnCampbell
Joined: 16 Feb 2006 Posts: 2554 Location: Sydney
|
Posted: Sat Nov 02, 2019 1:51 pm Post subject: Re: |
|
|
Dan,
16 File(s) 719,806,745 bytes
2 Dir(s) 206,787,850,240 bytes free
To read the above in Fortran could be difficult:
FTN95 treats 719,806,745 as 3 values separated by a ","
So to read this you would need to read as characters and parse the numeric value. While EN does modify scientific notation and output as multiple of 1,000 and so groups of 3 digits, it does not insert ","
In FTN95, the business format is used to include commas, but I don't think you can use the business format as an input format.
As to "Never heard about 0 format", I0 and F0.n have been around since F90, while engineering (EN) and scientific (ES) notation were introduced in F95. G0. and E0. have been introduced since, although more complex.
My understanding is that support for comma "," is unique to FTN95 and has not been adopted in more recent Fortran. |
|
Back to top |
|
|
DanRRight
Joined: 10 Mar 2008 Posts: 2816 Location: South Pole, Antarctica
|
Posted: Sun Nov 03, 2019 11:33 am Post subject: |
|
|
Thanks, John |
|
Back to top |
|
|
acw
Joined: 04 Nov 2005 Posts: 165 Location: Darkest Devon
|
Posted: Mon Feb 03, 2020 12:45 pm Post subject: |
|
|
Paul,
I've just upgraded to 8.60 - liking the VS2019 plugin but sadly this particular bug still appears to be present. Salflib dll version 12.12.29.8 dated 29/12/2019. Any suggestions on a fix?
Cheers,
Alan |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7924 Location: Salford, UK
|
Posted: Mon Feb 03, 2020 3:18 pm Post subject: |
|
|
I will check this out to see what has gone wrong. |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7924 Location: Salford, UK
|
Posted: Mon Feb 03, 2020 3:35 pm Post subject: |
|
|
It turns out that the fix was only made to the 64 bit version. Almost all of the library code is common to 32 bits and 64 bits but unfortunately not in this case.
It may be necessary to wait a little while before I can send you a fix. |
|
Back to top |
|
|
John-Silver
Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Fri Feb 14, 2020 1:04 am Post subject: |
|
|
I hope that ftn95( doesn't get hamstrung by a variant strain of the self-inflicted 'NASTRAN' bugs 'virus' of the 70's and 80's where bug fixes were only applied by MSc to the machine from which they were reported, resulting only in multiple recurrences on other machines requiring repeat fixes. _________________ ''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... " |
|
Back to top |
|
|
|