Ignore:
Timestamp:
Jan 18, 2007, 2:06:09 PM (16 years ago)
Author:
gerson bicca
Message:

fixed some mistakes and added vapor fraction calculation in Mheatex model

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/eml/heat_exchangers/Mheatex.mso

    r120 r122  
    1818*
    1919*       Streams:
    20 *               * Inlet(Ninlet) streams ....    at least one material stream
    21 *               * Outlet stream             ....        one material stream
     20*               * Hot Inlet streams ....        at least one Hot material stream
     21*               * Cold Inlet streams ....       at least one Cold material stream
     22*               * Hot Outlet streams  ....      one material stream for each Hot Inlet
     23*               * Cold Outlet streams  ....     one material stream for each Cold Inlet
    2224*
    2325*       Purpose:
    24 *               * Determines thermal and phase conditions of outlet stream
     26*               * Heat Transfer between multiple hot and cold streams.
    2527*
    2628*----------------------------------------------------------------------
     
    118120        Outlet.Cold.z = Inlet.Cold.z;
    119121       
     122
     123
     124for i in [1:Nhot]
     125
    120126"Vapourisation Fraction Hot Stream"
    121         Outlet.Hot.v = Inlet.Hot.v;             
     127        Outlet.Hot(i).v = PP.VapourFraction(Outlet.Hot(i).T,Outlet.Hot(i).P,Outlet.Hot(i).z);           
     128       
     129end     
     130
     131
     132for j in [1:Ncold]
    122133       
    123134"Vapourisation Fraction Cold Stream"
    124         Outlet.Cold.v = Inlet.Cold.v;   
     135        Outlet.Cold(j).v = PP.VapourFraction(Outlet.Cold(j).T,Outlet.Cold(j).P,Outlet.Cold(j).z);
    125136       
     137end
     138       
     139
    126140"Heat Duty Hot Stream"
    127141        Q =  sum(Inlet.Hot.F*(Inlet.Hot.h- Outlet.Hot.h));
Note: See TracChangeset for help on using the changeset viewer.