Ignore:
Timestamp:
Jan 23, 2007, 7:00:09 PM (16 years ago)
Author:
gerson bicca
Message:

updated

File:
1 edited

Legend:

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

    r110 r129  
    454454
    455455"Overall Heat Transfer Coefficient Clean"
    456         Details.Uc*(Resistances.Rtube+Resistances.Rwall+Resistances.Rshell)=1;
     456        (1/Details.Ud)=(1/Details.Uc)+Resistances.Rfo+Resistances.Rfi*(DoInner/DiInner);
    457457
    458458"Overall Heat Transfer Coefficient Dirty"
    459         Details.Ud*(Resistances.Rfi*(DoInner/DiInner) + Resistances.Rfo + Resistances.Rtube + Resistances.Rwall + Resistances.Rshell)=1;
     459        Details.Ud=1/(DoInner/(Inner.HeatTransfer.hcoeff*DiInner)+Resistances.Rfo+Resistances.Rfi*(DoInner/DiInner)+(DoInner*ln(DoInner/DiInner)/(2*Kwall))+(1/(Outer.HeatTransfer.hcoeff)));
     460       
    460461       
    461462end
Note: See TracChangeset for help on using the changeset viewer.