View previous topic :: View next topic |
Author |
Message |
PaulLaidler Site Admin

Joined: 21 Feb 2005 Posts: 7764 Location: Salford, UK
|
Posted: Mon Apr 13, 2020 5:31 pm Post subject: Plato update |
|
|
A new version of Plato is now available. This includes an major new "auto-compilation" feature for Fortran programmers.
When writing new code, Plato now automatically communicates with the FTN95 compiler which reports back programming errors in the code as you type.
Users of FTN95 v8.61 can download the new Plato together with the associated updated FTN95 via the following link...
https://www.dropbox.com/s/td3j1ggw1a676yt/Update.zip?dl=0
A YouTube demonstration video is provided here...
https://youtu.be/LCn4AF44hpw |
|
Back to top |
|
 |
John-Silver

Joined: 30 Jul 2013 Posts: 1520 Location: Aerospace Valley
|
Posted: Tue Apr 14, 2020 2:18 pm Post subject: |
|
|
will these new files work equally to update the personal version ? _________________ ''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: Tue Apr 14, 2020 2:43 pm Post subject: |
|
|
PS
just a suggestion - as well as here maybe you should include this 'release' in the announcements section - simply bcause people who don't use PLTO might never open the Plato form posts !
Thus defeating one of your main objectives, which is to get more people onboard using it (as you encourage to do at the end of your video).
Just a thought to grab the attention of as many fish as possible. _________________ ''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 |
|
 |
PaulLaidler Site Admin

Joined: 21 Feb 2005 Posts: 7764 Location: Salford, UK
|
Posted: Tue Apr 14, 2020 4:09 pm Post subject: |
|
|
These new versions of Plato and FTN95 are expected to be compatible with FTN95 v8.61 but it is always safer to keep a backup of the earlier versions. |
|
Back to top |
|
 |
JohnCampbell
Joined: 16 Feb 2006 Posts: 2502 Location: Sydney
|
Posted: Thu Apr 16, 2020 8:40 am Post subject: |
|
|
Paul,
Thanks very much for these 8.62 and 5.30 updates to 8.61.
The video is a very welcome addition to explain the updates. Very helpful.
I copied the ftn95_8.61 to ftn95_8.62 and all appears to be working ok.
It would be good if this info was also placed in announcements, rather than hidden in this thread, as this looks like a welcome update.
I tried the bracket matching, but did not highlight at first. ( the enclosing lines did show the bracket extent on 1 line )
After checking the matching bracket colour and changed from magenta to blue all worked well.
( Tools > Settings > Environment > Fonts and Colours > Bracket matching )
I now have brackets red and highlighted brackets in blue.
I could not see where Fortran brackets were set to Red ?
The following highlighted brackets over multiple lines.
Code: | real a0, a1, a2, a3, a4, aa, x
aa = ( ( (a4 *x &
+ a3)*x &
+ a2)*x &
+ a1)*x &
+ a0 |
With Do .. End Do matching, underline is blue and DO is blue. This works very well also. Can the underline be a different colour ?
( just asking if this is changeable; not a request to change! )
With IF .. ELSE IF .. ELSE .. END IF ; could these be investigated for highlighting ?
( an indication if simple change, as SELECT CASE will surely be on the next list ! )
Thanks very much for this update and for the informative video, much appreciated.
John |
|
Back to top |
|
 |
PaulLaidler Site Admin

Joined: 21 Feb 2005 Posts: 7764 Location: Salford, UK
|
Posted: Thu Apr 16, 2020 9:58 am Post subject: |
|
|
John
Thanks for the feedback.
An underline is part of the font and has to be the same colour as the character.
Only the beginning and end of an IF is highlighted. ELSE and ELSE IF are much more tricky.
I thought that I had included SELECT CASE but maybe not. |
|
Back to top |
|
 |
