Design og modellering af metanolanlæg til VEnzin-visionen Bilag

Design og modellering af metanolanlæg til VEnzin-visionen Bilag Design og modellering af metanolanlæg til VEnzin-visionen Bilag

27.07.2013 Views

VEnzin.for c:/dna/source/ RES(3) = P(1) − P(3) RES(4) = MDOT(1)*PAR(1) + MDOT(2) C IF (FKOMP.EQ.5) GOTO 500 GOTO 9999 C−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−− C Solution check C−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−− 500 CONTINUE IF (MDOT(1).LT.−1D−10) GOTO 550 IF (MDOT(2).GT.1D−10) GOTO 550 IF (MDOT(3).GT.1D−10) GOTO 550 GOTO 9999 550 FBETI = .FALSE. GOTO 9999 C−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−− C Write component information C−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−−− 600 CONTINUE KOMDSC = ’Flow splitter. The distribution of the inlet massflow $ between the outlets is set by the parameter.’ K_PAR(1) = ’Fraction: $\\frac{−\\dot{m_2}}{\\dot{m_1}}$’ K_LIG(1) = ’Equal enthalpy of outlets: $h_2 = h_3$’ K_LIG(2) = ’Equal pressures: $p_1 = p_2$’ K_LIG(3) = ’Equal pressures: $p_1 = p_3$’ K_BET = $ ’$\\dot{m}_1 \\gt 0 \\\\ \\dot{m}_2 \\lt 0 \\\\ \\dot{m}_3 $\\lt 0 $’ KMEDDS(1) = ’Fluid in’ KMEDDS(2) = ’Fluid out’ KMEDDS(3) = ’Fluid out’ k_inp= ’struc split splitter3 1 2 3 0.4\\\\ $media 1 SIMPLE_AIR\\\\ $addco m split 1 10 t split 1 50 p 1 1\\\\ $START M split 2 −4 t split 2 50’ C GOTO 9999 C 9999 CONTINUE RETURN END C C======================================================================= C********************************************************************** SUBROUTINE MIXER_03(KOMTY,ANTLK,ANTKN,ANTM1, MEDIE,ANTME,VARME $ ,ANTEL, VAREL,MDOT,P,RES,X_J,komdsc,k_lig,k_bet,kmedds,k_inp $ ,MMVAR) C********************************************************************** C C MIXER_01 mixes two gasses. Same pressure in all nodes. C C*********************************************************************** C CA FKOMP − INPUT − Flag with the value: CA 1: Initialize the component. CA 2: Initialize with actual system. CA 3: Fluid composition calculation (constant). CA 4: Find residuals. CA 5: Find residuals and check variables. CA 6: Output information about component. CA MDOT − INPUT − Massflows from nodes. CA P − INPUT − Pressure in nodes. CA X_J − INPUT − Fluid composition. CA KOMTY − OUTPUT − Component name. CA ANTPK − OUTPUT − Number of parameters for the component. CA ANTLK − OUTPUT − Number of equations in the component. CA ANTEX − OUTPUT − Number of independent equations in the component. CA ANTED − OUTPUT − Number of differential independent equations. CA ANTKN − OUTPUT − Number of nodes connected to the component. CA ANTM1 − OUTPUT − Number of massflows in the first conservation of CA mass equation. CA ANTM2 − OUTPUT − Number of massflows in the second. CA DYCOM − OUTPUT − Type of conservation equations (static or dynamic CA mass and internal energy on side 1 and 2 respectively; CA and dynamic solid internal energy). CA MEDIE − IN/OUT − Media (fluid) of the connected nodes. CA The values mean : 47/67 19−03−2007

VEnzin.for c:/dna/source/ CA −4 : Any gas CA ANTME − OUTPUT − Number of fluids with variable composition. CA VARME − OUTPUT − Pointer to fluid numbers (with variable composition). CA ANTEL − OUTPUT − Number of computed compounds in these variable fluids. CA VAREL − OUTPUT − Compound numbers in variable fluids. CA RES − OUTPUT − Residuals for the component. C CL XMIX Composition of the mixture. CL K_PAR Parameter description. CL K_LIG Equation description. CL K_BET Condition description. C 48/67 19−03−2007

<strong>VEnzin</strong>.for<br />

c:/dna/source/<br />

CA −4 : Any gas<br />

CA ANTME − OUTPUT − Number of fluids with variable composition.<br />

CA VARME − OUTPUT − Pointer to fluid numbers (with variable composition).<br />

CA ANTEL − OUTPUT − Number of computed compounds in these variable fluids.<br />

CA VAREL − OUTPUT − Compound numbers in variable fluids.<br />

CA RES − OUTPUT − Residuals for the component.<br />

C<br />

CL XMIX Composition of the mixture.<br />

CL K_PAR Parameter description.<br />

CL K_LIG Equation description.<br />

CL K_BET Condition description.<br />

C<br />

48/67<br />

19−03−2007

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!