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

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?

Quoted from jjgermis 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

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...

Quoted from Wilfried Linder 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]

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

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

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

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:

'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

😄 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

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

Dear John Campbel,

:lol: 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