View previous topic :: View next topic |
Author |
Message |
John-Silver
Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Sat May 12, 2018 12:18 pm Post subject: |
|
|
and On to more interesting stuff ! .....
Augmentation of Curve 'Suaveness'
Note that I've improved the curve quality by explicitly specifying the anti-aliasing with the %pl option [smoothing=5] resulting in a very satisfactory improvement in the curve suaveness
(Note - the mentions in the documentation of anti-aliasing being 'the default' in fact actually meaning that the activation of GDI+ to allow it is the default - you still have to explicitly define it).
Before (Jagged) followed by After (Smoothing=5)
_________________ ''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... " |
|
Back to top |
|
|
John-Silver
Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Sat May 12, 2018 12:21 pm Post subject: |
|
|
..... and there's more ......
Resolution of ... Dan's problem with obtaining the Correct title Re-sizing
is thus resolved by including the line :-
C_EXTERNAL WINOP_HDL@ '__winop_hdl'(INSTRING,VAL)
(from the CLEARWIN.INS file) directly in the fortran source code !!
(since the associated MOD file is not included in the beta169 distrbution, as per Paul's extended notes.
and also ... correcting the associated variable name to 'ititle_hfont' (was non-declared variable hTitlefont)
As simple as that.
Here's the resulting plot with larger titles ! PRESTO ! ...
_________________ ''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... " |
|
Back to top |
|
|
John-Silver
Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Sat May 12, 2018 12:24 pm Post subject: |
|
|
... and for the 3rd positive of the day .......
Please note Paul the importance of documentation !
Grid Lines Resolved
I've struggled with the grid lines error for a while now and finally found it's resolution, it's required to use the correct option name !!!!!
ref. https://silverfrost.com/ftn95-help/clearwinp/simplepl/native.aspx
" [grid_lines] Provides a rectangular grid based on tick marks. "
similarly in ftn95.chm
This is incorrect it shuld be [gridlines] !!!!!!! i.e. NO U_nderscore !!!
I do seem to remember either Ken or Silicondale mentioning this on another post (which I can't find) in the early days after gridlines was introduced but it obviously got overlooked.
Paul can you correct this in the documentation whereever it occurs please. Ta.
_________________ ''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... " |
|
Back to top |
|
|
John-Silver
Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Sat May 12, 2018 12:30 pm Post subject: |
|
|
let's finish the mornings scribbling then with ....
The full further revised Code
with the corrections/additions discussed above is as follows:-
Code: | ! Dan-PL-b169-1aCORR_b.f90
use clrwin
parameter (N=5)
real*8 X(N), Y(N)
integer (7) ititle_hfont
Data X/1e1, 1e2, 1e3, 1e4, 1e5/
Data Y/2.2, 66, 8e10, 1111, 777/
C_EXTERNAL WINOP_HDL@ '__winop_hdl'(INSTRING,VAL)
i=winio@('%sf%ts%bf%gf%es&', 3d0, ititle_hfont)
! CALL winop_hdl@("%pl[title_hfont]",hTitleFont)
CALL winop_hdl@("%pl[title_hfont]",ititle_hfont)
call winop@("%pl[title='Log-Log Plot']")
CALL winop@("%pl[tick_len=25]")
CALL winop@("%pl[gridlines]")
CALL winop@("%pl[smoothing=5]")
i=winio@('%sf%ts%bf%es&', 2d0)
call winop@("%pl[axes_pen=2,frame_pen=2,width=2,x_axis='X (m)',y_axis='Y (rel.un.)']")
i=winio@('%ww%pv%pl[native,framed,x_array,scale=log_log,N_GRAPHS=1]', 625,500, n, X, Y)
end
|
_________________ ''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... " |
|
Back to top |
|
|
johnham
Joined: 19 Jul 2018 Posts: 2 Location: Farmington
|
Posted: Thu Jul 19, 2018 8:19 pm Post subject: Namelist problem |
|
|
Tried to download the beta. Dropbox says the file is not there anymore.
John |
|
Back to top |
|
|
PaulLaidler Site Admin
Joined: 21 Feb 2005 Posts: 7931 Location: Salford, UK
|
|
Back to top |
|
|
John-Silver
Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Fri Jul 20, 2018 9:23 pm Post subject: |
|
|
It would maybe be useful to create a seperate forum topic 'Beta Releases' to contain just the betas.
Also to make totles indicative of which beta version a post relates to beta 169 beta 279, etc ....
Pity the php forum oftware doesn't ppear to allow to change a posts title _________________ ''Computers (HAL and MARVIN excepted) are incredibly rigid. They question nothing. Especially input data.Human beings are incredibly trusting of computers and don't check input data. Together cocking up even the simplest calculation ... " |
|
Back to top |
|
|
|