;;; Mode: -*- Lisp -*- ;;; CyclePad Diagram File: E:\QRG\CYCLEPAD\Design Library\rankine\rankine.dsn ;;; Saved at 13:26 on Friday 11/09/01 (cpad::design :window-state :maximized :saved-once? t :title "Rankine Cycle Tutorial" :full-file-name #p"E:\\QRG\\CYCLEPAD\\Design Library\\rankine\\rankine.dsn") (cpad::flow-type :steady) (cpad::cycle-type :heat-engine) (cpad::device :type cpad::pump :location (107/384 3/11) :symbol data::pmp1 :label "pmp1" :caption-offset-x -4 :caption-offset-y 31 :orientation (0 . :none)) (cpad::device :type cpad::turbine :location (329/1152 5/66) :symbol data::tur1 :label "tur1" :caption-offset-x 1 :caption-offset-y 26 :orientation (0 . :none)) (cpad::device :type cpad::cooler :location (49/128 49/286) :symbol data::clr1 :label "clr1" :caption-offset-x -26 :caption-offset-y 3 :orientation (0 . :none)) (cpad::device :type cpad::heater :location (53/288 145/858) :symbol data::htr1 :label "htr1" :caption-offset-x 25 :caption-offset-y 25 :orientation (0 . :none)) (cpad::stuff :connector ((49/128 . 13/66) (49/128 . 3/11) (343/1152 . 3/11)) :incpdev-name data::clr1 :outcpdev-name data::pmp1 :inport (:normal :out data::clr1) :outport (:normal :in data::pmp1) :caption-offset-x 0 :caption-offset-y 25 :symbol data::s4 :label "s4") (cpad::stuff :connector ((39/128 . 5/66) (49/128 . 5/66) (49/128 . 125/858)) :incpdev-name data::tur1 :outcpdev-name data::clr1 :inport (:normal :out data::tur1) :outport (:normal :in data::clr1) :caption-offset-x 5 :caption-offset-y 20 :symbol data::s3 :label "s3") (cpad::stuff :connector ((53/288 . 41/286) (53/288 . 5/66) (307/1152 . 5/66)) :incpdev-name data::htr1 :outcpdev-name data::tur1 :inport (:normal :out data::htr1) :outport (:normal :in data::tur1) :caption-offset-x 0 :caption-offset-y 25 :symbol data::s2 :label "s2") (cpad::stuff :connector ((299/1152 . 3/11) (53/288 . 3/11) (53/288 . 167/858)) :incpdev-name data::pmp1 :outcpdev-name data::htr1 :inport (:normal :out data::pmp1) :outport (:normal :in data::htr1) :caption-offset-x -1 :caption-offset-y 24 :symbol data::s1 :label "s1") (cpad::units (time :years) (specific-cost :dollars/kg) (funds-flow-rate :dollars/day) (money :dollars) (heat-flux-per-degree :w/m^2k) (universal-r :kj/kmol-k) (specific-entropy :kj/kgk) (entropy-rate :kw/k) (entropy :kj/k) (specific-energy-transfer-rate :kw/kg) (refrigeration-rate :ton) (work-transfer-rate :kw) (heat-transfer-rate :kw) (energy-transfer-rate :kw) (specific-energy :kj/kg) (energy :kj) (velocity :m/sec) (area :m^2) (length :m) (specific-volume :m^3/kg) (volume-flow :m^3/sec) (volume :m^3) (density :kg/m^3) (molar-mass :kg/kmol) (moles :kmol) (mass-flow :kg/s) (mass :kg) (pressure :kpa) (temperature :c) ) (cpad::units-mode :user) (cpad::locale :us) (cpad::show-legend t) (cpad::author "") (cpad::history (3214322778 3214320996)) (cpad::comments) (cpad::meter-posns (:cycle (239 515 514 805) (240 515 515 805)) (COMMON-LISP-USER::s1 (4 296 274 567) (4 297 274 568)) (COMMON-LISP-USER::pmp1 (239 272 539 504) (275 273 575 505)) (COMMON-LISP-USER::s4 (464 312 734 594) (464 313 734 595)) (COMMON-LISP-USER::clr1 (452 302 752 534) (452 302 752 534)) (COMMON-LISP-USER::s3 (470 8 740 290) (470 9 740 291)) (COMMON-LISP-USER::tur1 (321 270 621 502) (324 270 624 502)) (COMMON-LISP-USER::s2 (9 4 279 278) (9 4 279 279)) (COMMON-LISP-USER::htr1 (444 102 744 334) (443 104 743 336))) (cpad::asns (COMMON-LISP-USER::isentropic COMMON-LISP-USER::pmp1) (COMMON-LISP-USER::adiabatic COMMON-LISP-USER::pmp1) (saturated COMMON-LISP-USER::s4) (COMMON-LISP-USER::isobaric COMMON-LISP-USER::clr1) (COMMON-LISP-USER::adiabatic COMMON-LISP-USER::tur1) (COMMON-LISP-USER::isentropic COMMON-LISP-USER::tur1) (substance-of COMMON-LISP-USER::s2 water) (COMMON-LISP-USER::isobaric COMMON-LISP-USER::htr1) (:not (COMMON-LISP-USER::control-flag :isentropic-means-ideal)) (:not (COMMON-LISP-USER::control-flag :consider-velocity)) (:not (COMMON-LISP-USER::control-flag :consider-economics)) (:not (COMMON-LISP-USER::control-flag :use-air-standard)) (:not (COMMON-LISP-USER::control-flag :use-tenv)) (:not (COMMON-LISP-USER::control-flag :propagate-sensitivity)) ) (cpad::nvals ((COMMON-LISP-USER::mass-flow COMMON-LISP-USER::s2) 1.0) ((COMMON-LISP-USER::dryness COMMON-LISP-USER::s4) 0.0) ((COMMON-LISP-USER::p COMMON-LISP-USER::s3) 10000.0) ((COMMON-LISP-USER::p COMMON-LISP-USER::s2) 5000000.0) ((t COMMON-LISP-USER::s2) 673.15) ) (cpad::user-actions ((COMMON-LISP-USER::assign (COMMON-LISP-USER::mass-flow COMMON-LISP-USER::s2) 1.0) . 3214322717) ((unassign (COMMON-LISP-USER::mass-flow COMMON-LISP-USER::s1) 1.0) . 3214322705) ((COMMON-LISP-USER::assign (COMMON-LISP-USER::mass-flow COMMON-LISP-USER::s1) 1.0) . 3214322223) ((invoke-asn (COMMON-LISP-USER::heat-engine :cycle)) . 3214321923) ((unassign (COMMON-LISP-USER::mass-flow COMMON-LISP-USER::s1) 1.0) . 3214321918) ((COMMON-LISP-USER::assign (COMMON-LISP-USER::mass-flow COMMON-LISP-USER::s1) 1.0) . 3214321899) ((invoke-asn (COMMON-LISP-USER::isentropic COMMON-LISP-USER::pmp1)) . 3214321846) ((invoke-asn (COMMON-LISP-USER::adiabatic COMMON-LISP-USER::pmp1)) . 3214321842) ((COMMON-LISP-USER::assign (COMMON-LISP-USER::dryness COMMON-LISP-USER::s4) 0.0) . 3214321829) ((invoke-asn (saturated COMMON-LISP-USER::s4)) . 3214321824) ((invoke-asn (COMMON-LISP-USER::isobaric COMMON-LISP-USER::clr1)) . 3214321771) ((COMMON-LISP-USER::assign (COMMON-LISP-USER::p COMMON-LISP-USER::s3) 10000.0) . 3214321744) ((invoke-asn (COMMON-LISP-USER::adiabatic COMMON-LISP-USER::tur1)) . 3214321715) ((invoke-asn (COMMON-LISP-USER::isentropic COMMON-LISP-USER::tur1)) . 3214321713) ((COMMON-LISP-USER::assign (COMMON-LISP-USER::p COMMON-LISP-USER::s2) 5000000.0) . 3214321486) ((COMMON-LISP-USER::assign (t COMMON-LISP-USER::s2) 673.15) . 3214321481) ((invoke-asn (substance-of COMMON-LISP-USER::s2 water)) . 3214321473) ((mode-switch :analyze) . 3214321402) ((cpad-gui::mode-switch :build) . 3214321195) ((invoke-asn (COMMON-LISP-USER::isobaric COMMON-LISP-USER::htr1)) . 3214321094) ((mode-switch :analyze) . 3214321063) ((cpad-gui::connect-devices COMMON-LISP-USER::s4 (out COMMON-LISP-USER::clr1) (in COMMON-LISP-USER::pmp1)) . 3214321059) ((cpad-gui::connect-devices COMMON-LISP-USER::s3 (out COMMON-LISP-USER::tur1) (in COMMON-LISP-USER::clr1)) . 3214321057) ((cpad-gui::connect-devices COMMON-LISP-USER::s2 (out COMMON-LISP-USER::htr1) (in COMMON-LISP-USER::tur1)) . 3214321054) ((cpad-gui::connect-devices COMMON-LISP-USER::s1 (out COMMON-LISP-USER::pmp1) (in COMMON-LISP-USER::htr1)) . 3214321051) ((cpad-gui::deleted pump COMMON-LISP-USER::pmp2) . 3214321049) ((add-device pump nil COMMON-LISP-USER::pmp2) . 3214321037) ((add-device pump nil COMMON-LISP-USER::pmp1) . 3214321035) ((add-device turbine nil COMMON-LISP-USER::tur1) . 3214321032) ((add-device cooler nil COMMON-LISP-USER::clr1) . 3214321031) ((add-device heater nil COMMON-LISP-USER::htr1) . 3214321030) ((invoke-asn (:not (COMMON-LISP-USER::control-flag :isentropic-means-ideal))) . 3214320998) ((invoke-asn (:not (COMMON-LISP-USER::control-flag :consider-velocity))) . 3214320998) ((invoke-asn (:not (COMMON-LISP-USER::control-flag :consider-economics))) . 3214320998) ((invoke-asn (:not (COMMON-LISP-USER::control-flag :use-air-standard))) . 3214320998) ((invoke-asn (:not (COMMON-LISP-USER::control-flag :use-tenv))) . 3214320998) ((invoke-asn (:not (COMMON-LISP-USER::control-flag :propagate-sensitivity))) . 3214320998) ((cpad-gui::mode-switch :build) . 3214320997)) (cpad::problem-desc nil)