三种错误求大神指导

小糊涂

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),
---------------------------------------------------------------^

小糊涂

以解决谢谢

b9078

你好，我也遇到了类似的问题，请问您是怎么解决的啊