/[ascend]/trunk/models/johnpye/fprops/rankine_fprops.a4c
ViewVC logotype

Diff of /trunk/models/johnpye/fprops/rankine_fprops.a4c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 2739 by jpye, Tue Mar 5 04:45:27 2013 UTC revision 2740 by jpye, Tue Jan 28 13:58:59 2014 UTC
# Line 596  MODEL tee; Line 596  MODEL tee;
596      phi IS_A fraction;      phi IS_A fraction;
597      phi_eq: phi * inlet.mdot = outlet_branch.mdot;      phi_eq: phi * inlet.mdot = outlet_branch.mdot;
598  METHODS  METHODS
599    METHOD disable_cons_mass;
600        cons_mass.included := FALSE;
601    END disable_cons_mass;
602    METHOD enable_cons_mass;
603        cons_mass.included := TRUE;
604    END enable_cons_mass;
605  METHOD default_self;  METHOD default_self;
606      RUN inlet.default_self;      RUN inlet.default_self;
607      RUN outlet.default_self;      RUN outlet.default_self;
# Line 604  END default_self; Line 610  END default_self;
610  END tee;      END tee;    
611    
612  (*------------------------------------------------------------------------------  (*------------------------------------------------------------------------------
613      MERGE PIECE
614    *)
615    
616    (*
617        Joining two streams
618    *)
619    MODEL merge;
620        NOTES
621            'block' SELF {Model of a joining of two flow streams}
622        END NOTES;
623    
624        inlet "in:" IS_A stream_node;
625        inlet_branch "in:" IS_A stream_node;
626        outlet "out:" IS_A stream_node;
627    
628        inlet.cd, inlet_branch.cd, outlet.cd ARE_THE_SAME;
629        cd ALIASES inlet.cd;
630    
631        inlet.p, inlet_branch.p, outlet.p ARE_THE_SAME;
632        (*inlet.h, inlet_branch.h, outlet.h  ARE_THE_SAME;*)
633    
634        (* cons. mass *)
635        cons_mass: inlet.mdot + inlet_branch.mdot= outlet.mdot;
636        
637        (* cons. energy*)
638        cons_energy: inlet.mdot*inlet.h+inlet_branch.mdot*inlet_branch.h= outlet.mdot*outlet.h;
639    
640        phi IS_A fraction;
641        phi_eq: phi * outlet.mdot = inlet_branch.mdot;
642    METHODS
643    METHOD default_self;
644        RUN inlet.default_self;
645        RUN outlet.default_self;
646        RUN inlet_branch.default_self;
647    END default_self;
648    END merge;  
649    
650    (*------------------------------------------------------------------------------
651    OVERALL CYCLE    OVERALL CYCLE
652  *)  *)
653    

Legend:
Removed from v.2739  
changed lines
  Added in v.2740

john.pye@anu.edu.au
ViewVC Help
Powered by ViewVC 1.1.22