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 

Native %pl
Goto page Previous  1, 2, 3, 4, 5, 6, 7, 8
 
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> ClearWin+
View previous topic :: View next topic  
Author Message
Kenneth_Smith



Joined: 18 May 2012
Posts: 697
Location: Hamilton, Lanarkshire, Scotland.

PostPosted: Tue Apr 18, 2017 7:20 am    Post subject: Reply with quote

John, You are correct I've not tried the log scales - must try harder! However I have not had to go back one set of dlls. Ken
Back to top
View user's profile Send private message Visit poster's website
Kenneth_Smith



Joined: 18 May 2012
Posts: 697
Location: Hamilton, Lanarkshire, Scotland.

PostPosted: Wed Apr 19, 2017 10:19 am    Post subject: Reply with quote

Paul,
Can you point me in the right direction and confirm the syntax for using the independent option. I am struggling to make the third %pl call in the code below work, where the two graphs with different x axis values are plotted together. Code below fails to draw anything in the third %pl region. I re-read the help file many times and tried various combinations with no success.

Thanks

Ken

Code:
program test
implicit none
include<windows.ins>
real(kind=2) x_array_1(10), x_array_2(10), y_array_1(10), y_array_2(10)
integer i

do i = 1, 10
  x_array_1(i) = i
  x_array_2(i) = i + 5
  y_array_1(i) = x_array_1(i)**0.75d0
  y_array_2(i) = x_array_2(i)**0.5d0
end do

i = winio@('%ww&')
i = winio@('%pl[native,x_array,n_graphs=1]&',300,300,10,x_array_1,y_array_1)
i = winio@('%pl[native,x_array,n_graphs=1]&',300,300,10,x_array_2,y_array_2)
i = winio@('%pl[native,x_array,n_graphs=2,independent]&',300,300,10,x_array_1,y_array_1,x_array_2,y_array_2)
i = winio@('%ff')

end program test
Back to top
View user's profile Send private message Visit poster's website
PaulLaidler
Site Admin


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

PostPosted: Wed Apr 19, 2017 12:02 pm    Post subject: Reply with quote

Ken

For two independent graphs together the number of points must be passed as an array. So in the third %pl, 10 becomes np with

integer np(2)
np = 10
Back to top
View user's profile Send private message AIM Address
Kenneth_Smith



Joined: 18 May 2012
Posts: 697
Location: Hamilton, Lanarkshire, Scotland.

PostPosted: Wed Apr 19, 2017 12:25 pm    Post subject: Reply with quote

Thanks Paul.

Might be worthwhile changing the text in the help file

from:

In this case the number of data points and the optional x-start and x-increment data must be presented as variables (for one graph) or as arrays (for one or more graphs) where the array index corresponds to the order in which the graphs are coded.

to:-

In this case the number of data points and the optional x-start and x-increment data must be presented as variables (for one graph) or as an array (for one or more graphs) where the array index corresponds to the order in which the graphs are coded.

It was the plural "arrays" which confused me.

Thanks

Ken
Back to top
View user's profile Send private message Visit poster's website
PaulLaidler
Site Admin


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

PostPosted: Thu Apr 20, 2017 4:02 pm    Post subject: Reply with quote

Thanks Ken. I have changed the text.
Back to top
View user's profile Send private message AIM Address
Display posts from previous:   
Post new topic   Reply to topic    forums.silverfrost.com Forum Index -> ClearWin+ All times are GMT + 1 Hour
Goto page Previous  1, 2, 3, 4, 5, 6, 7, 8
Page 8 of 8

 
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