fortran 编程问题

qitiandasheng

参照《化工过程计算机辅助设计基础》43页例题
我把优化之前的程序运行了一下，没有问题，但一优化，就出现问题。请教问题出在哪里：
优化变量
FH        Stream-Var Stream=1 Substream=MIXED Variable=MOLE-FLOW
FT        Stream-Var Stream=2 Substream=MIXED Variable=MOLE-FLOW
PB        Stream-Var Stream=3 Substream=MIXED Variable=MOLE-FLOW
PD        Stream-Var Stream=4 Substream=MIXED Variable=MOLE-FLOW
YPH        Mole-Frac Stream=5 Substream=MIXED Component=H2
PG        Stream-Var Stream=5 Substream=MIXED Variable=MOLE-FLOW



fortran 程序：
c      燃料价格，$/106kj
       CF=4.22
c      热值，106kj/kmol
       dHCH=0.29
       dHCM=0.89
       dHCB=3.28
       dHCT=3.91
       dHCD=6.25
c      苯的价值，$/kmol
       CB=19.93
c      甲苯的价值，$/kmol
       CT=14.11
c      进料氢气的价值，$/kmol
       CH=2.51
C      全年运行时间，h/a
       Cita=8150.0
C      经济潜力，$/a
       COSTin=CH*FH+CT*FT
       COSTout=CF*(PG*(YPH*dHCH+(1-YPH)*dHCM)+PD*dHCD)+CB*PB
       COST=(COSTout-COSTin)*Cita


我运行后出现：
->Processing input specifications ...

      INFORMATION IN THE "OPTIMIZATION" PARAGRAPH WHICH BEGINS ON LINE 96
      FIRST ID: O-1
      FORTRAN IN OPTIMIZATION BLOCK   WITH ID: O-1      WILL BE COMPILED
      RATHER THAN INTERPRETED BECAUSE OF THE FOLLOWING STATEMENT:
       COSTOUT=CF*(PG*(YPH*DHCH+(1-YPH)*DHCM)+PD*DHCD)+CB*PB

  *** SEVERE ERROR
      ERROR COMPILING IN-LINE FORTRAN
      COMPILER MESSAGES FOLLOW ...


  *** SEVERE ERROR
      COULD NOT RESOLVE USER OR IN-LINE FORTRAN SUBROUTINE(S):

      SUBROUTINE "ZZOPT" IS MISSING

  *** SEVERE ERROR
      PROGRAM TERMINATED DUE TO UNRESOLVED ROUTINES

! Errors while processing input specifications


->Processing input specifications ...

      INFORMATION IN THE "OPTIMIZATION" PARAGRAPH WHICH BEGINS ON LINE 96
      FIRST ID: O-1
      FORTRAN IN OPTIMIZATION BLOCK   WITH ID: O-1      WILL BE COMPILED
      RATHER THAN INTERPRETED BECAUSE OF THE FOLLOWING STATEMENT:
       COSTOUT=CF*(PG*(YPH*DHCH+(1-YPH)*DHCM)+PD*DHCD)+CB*PB

  *** SEVERE ERROR
      ERROR COMPILING IN-LINE FORTRAN
      COMPILER MESSAGES FOLLOW ...


  *** SEVERE ERROR
      COULD NOT RESOLVE USER OR IN-LINE FORTRAN SUBROUTINE(S):

      SUBROUTINE "ZZOPT" IS MISSING

  *** SEVERE ERROR
      PROGRAM TERMINATED DUE TO UNRESOLVED ROUTINES

! Errors while processing input specifications

qitiandasheng

附上程序，见附件

{:1106_369:}
{:1106_364:}

bkqcycyqm

这个还不会，没有做过。