;;; Mode: -*- Lisp -*- 

;;; CyclePad Diagram File: C:\qrg\CyclePad\Design Library\airstd\bray1rix.dsn
;;; Saved at 20:44 on Wednesday 03/11/98

(CPAD::DESIGN
  :window-state :MAXIMIZED
  :saved-once? t
  :title "Title: Brayton cycle with regenerative heat exchange, intercooling, and reheat    Filename: bray1x.dsn    Author:  brokowski"
  :full-file-name #P"C:\\qrg\\CyclePad\\Design Library\\airstd\\bray1rix.dsn")

(CPAD::FLOW-TYPE :STEADY)
(CPAD::CYCLE-TYPE :HEAT-ENGINE)


(CPAD::DEVICE
  :type CPAD::TURBINE
  :location (12/47 53/872)
  :symbol DATA::TUR2
  :label "TUR2"
  :caption-offset-x -2
  :caption-offset-y 23
  :orientation (0 . :NONE))

(CPAD::DEVICE
  :type CPAD::HEATER
  :location (219/1222 53/872)
  :symbol DATA::HTR2
  :label "HTR2"
  :caption-offset-x -3
  :caption-offset-y 25
  :orientation (90 . :NONE))

(CPAD::DEVICE
  :type CPAD::COMPRESSOR
  :location (126/611 185/872)
  :symbol DATA::CMP2
  :label "CMP2"
  :caption-offset-x -2
  :caption-offset-y 23
  :orientation (0 . :RFL-PAGE))

(CPAD::DEVICE
  :type CPAD::COOLER
  :location (178/611 185/872)
  :symbol DATA::CLR2
  :label "CLR2"
  :caption-offset-x -6
  :caption-offset-y 23
  :orientation (90 . :NONE))

(CPAD::DEVICE
  :type CPAD::HEATER
  :location (24/611 119/872)
  :symbol DATA::HTR1
  :label "HTR1"
  :caption-offset-x 25
  :caption-offset-y 25
  :orientation (0 . :NONE))

(CPAD::DEVICE
  :type CPAD::TURBINE
  :location (58/611 53/872)
  :symbol DATA::TUR1
  :label "TUR1"
  :caption-offset-x 4
  :caption-offset-y 24
  :orientation (0 . :NONE))

(CPAD::DEVICE
  :type CPAD::COOLER
  :location (253/611 101/872)
  :symbol DATA::CLR1
  :label "CLR1"
  :caption-offset-x 25
  :caption-offset-y 16
  :orientation (0 . :NONE))

(CPAD::DEVICE
  :type CPAD::COMPRESSOR
  :location (228/611 185/872)
  :symbol DATA::CMP1
  :label "CMP1"
  :caption-offset-x -1
  :caption-offset-y 25
  :orientation (0 . :RFL-PAGE))

(CPAD::DEVICE
  :type CPAD::HEAT-EXCHANGER
  :location (16/47 53/872)
  :symbol DATA::HX1
  :label "HX1"
  :caption-offset-x -20
  :caption-offset-y -20
  :orientation (0 . :NONE))

(CPAD::STUFF
  :connector ((115/611 . 185/872) (106/611 . 185/872) (106/611 . 145/872) (443/1222 . 145/872) (443/1222 . 3/218) (16/47 . 3/218) (16/47 . 31/872))
  :incpdev-name DATA::CMP2
  :outcpdev-name  DATA::HX1
  :inport (:NORMAL :out DATA::CMP2)
  :outport (:COLD :in DATA::HX1)
  :caption-offset-x 25
  :caption-offset-y -10
  :symbol DATA::S14
  :label "S14")


(CPAD::STUFF
  :connector ((167/611 . 185/872) (137/611 . 185/872))
  :incpdev-name DATA::CLR2
  :outcpdev-name  DATA::CMP2
  :inport (:NORMAL :out DATA::CLR2)
  :outport (:NORMAL :in DATA::CMP2)
  :caption-offset-x -2
  :caption-offset-y 24
  :symbol DATA::S13
  :label "S13")


(CPAD::STUFF
  :connector ((217/611 . 185/872) (189/611 . 185/872))
  :incpdev-name DATA::CMP1
  :outcpdev-name  DATA::CLR2
  :inport (:NORMAL :out DATA::CMP1)
  :outport (:NORMAL :in DATA::CLR2)
  :caption-offset-x -2
  :caption-offset-y 21
  :symbol DATA::S12
  :label "S12")


(CPAD::STUFF
  :connector ((167/611 . 53/872) (15/47 . 53/872) (15/47 . 53/872) (197/611 . 53/872))
  :incpdev-name DATA::TUR2
  :outcpdev-name  DATA::HX1
  :inport (:NORMAL :out DATA::TUR2)
  :outport (:HOT :in DATA::HX1)
  :caption-offset-x 2
  :caption-offset-y 25
  :symbol DATA::S11
  :label "S11")


(CPAD::STUFF
  :connector ((241/1222 . 53/872) (145/611 . 53/872))
  :incpdev-name DATA::HTR2
  :outcpdev-name  DATA::TUR2
  :inport (:NORMAL :out DATA::HTR2)
  :outport (:NORMAL :in DATA::TUR2)
  :caption-offset-x -1
  :caption-offset-y 23
  :symbol DATA::S10
  :label "S10")


(CPAD::STUFF
  :connector ((69/611 . 53/872) (197/1222 . 53/872))
  :incpdev-name DATA::TUR1
  :outcpdev-name  DATA::HTR2
  :inport (:NORMAL :out DATA::TUR1)
  :outport (:NORMAL :in DATA::HTR2)
  :caption-offset-x -3
  :caption-offset-y 25
  :symbol DATA::S9
  :label "S9")


(CPAD::STUFF
  :connector ((24/611 . 97/872) (24/611 . 53/872) (1/13 . 53/872))
  :incpdev-name DATA::HTR1
  :outcpdev-name  DATA::TUR1
  :inport (:NORMAL :out DATA::HTR1)
  :outport (:NORMAL :in DATA::TUR1)
  :caption-offset-x 7
  :caption-offset-y 26
  :symbol DATA::S1
  :label "S1")


(CPAD::STUFF
  :connector ((253/611 . 123/872) (253/611 . 185/872) (239/611 . 185/872))
  :incpdev-name DATA::CLR1
  :outcpdev-name  DATA::CMP1
  :inport (:NORMAL :out DATA::CLR1)
  :outport (:NORMAL :in DATA::CMP1)
  :caption-offset-x 15
  :caption-offset-y 20
  :symbol DATA::S3
  :label "S3")


(CPAD::STUFF
  :connector ((219/611 . 53/872) (253/611 . 53/872) (253/611 . 79/872))
  :incpdev-name DATA::HX1
  :outcpdev-name  DATA::CLR1
  :inport (:HOT :out DATA::HX1)
  :outport (:NORMAL :in DATA::CLR1)
  :caption-offset-x 21
  :caption-offset-y 12
  :symbol DATA::S6
  :label "S6")


(CPAD::STUFF
  :connector ((16/47 . 75/872) (16/47 . 107/872) (191/1222 . 107/872) (191/1222 . 183/872) (24/611 . 183/872) (24/611 . 141/872))
  :incpdev-name DATA::HX1
  :outcpdev-name  DATA::HTR1
  :inport (:COLD :out DATA::HX1)
  :outport (:NORMAL :in DATA::HTR1)
  :caption-offset-x -16
  :caption-offset-y 15
  :symbol DATA::S8
  :label "S8")


(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)
  (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 :SI)

(CPAD::LOCALE :US)

(CPAD::AUTHOR " brokowski")

(CPAD::INTERNET
 ("relay.acns.nwu.edu"
"robota@cs.nwu.edu"
NIL))


(CPAD::HISTORY
  (3098659482 3098657942)
  (3098118412 3098117124)
  (3095613180 3095538000)
  (3095534019 3095530385))

(CPAD::COMMENTS)

(CPAD::METER-POSNS
  (CL-USER::S12 (442 215 712 498) (442 215 712 498))
  (CL-USER::S13 (261 552 531 835) (474 227 744 510))
  (CL-USER::S10 (71 312 341 595) (450 251 720 534))
  (CL-USER::S11 (546 221 816 504) (546 221 816 504))
  (CL-USER::CMP2 (420 284 720 516) (420 284 720 516))
  (CL-USER::CLR2 (484 368 784 600) (484 368 784 600))
  (CL-USER::TUR2 (396 356 696 620) (396 356 696 588))
  (CL-USER::HTR2 (420 254 720 486) (420 254 720 486))
  (CL-USER::S9 (514 239 784 522) (514 239 784 522))
  (CL-USER::S2 (378 233 648 418) (378 233 648 418))
  (CL-USER::HTR1 (290 262 590 494) (290 262 590 494))
  (CL-USER::TUR1 (342 216 642 448) (342 216 642 448))
  (CL-USER::CLR1 (271 206 571 438) (271 206 571 438))
  (CL-USER::CMP1 (233 221 533 453) (233 221 533 453))
  (CL-USER::S1 (327 222 597 407) (327 222 597 407))
  (CL-USER::S3 (256 289 526 474) (256 289 526 474))
  (:CYCLE (373 112 648 402) (373 112 648 402))
  (CL-USER::HX1 (500 296 800 528) (500 296 800 528))
  (CL-USER::S5 (442 203 712 486) (442 203 712 486))
  (CL-USER::S6 (426 209 696 492) (426 209 696 492))
  (CL-USER::S7 (204 372 474 655) (490 215 760 498)))

(CPAD::ASNS
  (== (CL-USER::P CL-USER::S12) (CL-USER::P CL-USER::S9))
  (== (T CL-USER::S14) (T CL-USER::S6))
  (== (T CL-USER::S13) (T CL-USER::S3))
  (== (T CL-USER::S10) (T CL-USER::S1))
  (CL-USER::ISENTROPIC CL-USER::CMP2)
  (CL-USER::ADIABATIC CL-USER::CMP2)
  (CL-USER::ISOBARIC CL-USER::CLR2)
  (CL-USER::ADIABATIC CL-USER::TUR2)
  (CL-USER::ISENTROPIC CL-USER::TUR2)
  (CL-USER::ISOBARIC CL-USER::HTR2)
  (CL-USER::ISOBARIC CL-USER::HTR1)
  (CL-USER::ISENTROPIC CL-USER::TUR1)
  (CL-USER::ADIABATIC CL-USER::TUR1)
  (CL-USER::ISOBARIC CL-USER::CLR1)
  (CL-USER::ISENTROPIC CL-USER::CMP1)
  (CL-USER::ADIABATIC CL-USER::CMP1)
  (SUBSTANCE-OF CL-USER::S1 CL-USER::AIR)
  (:NOT (CL-USER::CONTROL-FLAG :PROPAGATE-SENSITIVITY))
  (CL-USER::ISOBARIC-COLD-SIDE CL-USER::HX1)
  (CL-USER::ISOBARIC-HOT-SIDE CL-USER::HX1)
  (COUNTER-CURRENT CL-USER::HX1)
  (== (T CL-USER::S6) (T CL-USER::S7))
  (:NOT (CL-USER::CONTROL-FLAG :ISENTROPIC-MEANS-IDEAL))
  (:NOT (CL-USER::CONTROL-FLAG :CONSIDER-VELOCITY))
  (:NOT (CL-USER::CONTROL-FLAG :CONSIDER-ECONOMICS))
  (:NOT (CL-USER::CONTROL-FLAG :USE-AIR-STANDARD))
  (:NOT (CL-USER::CONTROL-FLAG :USE-TENV))
  )

(CPAD::NVALS
  ((CL-USER::P CL-USER::S9) 316000.0)
  ((CL-USER::P CL-USER::S1) 1000000.0)
  ((T CL-USER::S3) 288.15)
  ((CL-USER::P CL-USER::S3) 100000.0)
  ((T CL-USER::S1) 1273.15)
  )

(CPAD::USER-ACTIONS
   ((INVOKE-ASN (== (CL-USER::P CL-USER::S12) (CL-USER::P CL-USER::S9))) . 3098659290)
   ((ASSIGN (CL-USER::P CL-USER::S9) 316000.0) . 3098659263)
   ((RETRACT-ASN (== (CL-USER::PR CL-USER::TUR2) (CL-USER::PR CL-USER::TUR1))) . 3098659253)
   ((RETRACT-ASN (== (CL-USER::PR CL-USER::CMP2) (CL-USER::PR CL-USER::CMP1))) . 3098659246)
   ((NVALUE-NEEDS ((CL-USER::P CL-USER::S9) CL-USER::NVALUE :UNKNOWN)) . 3098659143)
   ((INVOKE-ASN (== (T CL-USER::S14) (T CL-USER::S6))) . 3098659093)
   ((INVOKE-ASN (== (T CL-USER::S13) (T CL-USER::S3))) . 3098659072)
   ((INVOKE-ASN (== (T CL-USER::S10) (T CL-USER::S1))) . 3098658972)
   ((INVOKE-ASN (== (CL-USER::PR CL-USER::CMP2) (CL-USER::PR CL-USER::CMP1))) . 3098658911)
   ((INVOKE-ASN (CL-USER::ISENTROPIC CL-USER::CMP2)) . 3098658895)
   ((INVOKE-ASN (CL-USER::ADIABATIC CL-USER::CMP2)) . 3098658889)
   ((INVOKE-ASN (CL-USER::ISOBARIC CL-USER::CLR2)) . 3098658882)
   ((INVOKE-ASN (== (CL-USER::PR CL-USER::TUR2) (CL-USER::PR CL-USER::TUR1))) . 3098658865)
   ((INVOKE-ASN (CL-USER::ADIABATIC CL-USER::TUR2)) . 3098658842)
   ((INVOKE-ASN (CL-USER::ISENTROPIC CL-USER::TUR2)) . 3098658838)
   ((INVOKE-ASN (CL-USER::ISOBARIC CL-USER::HTR2)) . 3098658831)
   ((MODE-SWITCH :ANALYZE) . 3098658810)
   ((ASSIGN (CL-USER::P CL-USER::S1) 1000000.0) . 3098658804)
   ((ASSIGN (T CL-USER::S3) 288.15) . 3098658800)
   ((ASSIGN (CL-USER::P CL-USER::S3) 100000.0) . 3098658788)
   ((ASSIGN (T CL-USER::S1) 1273.15) . 3098658787)
   ((CONNECT-DEVICES CL-USER::S14 (OUT CL-USER::CMP2) (COLD-IN CL-USER::HX1)) . 3098658681)
   ((CONNECT-DEVICES CL-USER::S13 (OUT CL-USER::CLR2) (IN CL-USER::CMP2)) . 3098658668)
   ((CONNECT-DEVICES CL-USER::S12 (OUT CL-USER::CMP1) (IN CL-USER::CLR2)) . 3098658666)
   ((CONNECT-DEVICES CL-USER::S11 (OUT CL-USER::TUR2) (HOT-IN CL-USER::HX1)) . 3098658662)
   ((CONNECT-DEVICES CL-USER::S10 (OUT CL-USER::HTR2) (IN CL-USER::TUR2)) . 3098658653)
   ((CONNECT-DEVICES CL-USER::S9 (OUT CL-USER::TUR1) (IN CL-USER::HTR2)) . 3098658651)
   ((ADD-DEVICE TURBINE "TUR2" CL-USER::TUR2) . 3098658624)
   ((ADD-DEVICE HEATER "HTR2" CL-USER::HTR2) . 3098658621)
   ((ADD-DEVICE COMPRESSOR "CMP2" CL-USER::CMP2) . 3098658601)
   ((ADD-DEVICE COOLER "CLR2" CL-USER::CLR2) . 3098658598)
   ((DISCONNECT CL-USER::S7 (OUT CL-USER::CMP1) (COLD-IN CL-USER::HX1)) . 3098658530)
   ((DELETED CL-USER::STUFF CL-USER::S7) . 3098658530)
   ((DISCONNECT CL-USER::S5 (OUT CL-USER::TUR1) (HOT-IN CL-USER::HX1)) . 3098658529)
   ((DELETED CL-USER::STUFF CL-USER::S5) . 3098658528)
   ((UNASSIGN (CL-USER::P CL-USER::S1) 1000000.0) . 3098658205)
   ((UNASSIGN (T CL-USER::S3) 288.15) . 3098658204)
   ((UNASSIGN (CL-USER::P CL-USER::S3) 100000.0) . 3098658203)
   ((UNASSIGN (T CL-USER::S1) 1273.15) . 3098658200)
   ((MODE-SWITCH :BUILD) . 3098658196)
   ((CL-USER::INVOKE-ASN (== (T CL-USER::S6) (T CL-USER::S7))) . 3098118300)
   ((WHY ((CL-USER::P CL-USER::S6) CL-USER::NVALUE 100000.0)) . 3098118238)
   ((CL-USER::INVOKE-ASN (COUNTER-CURRENT CL-USER::HX1)) . 3098118205)
   ((CL-USER::INVOKE-ASN (CL-USER::ISOBARIC-HOT-SIDE CL-USER::HX1)) . 3098118200)
   ((CL-USER::INVOKE-ASN (CL-USER::ISOBARIC-COLD-SIDE CL-USER::HX1)) . 3098118192)
   ((CL-USER::MODE-SWITCH :ANALYZE) . 3098117342)
   ((CL-USER::ASSIGN (CL-USER::P CL-USER::S1) 1000000.0) . 3098117339)
   ((CL-USER::ASSIGN (T CL-USER::S3) 288.15) . 3098117339)
   ((CL-USER::ASSIGN (CL-USER::P CL-USER::S3) 100000.0) . 3098117337)
   ((CL-USER::ASSIGN (T CL-USER::S1) 1273.15) . 3098117336)
   ((CL-USER::CONNECT-DEVICES CL-USER::S8 (COLD-OUT CL-USER::HX1) (IN CL-USER::HTR1)) . 3098117271)
   ((CL-USER::CONNECT-DEVICES CL-USER::S7 (OUT CL-USER::CMP1) (COLD-IN CL-USER::HX1)) . 3098117256)
   ((CL-USER::CONNECT-DEVICES CL-USER::S6 (HOT-OUT CL-USER::HX1) (IN CL-USER::CLR1)) . 3098117238)
   ((CL-USER::CONNECT-DEVICES CL-USER::S5 (OUT CL-USER::TUR1) (HOT-IN CL-USER::HX1)) . 3098117235)
   ((CL-USER::ADD-DEVICE HEAT-EXCHANGER "HX1" CL-USER::HX1) . 3098117223)
   ((CL-USER::DISCONNECT CL-USER::S4 (OUT CL-USER::CMP1) (IN CL-USER::HTR1)) . 3098117207)
   ((CL-USER::DELETED CL-USER::STUFF CL-USER::S4) . 3098117207)
   ((CL-USER::DISCONNECT CL-USER::S2 (OUT CL-USER::TUR1) (IN CL-USER::CLR1)) . 3098117205)
   ((CL-USER::DELETED CL-USER::STUFF CL-USER::S2) . 3098117205)
   ((CL-USER::UNASSIGN (CL-USER::P CL-USER::S1) 1000000.0) . 3098117190)
   ((CL-USER::UNASSIGN (T CL-USER::S3) 288.15) . 3098117189)
   ((CL-USER::UNASSIGN (CL-USER::P CL-USER::S3) 100000.0) . 3098117189)
   ((CL-USER::UNASSIGN (T CL-USER::S1) 1273.15) . 3098117187)
   ((CL-USER::MODE-SWITCH :BUILD) . 3098117184)
   ((CL-USER::ASSIGN (T CL-USER::S1) 1273.15) . 3095530680)
   ((CL-USER::UNASSIGN (T CL-USER::S1) 873.15) . 3095530676)
   ((CL-USER::ASSIGN (CL-USER::P CL-USER::S3) 100000.0) . 3095530620)
   ((CL-USER::ASSIGN (T CL-USER::S3) 288.15) . 3095530614)
   ((CL-USER::INVOKE-ASN (SUBSTANCE-OF CL-USER::S1 CL-USER::AIR)) . 3095530585)
   ((CL-USER::ASSIGN (CL-USER::P CL-USER::S1) 1000000.0) . 3095530580)
   ((CL-USER::ASSIGN (T CL-USER::S1) 873.15) . 3095530572)
   ((CL-USER::INVOKE-ASN (CL-USER::ADIABATIC CL-USER::CMP1)) . 3095530547)
   ((CL-USER::INVOKE-ASN (CL-USER::ISENTROPIC CL-USER::CMP1)) . 3095530543)
   ((CL-USER::INVOKE-ASN (CL-USER::ISOBARIC CL-USER::CLR1)) . 3095530535)
   ((CL-USER::INVOKE-ASN (CL-USER::ADIABATIC CL-USER::TUR1)) . 3095530526)
   ((CL-USER::INVOKE-ASN (CL-USER::ISENTROPIC CL-USER::TUR1)) . 3095530524)
   ((CL-USER::INVOKE-ASN (CL-USER::ISOBARIC CL-USER::HTR1)) . 3095530518)
   ((CL-USER::MODE-SWITCH :ANALYZE) . 3095530515)
   ((CL-USER::CONNECT-DEVICES CL-USER::S4 (OUT CL-USER::CMP1) (IN CL-USER::HTR1)) . 3095530462)
   ((CL-USER::CONNECT-DEVICES CL-USER::S3 (OUT CL-USER::CLR1) (IN CL-USER::CMP1)) . 3095530460)
   ((CL-USER::CONNECT-DEVICES CL-USER::S2 (OUT CL-USER::TUR1) (IN CL-USER::CLR1)) . 3095530454)
   ((CL-USER::CONNECT-DEVICES CL-USER::S1 (OUT CL-USER::HTR1) (IN CL-USER::TUR1)) . 3095530450)
   ((CL-USER::ADD-DEVICE COMPRESSOR "CMP1" CL-USER::CMP1) . 3095530441)
   ((CL-USER::ADD-DEVICE COOLER "CLR1" CL-USER::CLR1) . 3095530436)
   ((CL-USER::ADD-DEVICE TURBINE "TUR1" CL-USER::TUR1) . 3095530426)
   ((CL-USER::ADD-DEVICE HEATER "HTR1" CL-USER::HTR1) . 3095530422)
   ((CL-USER::INVOKE-ASN (CL-USER::HEAT-ENGINE :CYCLE)) . 3095530410)
   ((CL-USER::INVOKE-ASN (:NOT (CL-USER::CONTROL-FLAG :ISENTROPIC-MEANS-IDEAL))) . 3095530391)
   ((CL-USER::INVOKE-ASN (:NOT (CL-USER::CONTROL-FLAG :CONSIDER-VELOCITY))) . 3095530390)
   ((CL-USER::INVOKE-ASN (:NOT (CL-USER::CONTROL-FLAG :CONSIDER-ECONOMICS))) . 3095530390)
   ((CL-USER::INVOKE-ASN (:NOT (CL-USER::CONTROL-FLAG :USE-AIR-STANDARD))) . 3095530389)
   ((CL-USER::INVOKE-ASN (:NOT (CL-USER::CONTROL-FLAG :USE-TENV))) . 3095530388)
   ((CL-USER::INVOKE-ASN (:NOT (CL-USER::CONTROL-FLAG :PROPAGATE-SENSITIVITY))) . 3095530388)
   ((CL-USER::MODE-SWITCH :BUILD) . 3095530385))

(CPAD::PROBLEM-DESC
  "NIL")