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 696 matches
forums.silverfrost.com Forum Index
Author Message
  Topic: Allocate on assignment to grow an array.
Kenneth_Smith

Replies: 25
Views: 1869

PostForum: Support   Posted: Wed Jan 31, 2024 1:54 pm   Subject:
John,

It gets interesting if the lower bound of the source array is not 1. Hopefully this example illustrates this particular devilry.
real, allocatable :: a(:), b(:& ...
  Topic: Allocate on assignment to grow an array.
Kenneth_Smith

Replies: 25
Views: 1869

PostForum: Support   Posted: Sat Jan 27, 2024 9:51 am   Subject:
Thanks Paul, I think that will fix John's issue.
  Topic: Allocate on assignment to grow an array.
Kenneth_Smith

Replies: 25
Views: 1869

PostForum: Support   Posted: Fri Jan 26, 2024 11:52 am   Subject:
John, Mecej4, Paul, thanks for the suggestions, improvements and feedback on my queries.


John, the following simple example only runs as expected with checkmate for both win32 and x64, so I susp ...
  Topic: Allocate on assignment to grow an array.
Kenneth_Smith

Replies: 25
Views: 1869

PostForum: Support   Posted: Thu Jan 25, 2024 1:27 pm   Subject:
Paul,

I've opened another can of Ken's worms!

For the original problem, I wondered about the possibility of using the 2003 intrinsic MOVE_ALLOC. Unfortunately, I cannot get this to work, havi ...
  Topic: Allocate on assignment to grow an array.
Kenneth_Smith

Replies: 25
Views: 1869

PostForum: Support   Posted: Tue Jan 23, 2024 11:31 am   Subject:
Thanks Paul,

In addition using a temporary does not cause the checkmate failure, which is a big plus Smile

As I don't want to inhibit bounds checking (with checkmate) I think I just need to avoid ...
  Topic: Allocate on assignment to grow an array.
Kenneth_Smith

Replies: 25
Views: 1869

PostForum: Support   Posted: Tue Jan 16, 2024 8:53 pm   Subject: Allocate on assignment to grow an array.
I have been experimenting with allocate on assigment and the following code uses this to to increment the dimensions of an array:

program p
implicit none
real, allocatable :: a(:& ...
  Topic: Intersection of two curves
Kenneth_Smith

Replies: 9
Views: 1106

PostForum: General   Posted: Wed Jan 10, 2024 11:50 am   Subject:
Lester,

I suspect your problem is related to the %pl options i = winio@('%pl',900,900,[n,n,n_intersects],dble(x1),dble(y1),dble(x2),dble(y2),dble(x ...
  Topic: Intersection of two curves
Kenneth_Smith

Replies: 9
Views: 1106

PostForum: General   Posted: Tue Jan 09, 2024 10:47 am   Subject:
My first attempt:
winapp
program intersect_between_curves
USE clrwin
integer, parameter :: n=301
integer :: i, j, n_intersects
real :: x1(n), y1(n), x2 ...
  Topic: Set tight axis limits
Kenneth_Smith

Replies: 4
Views: 836

PostForum: ClearWin+   Posted: Mon Jan 08, 2024 8:42 pm   Subject:
Add
call winop@('%pl[x_min=0,x_max=100]')
immediately before
iw = winio@('%pl&',1400,800,k,dble(vec),dble(real_part),dble(imaginary_part))
  Topic: Basic query about plotting
Kenneth_Smith

Replies: 10
Views: 1393

PostForum: General   Posted: Sat Dec 30, 2023 8:34 pm   Subject:
Lester,

In your example, you are calling export_image@ before the terminating winio@ call. This is too soon to call export_image@ as the window containing the graphic does not yet exist.

Expo ...
  Topic: Basic query about plotting
Kenneth_Smith

Replies: 10
Views: 1393

PostForum: General   Posted: Fri Dec 29, 2023 7:55 pm   Subject:
Yes, the plot can be exported to the clipboard via the function GRAPHICS_TO_CLIPBOARD@ and thereafter "pasted" in to a word document, or the function EXPORT_IMAGE@ can used used to save the ...
  Topic: Basic query about plotting
Kenneth_Smith

Replies: 10
Views: 1393

PostForum: General   Posted: Wed Dec 27, 2023 2:57 pm   Subject:
Does this help? I have added a few lines to your program which allows the phase plane plot to be displayed using the %pl format code. Further details can be found searching the help file for "N ...
  Topic: Couple minor Clearwin problems
Kenneth_Smith

Replies: 18
Views: 10930

PostForum: ClearWin+   Posted: Wed Dec 13, 2023 1:35 pm   Subject:
Paul, No problem - it was a "I wonder if ....." moment.
  Topic: Couple minor Clearwin problems
Kenneth_Smith

Replies: 18
Views: 10930

PostForum: ClearWin+   Posted: Wed Dec 13, 2023 12:15 pm   Subject:
Paul,

Will the function associated with the reset button be available from the fortran code i.e. to provide a means of undoing all calls to change_plot_dbl@ etc?
  Topic: first time user of %PL
Kenneth_Smith

Replies: 18
Views: 11410

PostForum: ClearWin+   Posted: Fri Nov 24, 2023 4:54 pm   Subject:
John,

If n_graphs is going to become a very large number, then you should look at the %pl option module data_mod
integer, parameter :: n = 10
real*8 :: x(n) = [(i, ...
 
Page 1 of 47 Goto page 1, 2, 3 ... 45, 46, 47  Next
All times are GMT + 1 Hour
Jump to:  


Powered by phpBB © 2001, 2005 phpBB Group