CFD Online Discussion Forums

CFD Online Discussion Forums (https://www.cfd-online.com/Forums/)
-   Siemens (https://www.cfd-online.com/Forums/siemens/)
-   -   Compilation Error.... (https://www.cfd-online.com/Forums/siemens/54026-compilation-error.html)

Arnab September 11, 2004 20:24

Compilation Error....
 
Hello All,

I am trying to run tutorial 11 from star-CD version 3.2 . once I complete writing geometry and problem file, I save and quit and then from main terminal, i run star by writing star into it.

But i get this compilation error messages and I am not able to make them right. So can anyone of you help me with this problem.

The compilation error message and also the uparm.f file is below for your consideration.

Compilation Error message:

mesolv% star

PNP: Initialized [2004-09-11-19:07:59] Automatic Sequential Automatic Parallel analyzer.

PNP: Allocated "mesolv,1" resource (1 process).

PNP: Overload STAR master processor with external moving mesh code.

PNP: Assigned "mesolv,1" to STAR solver (1 process).

PNP: Assigned "mesolv,1" to external moving mesh code (1 process).

PNP: Analyzing User coding in "ufile" directory.

PNP: compiling /mnt/SUNWspro/bin/f90 -w -fast -xarch=v9a -c uparm.f -o sunos64_5.8-ultra2-f90_6.1-dso/uparm.o

PNP:

PNP: NDOM=0

PNP: ^

PNP: "uparm.f", Line = 12, Column = 6:

ERROR: The source line following an INCLUDE line must not be a continuation line.

PNP:

PNP: IF(ISTAT.EQ.1) NDOM=NDOM+1

PNP: ^

PNP: "uparm.f", Line = 23, Column = 7:

ERROR: Unexpected syntax: "EOS" was expected but found "F".

PNP:

PNP: I(0) = NDOM

PNP: ^

PNP: "uparm.f", Line = 26, Column = 5:

ERROR: The characters found in the label field are not valid.

PNP: ^

PNP: "uparm.f", Line = 26, Column = 7:

ERROR: Unexpected syntax: "EOS" was expected but found "0".

PNP:

PNP: NUP = 0

PNP: ^

PNP: "uparm.f", Line = 27, Column = 5:

ERROR: The characters found in the label field are not valid.

PNP:

PNP: DO 20 IC=2473,3061,14

PNP: ^

PNP: "uparm.f", Line = 31, Column = 5:

ERROR: The characters found in the label field are not valid.

PNP:

PNP: CALL LIVCLL(IC,STAT)

PNP: ^

PNP: "uparm.f", Line = 32, Column = 5:

ERROR: The characters found in the label field are not valid.

PNP:

PNP: IF(ISTAT.EQ.1) NUP=NUP+1

PNP: ^

PNP: "uparm.f", Line = 33, Column = 5:

ERROR: The characters found in the label field are not valid.

PNP:

PNP: 20 CONTINUE

PNP: ^

PNP: "uparm.f", Line = 34, Column = 3:

ERROR: A continuation line must not contain a label.

PNP:

PNP: I(1) = NUP

PNP: ^

PNP: "uparm.f", Line = 35, Column = 5:

ERROR: The characters found in the label field are not valid.

PNP:

PNP: f90comp: 187 SOURCE LINES

PNP: f90comp: 10 ERRORS, 0 WARNINGS, 0 OTHER MESSAGES, 0 ANSI

PNP: ***ERROR*** Compilation error in user file "ufile/uparm.f".

PNP: ==> Please check the compilation error messages.

mesolv%

-------------------------------------------------------

UPARM.f file::

-------------

SUBROUTINE UPARM(VCORN,A,I)

INCLUDE 'comdb.inc'

COMMON/USR001/INTFLG(100)

DIMENSION A(0:999),I(0:999)

DIMENSION VCORN(3,NDMAXU)

INCLUDE 'usrdat.inc'

NDOM=0

DO 10 IC=14,602,14

CISTAT= 0 => DELETED

CISTAT= -1 => MARKED FOR DELETION

CISTAT=- 2 => NO SUCH FLUID CELL (may BE SOLID, BAFFLE,SHELL ETC)

CISTAT= 1 => LIVE CELL

CALL LIVCLL(IC,ISTAT)

IF(ISTAT.EQ.1) NDOM=NDOM+1

10 CONTINUE

I(0) = NDOM

NUP = 0

DO 20 IC=2473,3061,14

CALL LIVCLL(IC,STAT)

IF(ISTAT.EQ.1) NUP=NUP+1 20 CONTINUE

I(1) = NUP

A(0)=DT

RETURN

END

------------------------------------------------------

Brian September 12, 2004 05:25

Re: Compilation Error....
 
In Fortran, you need six blank spaces at the beginning of each line. Several of your lines start in column 5 or 6 - fix that and try again.

Arnab September 12, 2004 13:05

Re: Compilation Error....
 
Hello Brain and Others,

Thanks for helping me out. I went according to your suggestion and got those errors knocked out but i have got these 5 other errors which I am not able to take care of. And that is why my program is not yet running.

Below is the new compilation error message:

--------------------------------------------------

mesolv% star

PNP: Initialized [2004-09-12-11:59:24] Automatic Sequential Automatic Parallel analyzer.

PNP: Allocated "mesolv,1" resource (1 process).

PNP: Overload STAR master processor with external moving mesh code.

PNP: Assigned "mesolv,1" to STAR solver (1 process).

PNP: Assigned "mesolv,1" to external moving mesh code (1 process).

PNP: Analyzing User coding in "ufile" directory.

PNP: compiling /mnt/SUNWspro/bin/f90 -w -fast -xarch=v9a -c uparm.f -o sunos64_5.8-ultra2-f90_6.1-dso/uparm.o

PNP:

PNP: DO 10 IC=14,602,14

PNP: ^

PNP: "uparm.f", Line = 14, Column = 8:

ERROR: A termination statement is missing for this DO statement.

PNP:

PNP: CISTAT= 0 => DELETED

PNP: ^

PNP: "uparm.f", Line = 16, Column = 18:

ERROR: Unexpected syntax: "operator or EOS" was expected but found "=".

PNP:

PNP: CISTAT= -1 => MARKED FOR

DELETION

PNP:

^

PNP: "uparm.f", Line = 17, Column = 19:

ERROR: Unexpected syntax: "operator or EOS" was expected but found "=".

PNP:

PNP: CISTAT=- 2 => NO SUCH FLUID CELL (may BE SOLID, BAFFLE,SHELL ETC)

PNP: ^

PNP: "uparm.f", Line = 18, Column = 19:

ERROR: Unexpected syntax: "operator or EOS" was expected but found "=".

PNP:

PNP: CISTAT= 1 => LIVE CELL

PNP: ^

PNP: "uparm.f", Line = 19, Column = 18:

ERROR: Unexpected syntax: "operator or EOS" was expected but found "=".

PNP:

PNP: 10 CONTINUE

PNP: ^

PNP: "uparm.f", Line = 24, Column = 10:

ERROR: Labels must be in columns 1 through 5 in fixed source form.

PNP:

PNP: DO 20 IC=2473,3061,14

PNP: ^

PNP: "uparm.f", Line = 31, Column = 9:

ERROR: A termination statement is missing for this DO statement.

PNP: ^

PNP: "uparm.f", Line = 31, Column = 15:

ERROR: This DO variable is already being used as the DO variable of an outer loop.

PNP:

PNP: 20 CONTINUE

PNP: ^

PNP: "uparm.f", Line = 34, Column = 8:

ERROR: Labels must be in columns 1 through 5 in fixed source form.

PNP:

PNP: f90comp: 187 SOURCE LINES

PNP: f90comp: 9 ERRORS, 0 WARNINGS, 0 OTHER MESSAGES, 0 ANSI

PNP: ***ERROR*** Compilation error in user file "ufile/uparm.f".

PNP: ==> Please check the compilation error messages.

mesolv%

--------------------------------------------------

I will be waiting for your suggestions and help and also from others if they have so that I can go ahead with my simulation.

Thanks in advance,

Arnab

Arnab September 12, 2004 14:49

Re: Compilation Error....
 
Hello Brian,

Thanks for your help. I have been able to fix the problem of compilation.

Will disturb u again if I need any help,

Thanks,

Arnab

Brian September 12, 2004 15:54

Re: Compilation Error....
 
:)

The explanations in the errors are pretty clear. Glad you got it sorted.


All times are GMT -4. The time now is 01:05.