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 

Search found 553 matches
forums.silverfrost.com Forum Index
Author Message
  Topic: Find current directory
Kenneth_Smith

Replies: 11
Views: 338

PostForum: Support   Posted: Wed Jan 25, 2023 11:02 am   Subject:
Mecej4, Paul,

Thank you both for your explanations. I understand what is happening now.

I knew how to make Danís first example work Ė the result of brute force testing to find what works ye ...
  Topic: Find current directory
Kenneth_Smith

Replies: 11
Views: 338

PostForum: Support   Posted: Tue Jan 24, 2023 11:03 pm   Subject:
I find this confusing. If the EXTERNAL declaration is required in the module in Danís code, why is it not also necessary in my modified version of Danís code?
  Topic: Find current directory
Kenneth_Smith

Replies: 11
Views: 338

PostForum: Support   Posted: Tue Jan 24, 2023 12:48 pm   Subject:
Try this instead:

module mod1
character(len=256) CurrentDirectoryName

contains

integer function aa()
character(len=256) CURDIR@
CurrentDirectoryName = CURDIR@&# ...
  Topic: %ob changes shape/position as window is resized
Kenneth_Smith

Replies: 24
Views: 990

PostForum: ClearWin+   Posted: Sat Jan 07, 2023 11:47 pm   Subject:
Or using %pm:

program bill2
use clrwin
implicit none
integer iw
integer cb_1, cb_2, cb_3
external cb_1, cb_2, cb_3
iw = winio@('%mn[Exit]&','exit')
iw = winio@('%pm& ...
  Topic: %ob changes shape/position as window is resized
Kenneth_Smith

Replies: 24
Views: 990

PostForum: ClearWin+   Posted: Sat Jan 07, 2023 9:38 pm   Subject:
I have run into to the same problem. No amount of nesting hidden boxes appears to help in this case. To overcome this I have used either a menu item or a mouse click in the graphics region to cause ...
  Topic: Fortran 2003 and 2008 features
Kenneth_Smith

Replies: 144
Views: 50081

PostForum: Suggestions   Posted: Thu Jan 05, 2023 12:42 pm   Subject:
Paul, One to look at when you get the opportunity (a very minor issue).
complex z1
z1%re = 3.0 ; z1%im = 4.0
end
The Compiler says (Ver 8.95): "Warning 298 - Variable Z1 has been used withou ...
  Topic: Fortran 2003 and 2008 features
Kenneth_Smith

Replies: 144
Views: 50081

PostForum: Suggestions   Posted: Tue Nov 22, 2022 5:03 pm   Subject:
Paul,
Thanks for implementing the 2008 Standard support for complex z. This will be very useful.
Ken
  Topic: ClearWin+ tutorial 2
Kenneth_Smith

Replies: 1
Views: 1061

PostForum: ClearWin+   Posted: Mon Nov 07, 2022 11:17 am   Subject:
Paul, Thanks for both of these tutorials. Very useful to see some parts of Clearwin+ that I have never had cause to use until now. These simple tutorials make the possibilities of Clearwin+ much more ...
  Topic: Suggestion %pl[native, scale=****] + CHANGE_PLOT_CHR@
Kenneth_Smith

Replies: 19
Views: 2108

PostForum: ClearWin+   Posted: Mon Oct 31, 2022 12:44 pm   Subject:
Dan, I tried adding the line you suggested.

CALL winop@('%plnapp
module surge_arrester_mod
use clrwin
implicit none
integer, parameter :: dp = kind(1.d0)
integer, parameter & ...
  Topic: Suggestion %pl[native, scale=****] + CHANGE_PLOT_CHR@
Kenneth_Smith

Replies: 19
Views: 2108

PostForum: ClearWin+   Posted: Sat Oct 29, 2022 4:33 pm   Subject:
Paul, I can confirm that this works as expected for X64.

There is still a minor problem with Win32. If you try the example below, compile with Win32, and look at the x-axis labeling at 10**-4, and ...
  Topic: Fortran 2003 and 2008 features
Kenneth_Smith

Replies: 144
Views: 50081

PostForum: Suggestions   Posted: Tue Oct 25, 2022 10:33 am   Subject:
Thanks Paul, I can see ATAN(y,x) is implemented in the latest download.
  Topic: Ver 8.91.1 compiler_version
Kenneth_Smith

Replies: 3
Views: 1172

PostForum: Support   Posted: Fri Oct 21, 2022 3:04 pm   Subject:
I can replicate this problem.

I did note that if CONTAINS is present - but contains no functions or subroutines, the code runs as expected.
  Topic: Fortran 2003 and 2008 features
Kenneth_Smith

Replies: 144
Views: 50081

PostForum: Suggestions   Posted: Wed Oct 19, 2022 1:57 pm   Subject:
Thanks Paul, I think it is important that the core math functions of the later versions of the standard find their way into Silverfrost Fortran - and you have come a long way toward achieving this si ...
  Topic: Fortran 2003 and 2008 features
Kenneth_Smith

Replies: 144
Views: 50081

PostForum: Suggestions   Posted: Sun Oct 16, 2022 10:59 pm   Subject:
In Fortran 2008, the intrinsic function ATAN now has an extra form ATAN(Y,X), which is exactly the same as ATAN2(Y,X), i.e. the following code is valid in Fortran 2008:

print*, ATAN(1.d0,1.d0&# ...
  Topic: Interface intent differs from subroutine intent
Kenneth_Smith

Replies: 6
Views: 1179

PostForum: Support   Posted: Thu Sep 08, 2022 10:37 am   Subject: Interface intent differs from subroutine intent
The following code compiles in FTN95 without any errors or warnings, while other compilers either issue an error or a warning.

I don't think this is a major problem (in terms of the executable gene ...
 
Page 1 of 37 Goto page 1, 2, 3 ... 35, 36, 37  Next
All times are GMT + 1 Hour
Jump to:  


Powered by phpBB © 2001, 2005 phpBB Group