forums.silverfrost.com

[FK_GER]

I've some problems to update an attached window. I've searched in the forum but I found no suitable help. Here, at first, the relevant part of my program:
(All data is declared correctly and available)

[Wilfried Linder]

Hi, I found the following information in the file cwplus.enh:

[FK_GER]

The last days I've tested some possibilities to find a solution, but with no great success.

In doing so the subroutine was modified:
(k3 controls, if an update is to be done. At the first call k3=1, then 2,3,...)

[JohnCampbell]

I am by no means an expert in %pl, but I am unsure of your selection (and definition) of the 2 windows you are using and the separate definition of arrays for each window.

If you are updating windows, are the variables ist, xdata and ydata different and unique to the 2 windows ?

I would expect that to have 2 widows that you are updating, then the %pl argument addresses must be separate/unique for the 2 windows and these addresses must be maintained for each window.

Could window_update@ (xdata) or update_window@(hndl_eiz) work better.
I assume hndl_eiz are supplied integer*4 handles and not returned integer(7) handles ?

Is the following change necessary (or where are the graphics objects defined) ?

[FK_GER]

From your replies I recognize, that still some more explanations are necessary about the process of drawing.
If inside of the higher-level iteration process the program turns up to the drawing part, the calling subroutine FLAPLO sets the calculated data XZZ,YZZ to REAL*8 XPLOT,YPLOT for plotting as follows:

[Wilfried Linder]

I'm not familiar with %pl but from a theoretical point of view I would suggest the following:

[1] Define a set of variables for both plots, like XPLOT_1 and YPLOT_1 for the first graphics, XPLOT_2 and YPLOT_2 for the second. Initialise them at the beginning to zero.

[2] Make the data transfer via a common block like COMMON /PL_DATA/ XPLOT_1,YPLOT_1,XPLOT_2,YPLOT_2 (instead of transferring them via the variables list of the subroutines).

In this way, you don't need handles nor select_graphics-object@() or similar, and also you make sure that all relevant data are present when calling simpleplot_redraw@().

Good luck!

[Wilfried Linder]

Just to illustrate what I mean - a very small test programme, my first attempt with %pl

[FK_GER]

Hi,Wilfried,
thanks for the example. But there are a lot of obstacles in order to transfer these procedures to my program:
- The creation of the plot-data is an expensive iteration process with a lot of subroutines, which couldn't be installed simply into a function like shown in the example.
- The predominant parts of the program source code is written in F77. All significant arrays, under it the plot arrays xplot(..,..) yplot(..,..), are dynamically dimensioned in the main program and transferred over the calling lists into the subroutines.
- These two plot arrays are used during the flow of the program from three subroutines with in their dimensions very different plot data to show the calculated results. To put these plot arrays into fixed dimensioned common-blocks would be meant, that than an own fixed common-block has to be created for each plot, instead of one array for all plots as now.
- A problem at your proposal is, that your program opens one window with two plots, which are updated. But my program opens two windows each with one plot, which should be updated one after another. In doing so I suppose problems with the allocation.

Seeing that the program works without an "updating-windows" process, the operating expence to realise these update process like your proposal is too great. Then the results will shown in multiple windows still and not in one window only. The program user don't notice that, because the windows lie on top of each other exactly.
Maybe a way will be found to realise an update process, which matches to my actual procedure.

[Wilfried Linder]

OK.

Two windows with each one plot is no problem. For variable dimensions of the arrays you may use a module. Below is my next example, first the module, then the main program, the rest given as subroutines. Now written in the traditional f77 fixed format.

Perhaps this can help a little bit. If you like you may contact me via wilfried.linder@uni-duesseldorf.de - this might be easier for larger code examples.

[Wilfried Linder]

Some additional remarks:

Both windows in the example before are created once. The calculation subroutine abc only updates the graphics but creates no new windows.

I think that simpleplot_redraw@() needs the array data to be present either in common blocks or in modules, but they cannot be transferred via the parameter list. I may be wrong...

[Wilfried Linder]

Next addition:

In my examples, I use one-dimensional arrays (xplot_1,yplot_11,yplot_12,...). Now I tried to use two-dimensional arrays like you, and then got the error message "Invalid data value supplied to %PL" - exactly what you wrote on Monday 17.09., post from 3:54, marked in red.

So, it seems that %pl can only handle one-dimensional arrays.

Have a nice weekend
Wilfried

[FK_GER]

Hi, John-S.,
be sure , that all arrays in the subroutines are declared correctly. There exist no problems. Without an "plot-update-process" the program works as desired. The blemish is, that at the end of the iteration a quantity of windows lays on the screen one upon the other accurately, sometimes 2x20 parts and more.
By the way, I'm using the personal edition ftn95,V8.3. The ftn95.exe dates from 13.03.2018 .

Hi, Wilfried,
thanks for the example. I will try to implement your proposed "update-way" into the course of my program. I will report on the progress of my work.
A remark to your notice "it seems that %pl can only handle one-dimensional arrays". In my code at the beginning of this post the plot-arrays are two-dimensioned. And this works without any problems. Maybe that there is a difference between a "direct-call" and a "redraw-call".