View previous topic :: View next topic |
Author |
Message |
Jhonny
Joined: 03 Jan 2011 Posts: 8 Location: Brazil
|
Posted: Fri Jan 07, 2011 12:43 am Post subject: Execute Fortran 77 Program in FTN95Express 5.4 |
|
|
PLEASE!!! Somebody can I help me ?
I want to use FTN95Express to execute one Forttran 77 program (file .For) old, but I don't found out in Help nothing about it. When upload the file .for doesn't feature the option to make file association as in Plato.
How should I do to run Fortran 77 in FTN95Express 5.4
thanks
Jhonny |
|
Back to top |
|
 |
jjgermis
Joined: 21 Jun 2006 Posts: 404 Location: N�rnberg, Germany
|
Posted: Fri Jan 07, 2011 11:20 am Post subject: |
|
|
I am not familiar with FTN95Express, but assume that you are using Visual Studio. In that case I have little (actually no) experiece. Why dont you use Plato instead? |
|
Back to top |
|
 |
Jhonny
Joined: 03 Jan 2011 Posts: 8 Location: Brazil
|
Posted: Fri Jan 07, 2011 5:34 pm Post subject: Re: |
|
|
jjgermis wrote: |
I am not familiar with FTN95Express, but assume that you are using Visual Studio. In that case I have little (actually no) experiece. Why dont you use Plato instead? |
Thanks jjgermis by your suggestion, but i am using one machine that works with windows 7 64 bits, and the only version that i know compatible with one is FTN95Express, wich is FTN95 plus Visual Studio. I don't have Plato installed, just i saw one post speaking about Plato had option to make association file.
l look foward to know How do i to run Fortran program 77 in FTN95 Express 5.4???
Please ANYBODY CAN HELP ME???
jhonny |
|
Back to top |
|
 |
Wilfried Linder
Joined: 14 Nov 2007 Posts: 314 Location: D�sseldorf, Germany
|
Posted: Fri Jan 07, 2011 7:52 pm Post subject: |
|
|
Like jjgermis wrote, it might be the easiest way for you to use Plato. It runs under Windows 7 / 64 bits without problems. You simply select "fixed format" to store your code in the Fortran 77 style.
If it is really necessary to use Express, I can't help, sorry... |
|
Back to top |
|
 |
Jhonny
Joined: 03 Jan 2011 Posts: 8 Location: Brazil
|
Posted: Sat Jan 08, 2011 2:27 am Post subject: Re: |
|
|
Wilfried Linder wrote: |
Like jjgermis wrote, it might be the easiest way for you to use Plato. It runs under Windows 7 / 64 bits without problems. You simply select "fixed format" to store your code in the Fortran 77 style.
If it is really necessary to use Express, I can't help, sorry... |
Great Wilfried !!! I don't know how do i to enter in PLATO. I have installed FTN95Express what is FTN95 + Visual Studio. In FTN95 contains PLATO 3.
Don't is obligatory to use FTN95Express!
I would like to Know how upload PLATO?
Does It needs new install?
thanks a lot
jhonny[/url] |
|
Back to top |
|
 |
Wilfried Linder
Joined: 14 Nov 2007 Posts: 314 Location: D�sseldorf, Germany
|
Posted: Sat Jan 08, 2011 8:16 am Post subject: |
|
|
Jhonny, you can download the personal edition from FTN95 + Plato from the Silverfrost website:
http://www.silverfrost.com/32/ftn95/ftn95_personal_edition.aspx
After installing, start Plato, then "File > Open", select "Fixed format fortran file", then click "Open". That's all. Load your Fortran 77 file and compile it.
Regards - Wilfried |
|
Back to top |
|
 |
JohnCampbell
Joined: 16 Feb 2006 Posts: 2621 Location: Sydney
|
Posted: Sat Jan 08, 2011 8:57 am Post subject: |
|
|
There is also the DOS option.
In a cmd.exe window, try the command:
FTN95 file_name.f95 /lgo
This will compile and run a program in a single file.
The extension .for is for fixed (72 column) fortran syntax, while .f95 is for free format.
Also in the "dos box" the command "ftn95 /help" will give access to the help on the compiler.
John |
|
Back to top |
|
 |