JohnCampbell
Joined: 16 Feb 2006 Posts: 2502 Location: Sydney
|
Posted: Thu Apr 16, 2020 11:53 am Post subject: |
|
|
Paul,
I opened another .f90 file and it did highlight the IF, THEN and END IF and also a DO END DO loop and matching brackets.
However the short code example below does not highlight the IF block.
It also sometimes does not highlight the DO block, although I can't confirm this response sequence.
It does highlight the matching brackets. (uninitialised variables warning on Compile (Ctrl+F7))
It is a nonsense code, that was testing statement functions. Not sure if this is a problem here.
I have two files open, with the file below as tab 1.
I am selecting Release Win32.
Code: | subroutine extsub
implicit none
integer ij(5), kk
!
call intsub(ij, kk)
print *,kk
return
contains
subroutine intsub(i, j)
implicit none
integer, intent(in) :: i(5)
integer, intent(out) :: j
integer i1,i2,i3,i4,i5,mean,k
real a0, a1, a2, a3, a4, aa, x
mean(i1,i2,i3,i4,i5) = (i1+i2+i3+i4+i5)/5 ! statement function
if ( i(1) == 0 ) then ! if statement
j = 0
do k = 1, size(i)
j = j + i(k)
end do
j = j / size(i)
else
j = mean(i(1),i(2),i(3),i(4),i(5))
end if
aa = ( ( (a4 *x &
+ a3)*x &
+ a2)*x &
+ a1)*x &
+ a0
return
end subroutine intsub
end subroutine extsub
! program test
! call extsub
! end program test |
Can you reproduce my response ? |
|
Back to top |
|
 |
PaulLaidler Site Admin

Joined: 21 Feb 2005 Posts: 7764 Location: Salford, UK
|
Posted: Thu Apr 16, 2020 12:03 pm Post subject: |
|
|
It does not seem to like the comment on the IF line. But if you remove it and put it back, it's OK.
I will make a note but it could be a while before I get to it. |
|
Back to top |
|
 |
JohnCampbell
Joined: 16 Feb 2006 Posts: 2502 Location: Sydney
|
Posted: Thu Apr 16, 2020 12:09 pm Post subject: |
|
|
Paul,
Glad to know I have not messed up the install.
I can certainly live with this improved version of Plato until your fix.
Thanks for this,
John |
|
Back to top |
|
 |
Kenneth_Smith

Joined: 18 May 2012 Posts: 682 Location: Hamilton, Lanarkshire, Scotland.
|
Posted: Thu Apr 16, 2020 12:46 pm Post subject: |
|
|
Excellent work Paul, your video highlighted some good new features and a few old ones of which I was not aware. I know making videos is time consuming, but be assured your effort is appreciated. Ken |
|
Back to top |
|
 |
stfark1
Joined: 02 Sep 2008 Posts: 204
|
Posted: Mon Jun 22, 2020 4:16 pm Post subject: Open |
|
|
How does one download and unzip these two files? When I save as to my computer, cannot unzip, just says they are html files? Sid Kraft |
|
Back to top |
|
 |
stfark1
Joined: 02 Sep 2008 Posts: 204
|
Posted: Tue Jun 23, 2020 6:29 pm Post subject: Experimental Plato |
|
|
Hi Paul: Apparently there is a new Plato and FTN95 in dropbox, Plato 5.3 from Plato 5.25. When I go to dropbox and try to download, it said "save to" which I did. When downloaded the files say .zip but when I try to "un zip" says html files and will not do? Any suggestions? Sid Kraft |
|
Back to top |
|
 |
PaulLaidler Site Admin

Joined: 21 Feb 2005 Posts: 7764 Location: Salford, UK
|
|
Back to top |
|
 |
stfark1
Joined: 02 Sep 2008 Posts: 204
|
Posted: Tue Jun 23, 2020 8:48 pm Post subject: Experimental Plato |
|
|
Thanks Paul, Sid Kraft |
|
Back to top |
|
 |
mecej4
Joined: 31 Oct 2006 Posts: 1838
|
Posted: Wed Jun 24, 2020 12:15 am Post subject: |
|
|
Sid, I wondered if you were not following the correct procedure to download and save zip files from Dropbox. When you click on a Dropbox link provided by Paul and others in this forum, you will see near the top of the browser window, right of centre, something similar to:
Locate the button with dark blue background with the name "Sign in". Do not press this button. To its right, you see a button with a downward arrow pointing to a horizontal bar. Press that button and select "Direct download".
Last edited by mecej4 on Wed Jun 24, 2020 8:08 am; edited 1 time in total |
|
Back to top |
|
 |
|