Fortran Coder

标题: 三种错误求大神指导 [打印本页]

作者: 小糊涂 时间: 2020-4-3 15:13
标题: 三种错误求大神指导
xiaophase.for(1): error #5149: Illegal character in statement label field  [籡
锘?    SUBROUTINE UMAT(STRESS,STATEV,DDSDDE,SSE,SPD,SCD,RPL,DDSDDT,
xiaophase.for(16): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: <IDENTIFIER>
   DIMENSION DWJZ(2,2),zsigema(2,2),fsigema(2,2),sigema(2,2),
----------------------------------------------------------------^
xiaophase.for(17): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: <IDENTIFIER>
   DIMENSION NQ(4,1),
------------------------^
xiaophase.for(18): error #5082: Syntax error, found IDENTIFIER 'BAT' when expecting one of: , <END-OF-STATEMENT> ;
   B(2,4)BAT(4,2),BB(4,4),kij(4,4),fi(4,1),DKIJ(4,4),DFI(4,1),
------------^
xiaophase.for(18): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: <IDENTIFIER>
   B(2,4)BAT(4,2),BB(4,4),kij(4,4),fi(4,1),DKIJ(4,4),DFI(4,1),
-----------------------------------------------------------------^
xiaophase.for(21): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: %FILL <IDENTIFIER>
   DOUBLE PRECISION H,H0,DTXN,epx,epy,epxy,AA,EK,ept,K1,ztxn,
----------------------------------------------------------------^
xiaophase.for(24): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: %FILL <IDENTIFIER>
   double precision FF(s,t),FS(s),xff(s,t),FXS(s),ZYGB2(X,Y,Z),
------------------------------------------------------------------^
xiaophase.for(222): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( * ) :: , <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> ...
   &(y-x)**2/(4*z**2),
------------------------^
xiaophase.for(223): error #5082: Syntax error, found '=' when expecting one of: ( * ) :: , <END-OF-STATEMENT> ; . % (/ + - [ : ] /) . ' ** / ...
   zygb2(x,y,z)=(x-y)/(2*z)*((x+y)/2+sqrt((x-y)**2/4+z**2))/(2*
------------------^
xiaophase.for(224): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
   &sqrt(1+(y-x)**2/(4*z**2)),
--------------------------------------^
xiaophase.for(225): error #5082: Syntax error, found '=' when expecting one of: ( * ) :: , <END-OF-STATEMENT> ; . % (/ + - [ : ] /) . ' ** / ...
   zygb3(x,y,z)=((x+y)/2+sqrt((x-y)**2/4+z**2))*(0.5-0.5/sqrt(1+
------------------^
xiaophase.for(226): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
   &(y-x)**2/(4*z**2)),
-------------------------^
xiaophase.for(227): error #5082: Syntax error, found '=' when expecting one of: ( * ) :: , <END-OF-STATEMENT> ; . % (/ + - [ : ] /) . ' ** / ...
   fygb1(x,y,z)=x-((x+y)/2+sqrt((x-y)**2/4+z**2))*(0.5+0.5/sqrt(1+
------------------^
xiaophase.for(228): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
   &(y-x)**2/(4*z**2)),
-------------------------^
xiaophase.for(229): error #5082: Syntax error, found '=' when expecting one of: ( * ) :: , <END-OF-STATEMENT> ; . % (/ + - [ : ] /) . ' ** / ...
   fygb2(x,y,z)=y-(x-y)/(2*z)*((x+y)/2+sqrt((x-y)**2/4+z**2))/(2*
------------------^
xiaophase.for(230): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
   &sqrt(1+(y-x)**2/(4*z**2)),
--------------------------------^
xiaophase.for(231): error #5082: Syntax error, found '=' when expecting one of: ( * ) :: , <END-OF-STATEMENT> ; . % (/ + - [ : ] /) . ' ** / ...
   fygb3(x,y,z)=z-((x+y)/2+sqrt((x-y)**2/4+z**2))*(0.5-0.5/sqrt(1+
------------------^
xiaophase.for(232): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
   &(y-x)**2/(4*z**2)),
-------------------------^
xiaophase.for(24): error #6219: This variable, used in a specification expression, must be a dummy argument, a COMMON block object, or an object accessible through host or use association [Z]
   double precision FF(s,t),FS(s),xff(s,t),FXS(s),ZYGB2(X,Y,Z),
---------------------------------------------------------------^

作者: 小糊涂 时间: 2020-4-3 20:38
以解决谢谢

作者: b9078 时间: 2020-5-4 23:10
你好，我也遇到了类似的问题，请问您是怎么解决的啊

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)