Jhonny
Joined: 03 Jan 2011 Posts: 8 Location: Brazil
|
Posted: Mon Jan 10, 2011 12:51 am Post subject: RE |
|
|
Dear Wilfried Linder, thank you very much. Downloaded FTN95 v.6.0 from link that you posted and nstalled it. Uploaded PLATO, and started some tests.
Opened one project, added one source file. One bug arised while compiled the program. If there is error and if i give double cilck in error appears follow message error:
THIS FILE DOES NOT EXIST. TOUR CURRENT OPTIONS PREVENT OPENNING.
This error happend as fixed (.for) as free format file, in form projec or single fortran file.
And the cursor move not to line that contains the error as was waited.
Actualy the file exist, and when contains no error, i got compile, build and run.
If anybody already have experienced the same problem i would like to be helped!
Best whishes
Jhonny |
|
Back to top |
|
 |
Wilfried Linder
Joined: 14 Nov 2007 Posts: 314 Location: D�sseldorf, Germany
|
Posted: Mon Jan 10, 2011 1:16 pm Post subject: |
|
|
Jhonny, I don't know this error message. Perhaps you can post a small example of your code here?
Like John wrote, you may use commands as an alternative. For instance, you may write a small batch file like this:
Code: |
"c:\program files (x86)\silverfrost\ftn95\ftn95" /silent /fixed_format /lgo *.for |
Put the batch file into the directory where your Fortran codes are. If necessary, modify the path of the compiler. Then test it - does the error remain?
Regards - Wilfried |
|
Back to top |
|
 |
Jhonny
Joined: 03 Jan 2011 Posts: 8 Location: Brazil
|
Posted: Tue Jan 11, 2011 1:52 am Post subject: BUG PLATO 4.3 |
|
|
thanks Wilfrid once again. I solved the bug like this: Opend one project in other folder. Added one source file. Writed one program, and intendeed put Fortran wrong statment. Compiled and the output presented some error. Then i gave doule click in error and now the cursor moved to line the source program as expected.
Actually i think that the mistake was the name the folder. The one is
C�pia_Dell. The accent letter "�" assume produced the error.
Run the program follow and all rigth!!!
program sure
implicit none
integer n
parameter (n=10)
integer i,j
real*8 h(n,n)
do i=1,n
do j=1,n
h(i,j)=0.0
enddo
enddo
do i=1,n
do j=1,n
h(i,j)= h(i,j)+ i+j
enddo
enddo
write (*, 30) ((h(i,j),j=1,n),i=1,n)
30 format (<n>f8.2)
stop
end
Only caused me surprise the compile unknow statement specificator Format Variable as:
write (*, 30) ((h(i,j),j=1,n),i=1,n)
30 format (<n>f8.2)
the compile registred ;
C:\Users\Julio\Documents\Restos\certo1.FOR(24) : error 274 - Unknown edit descriptor '<', or missing comma
I already have used many times in old program and work.
WHAT IS WRONG WITH FORMAT???
Anybody can help me? I thank.
regards
Jhonny |
|
Back to top |
|
 |
JohnCampbell
Joined: 16 Feb 2006 Posts: 2621 Location: Sydney
|
Posted: Tue Jan 11, 2011 2:45 am Post subject: |
|
|
Your format descriptor is non-standard.
30 format (<n>f8.2)
<n> is an extension which is not supported by FTN95.
You could try:
30 format (10f8.2)
or if you want more flexibility try:
do i = 1,n
write (*, 30) (h(i,j),j=1,n)
end do
30 format (99f8.2)
John |
|
Back to top |
|
 |
Jhonny
Joined: 03 Jan 2011 Posts: 8 Location: Brazil
|
Posted: Wed Jan 12, 2011 12:35 am Post subject: PLATO ERROR COMPILING |
|
|
Dear John Campbel,
I would like to thank with your goodwill in to answer and to show alternative solutions to the problemas posted. You're helped me very much. You're a clever person!!
My best wishes,
Jhonny |
|
Back to top |
|
 |
|