qitiandasheng 发表于 2013-11-25 15:32:31

fortran 编程问题

参照《化工过程计算机辅助设计基础》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 发表于 2013-11-25 15:32:31

附上程序,见附件

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

bkqcycyqm 发表于 2013-11-25 15:32:31

这个还不会,没有做过。
页: [1]
查看完整版本: fortran 编程问题