forums.silverfrost.com Forum Index forums.silverfrost.com
Welcome to the Silverfrost forums
 
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Parameter Problem

 
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> 64-bit
View previous topic :: View next topic  
Author Message
EKruck



Joined: 09 Jan 2010
Posts: 188
Location: Aalen, Germany

PostPosted: Wed Nov 13, 2019 4:47 pm    Post subject: Parameter Problem Reply with quote

The following line provides something wrong and I cannot zoom out in the graphics.
Code:
    REAL*8,  PARAMETER :: FactorZoom= 1.1D0, FactorInvers= 1.0D0/FactorZoom

If I place as first executable statement
Code:
write (*,'(f12.6)') FactorInvers
it writes the correct value and further processing is ok.

If I use instead:
Code:
REAL*8,  PARAMETER :: FactorZoom= 1.1D0, FactorInvers= 0.9D0
everything works fine without the write statement.
Back to top
View user's profile Send private message Visit poster's website
PaulLaidler
Site Admin


Joined: 21 Feb 2005
Posts: 6076
Location: Salford, UK

PostPosted: Wed Nov 13, 2019 6:43 pm    Post subject: Reply with quote

What exactly is the problem. What does the code look like when it goes wrong?
Back to top
View user's profile Send private message
mecej4



Joined: 31 Oct 2006
Posts: 1205

PostPosted: Thu Nov 14, 2019 1:56 am    Post subject: Reply with quote

If the source code is being treated as fixed form source, the first line may get truncated to

Code:
    REAL*8,  PARAMETER :: FactorZoom= 1.1D0, FactorInvers= 1.0D0/FactorZ


Check the compiler options in effect and note the messages issued by the compiler.
Back to top
View user's profile Send private message
EKruck



Joined: 09 Jan 2010
Posts: 188
Location: Aalen, Germany

PostPosted: Sat Nov 16, 2019 8:20 am    Post subject: Reply with quote

Surprising: I compiled the complete software including all libraries anew with 8.40. The problem does not exist anymore without changes in the source code.
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> 64-bit All times are GMT + 1 Hour
Page 1 of 1

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group