topic Re: Print Statement Error. in Intel® Fortran Compiler

Print Statement Error.

adityaiitd — Wed, 28 Jan 2009 09:56:32 GMT

Hi Guys,

I am trying to migrate a GECOS (BULL SYSTEM) FORTRAN77 Code to Windows.I am using the Intel VF 9.1 compiler.

I am facing this peculiar error regarding the PRINT statement throught the code.

Pls help.

Piece of Code:

PRINT," TYPE 40-CHARACTER LABEL:"

READ(05,1070)COMMENT

PRINT," DO YOU WANT TO CHANGE THE WELD PARAMETERS (Y/N)?"

READ(05,1060)IFWELD ; IF(IFWELD.NE."Y")GO TO 20

PRINT," TYPE TRAILING EDGE WELD LENGTH (E1):"

READ(05,1060)E1

Error at each PRINT statement :

Error: Syntax error, found ',' when expecting one of: ( * ...

Thanks,
-Aditya

Re: Print Statement Error.

Les_Neilson — Wed, 28 Jan 2009 10:22:50 GMT

Aditya
simply replace print, with print *,

Les

Re: Print Statement Error.

ArturGuzik — Wed, 28 Jan 2009 10:25:15 GMT

Quoting - adityaiitd

PRINT," TYPE 40-CHARACTER LABEL:"

the error info is pretty clear.

syntax

PRINT *[, io-list]

or

PRINT form[, io-list]

so if you print to console you need PRINT *, " TYPE 40-CHARACTER LABEL:"

A.

__________________

(edit)
It looks as if I replied with Les at the very same time.

Re: Print Statement Error.

adityaiitd — Wed, 28 Jan 2009 11:10:26 GMT

Quoting - ArturGuzik

Thank you . I have also one more compilation error.

Code :

1060 FORMAT(V)

Error :

Error: This character is not valid in a format list.

Pls help.

-Aditya

Re: Print Statement Error.

ArturGuzik — Wed, 28 Jan 2009 12:59:36 GMT

Because is not valid. Valid data descriptors are: I, B, O, Z, F, E, EN, ES, D, G, L, and A. Please refer to Help files for details. What kind of data (real, integers, ....) you want to print?

A.

Re: Print Statement Error.

Les_Neilson — Wed, 28 Jan 2009 13:00:57 GMT

Quoting - adityaiitd

1060 FORMAT(V)Error :
Error: This character is not valid in a format list.

You need to look at the documentation for the GECOS compiler to find out what FORMAT(V) does (it would appear to be an extention to Fortran 77 for that compiler)

Les

Re: Print Statement Error.

TimP — Wed, 28 Jan 2009 13:39:16 GMT

Quoting - Les Neilson

You need to look at the documentation for the GECOS compiler to find out what FORMAT(V) does (it would appear to be an extention to Fortran 77 for that compiler)

Les

format(v) presumably stood for f66 extended list directed (fmt=* in f77). The eras are mixed up here. The spelling GECOS antedated the transfer of GE systems to Honeywell, which preceded the partnership with Bull. When I last used a GCOS system, in 1985, the almost-f77 compiler was still not yet fully supported.
These non-standard usages were precursors of f77.

I have my GECOS f66 manual (Fortran IV, 2nd edition, 1966) in front of me. It quotes liberally from IBM Fortran IV 1963 manual.