Commit 90000d3f authored by Chris Dancy's avatar Chris Dancy

Merge branch 'Master' into 'master'

Master



See merge request !1
parents c8b7c3d2 19da4d7d
No preview for this file type
No preview for this file type
......@@ -110,11 +110,11 @@
(setf ut (no-output (sgp-fct (list :ut))))
(setf ut (car ut))
(setf addNoise (act-r-noise egs))
#|(when (and (>= (mod (mp-time) 10) 0) (<= (mod (mp-time) 10) 1))
(when (and (>= (mod (mp-time) 10) 0) (<= (mod (mp-time) 10) 1))
(with-open-file
(msgStream "noiseVals.txt"
:direction :output :if-exists :append :if-does-not-exist :create)
(format msgStream "~10$~T" arous-util-noise)))|#
(format msgStream "~10$~T" arous-util-noise)))
(setf prod-utility (+ prod-utility (if (zerop egs) 0.0 addNoise)))
;(format t "~a ~a Noise Added ~a egs ~a Threshold ~a arousUtilNoise ~a~%" (production-name (get-production production)) prod-utility addNoise egs ut arous-util-noise)
prod-utility))
......
HumMod / Hormones
Created : 2011-07-26
Revised : 2012-03-11
Author : Tom Coleman
Copyright : 2011-2011
By : University of Mississippi Medical Center
<?path Display/Hormones/ ?> -->
<?include Summary/Summary.DES ?>
<?include Gender/Gender.DES ?>
<!-- Separator Bar -->
<?include ACTH/ACTH.DES ?>
<?include ADH/ADH.DES ?>
<?include Aldosterone/Aldosterone.DES ?>
<?include ANP/ANP.DES ?>
<?include Calcitonin/Calcitonin.DES ?>
<?include CorticotropinReleasingFactor/CorticotropinReleasingFactor.DES ?>
<?include Cortisol/Cortisol.DES ?>
<?include EPO/EPO.DES ?>
<?include Glucagon/Glucagon.DES ?>
<?include Insulin/Insulin.DES ?>
<?include Leptin/Leptin.DES ?>
<?include ParathyroidHormone/ParathyroidHormone.DES ?>
<?include Renin/Renin.DES ?>
<?include ThyroidGland/ThyroidGland.DES ?>
<?include VitaminD/VitaminD.DES ?>
End
<ini>
<windowtop> 343 </windowtop>
<windowleft> 853 </windowleft>
<windowhigh> 200 </windowhigh>
<windowwide> 400 </windowwide>
<windowstate> 0 </windowstate>
<pipeinterval> 200 </pipeinterval>
<hidewindow> True </hidewindow>
</ini>
<ini>
<windowtop> 50 </windowtop>
<windowleft> 65 </windowleft>
<windowhigh> 200 </windowhigh>
<windowwide> 400 </windowwide>
<windowstate> 0 </windowstate>
<pipeinterval> 10 </pipeinterval>
<hidewindow> True </hidewindow>
</ini>
This diff is collapsed.
This diff is collapsed.
HumMod / Control
Created : 16-Aug-96
Revised : 2012-07-18
Author : Tom Coleman
Copyright : 1996-2012
By : University of Mississippi Medical Center
<control>
<?include Control\GoFor.DES ?>
<?include Control\GoTo.DES ?>
<?include Control\SettlingTime.DES ?>
<?include Control\Scramble.DES ?>
</control>
End
HumMod / GoFor
Created : 12-Mar-07
Last Modified : 2010-05-28
Author : Tom Coleman
Copyright : 2006-2010
By : University of Mississippi Medical Center
<gofor>
<solutionint> 0.0166666 </solutionint>
<displayint> 0.0166666 </displayint>
<menuitem> 1 Sec </menuitem>
</gofor>
<gofor>
<solutionint> 0.0833333 </solutionint>
<displayint> 0.0166666 </displayint>
<menuitem> 5 Sec </menuitem>
</gofor>
<gofor>
<solutionint> 0.1666666 </solutionint>
<displayint> 0.0166666 </displayint>
<menuitem> 10 Sec </menuitem>
</gofor>
<gobar/>
<gofor>
<solutionint> 1 </solutionint>
<displayint> 0.1666666 </displayint>
<menuitem> 1 Min </menuitem>
</gofor>
<gofor>
<solutionint> 5.0 </solutionint>
<displayint> 0.5 </displayint>
<menuitem> 5 Min </menuitem>
</gofor>
<gofor>
<solutionint> 10 </solutionint>
<displayint> 0.5 </displayint>
<menuitem> 10 Min </menuitem>
</gofor>
<gofor>
<solutionint> 30.0 </solutionint>
<displayint> 5.0 </displayint>
<storageint> 2.0 </storageint>
<menuitem> 30 Min </menuitem>
</gofor>
<gobar/>
<gofor>
<solutionint> 60 </solutionint>
<displayint> 10.0 </displayint>
<storageint> 5.0 </storageint>
<menuitem> 1 Hour </menuitem>
</gofor>
<gofor>
<solutionint> 360.0 </solutionint>
<displayint> 60.0 </displayint>
<storageint> 30.0 </storageint>
<menuitem> 6 Hours </menuitem>
</gofor>
<gofor>
<solutionint> 720.0 </solutionint>
<displayint> 120.0 </displayint>
<storageint> 60.0 </storageint>
<menuitem> 12 Hours </menuitem>
</gofor>
<gobar/>
<gofor>
<solutionint> 1440 </solutionint>
<displayint> 240 </displayint>
<storageint> 120 </storageint>
<menuitem> 1 Day </menuitem>
</gofor>
<gofor>
<solutionint> 10080 </solutionint>
<displayint> 1440 </displayint>
<storageint> 360 </storageint>
<menuitem> 1 Week </menuitem>
</gofor>
<gobar/>
<gofor>
<solutionint> 43200.0 </solutionint>
<displayint> 2880 </displayint>
<storageint> 1440 </storageint>
<menuitem> 30 Days </menuitem>
</gofor>
<gofor>
<solutionint> 86400.0 </solutionint>
<displayint> 2880 </displayint>
<storageint> 1440 </storageint>
<menuitem> 60 Days </menuitem>
</gofor>
<gofor>
<solutionint> 129600.0 </solutionint>
<displayint> 2880 </displayint>
<storageint> 1440 </storageint>
<menuitem> 90 Days </menuitem>
</gofor>
End
HumMod / GoTo
Created : 12-Mar-07
Last Modified : 2010-05-28
Author : Tom Coleman
Copyright : 2006-2010
By : University of Mississippi Medical Center
<gobar/>
<goto>
<solutionint> 60.0 </solutionint>
<displayint> 10.0 </displayint>
<menuitem> To Next Hour </menuitem>
</goto>
<goto>
<solutionint> 1440.0 </solutionint>
<displayint> 120.0 </displayint>
<storageint> 60.0 </storageint>
<menuitem> To Next Day </menuitem>
</goto>
<goto>
<solutionint> 10080.0 </solutionint>
<displayint> 1440 </displayint>
<storageint> 360 </storageint>
<menuitem> To Next Week </menuitem>
</goto>
<goto>
<solutionint> 43200.0 </solutionint>
<displayint> 2880 </displayint>
<storageint> 1440 </storageint>
<menuitem> To Next 30 Days </menuitem>
</goto>
End
HumMod / Scramble
Created : 2012-07-18
Revised : 2012-07-19
Author : Tom Coleman
Copyright : 2012-2012
By : University of Mississippi Medical Center
<!-- <scramble/> -->
End
HumMod / SettlingTime
Created : 12-Mar-07
Revised : 2012-01-04
Author : Tom Coleman
Copyright : 2008-2012
By : University of Mississippi Medical Center
Schema : DES V1.0
<!-- <settlingtime> 720 </settlingtime> -->
End
HumMod / AcidBase
Created : 2012-03-23
Revised : 2012-03-23
Author : Tom Coleman
Copyright : 2012-2012
By : University of Mississippi Medical Center
<panel><name> AcidBase </name>
<showbitmap>
<row> 0.3 </row>
<col> 1.0 </col>
<name> AcidBase </name>
</showbitmap>
<label>
<row> 0.3 </row>
<col> 4.5 </col>
<text> Acid / Base </text>
</label>
<showclock>
<row> 0.3 </row><col> 32.0 </col>
<name> System.X </name>
<ampm/>
<secs/>
<days/>
</showclock>
<?path Display\AcidBase\ ?>
<?include ArterialPh.DES ?>
<?include BloodPh.DES ?>
<?include VenousPh.DES ?>
</panel>
End
\ No newline at end of file
HumMod / ArterialPh
Created : 15-May-05
Last Modified : 26-Jan-10
Author : Tom Coleman
Copyright : 2006-2010
By : University Of Mississippi Medical Center
Schema : DES V1.0
<groupbox>
<row> 2.0 </row>
<col> 1.0 </col>
<high> 6 </high>
<wide> 30.0 </wide>
<title> Arterial pH </title>
<showvalue>
<row> 1.4 </row><col> 1.0 </col>
<name> BloodPhValues.ArtysPh </name>
<format><decimal> 2 </decimal></format>
<label> pH </label>
</showvalue>
<showvalue>
<row> 2.4 </row><col> 1.0 </col>
<name> BloodPhValues.Artys[H+] </name>
<format><decimal> 1 </decimal></format>
<label> [H+] </label>
</showvalue>
<showvalue>
<row> 3.4 </row><col> 1.0 </col>
<name> CO2Artys.Pressure </name>
<format><decimal> 1 </decimal></format>
<label> pCO2 </label>
</showvalue>
<showvalue>
<row> 4.4 </row><col> 1.0 </col>
<name> BloodIons.[SID(mEq/L)] </name>
<format><decimal> 1 </decimal></format>
<label> [SID] </label>
</showvalue>
<infobutton>
<row> 1.2 </row>
<col> 26.0 </col>
<line> NORMAL VALUES AND UNITS </line>
<line> </line>
<line> pH = 7.42 </line>
<line> [H+] = 38 </line>
<line> pCO2 = 40 </line>
<line> [SID] = 40 </line>
</infobutton>
</groupbox>
End
HumMod / BloodPh
Created : 10-May-05
Last Modified : 2012-01-03
Author : Tom Coleman
Copyright : 2006-2012
By : University Of Mississippi Medical Center
Schema : DES V1.0
<groupbox>
<row> 8.2 </row>
<col> 1.0 </col>
<high> 12 </high>
<wide> 30.0 </wide>
<title> Blood pH </title>
<showgraph>
<row> 1.4 </row><col> 1.0 </col><high> 10 </high><wide> 28 </wide>
<leftmargin> 5 </leftmargin>
<xaxis>
<name> System.X </name>
<label> Time </label>
<scale><min> 0 </min><max> 2 </max></scale>
</xaxis>
<yaxis>
<yvar>
<name> BloodPhValues.ArtysPh </name>
<label> A </label>
<linecolor> RED </linecolor>
</yvar>
<yvar>
<name> BloodPhValues.VeinsPh </name>
<label> V </label>
<linecolor> BLUE </linecolor>
</yvar>
<scale>
<min> 7.35 </min><max> 7.45 </max><inc> 0.05 </inc>
</scale>
</yaxis>
</showgraph>
</groupbox>
End
HumMod / VenousPh
Created : 15-May-05
Last Modified : 26-Jan-10
Author : Tom Coleman
Copyright : 2006-2010
By : University Of Mississippi Medical Center
Schema : DES V1.0
<groupbox>
<row> 2.0 </row>
<col> 32.0 </col>
<high> 6 </high>
<wide> 30.0 </wide>
<title> Venous pH </title>
<showvalue>
<row> 1.4 </row><col> 1.0 </col>
<name> BloodPhValues.VeinsPh </name>
<format><decimal> 2 </decimal></format>
<label> pH </label>
</showvalue>
<showvalue>
<row> 2.4 </row><col> 1.0 </col>
<name> BloodPhValues.Veins[H+] </name>
<format><decimal> 1 </decimal></format>
<label> [H+] </label>
</showvalue>
<showvalue>
<row> 3.4 </row><col> 1.0 </col>
<name> CO2Veins.Pressure </name>
<format><decimal> 1 </decimal></format>
<label> pCO2 </label>
</showvalue>
<showvalue>
<row> 4.4 </row><col> 1.0 </col>
<name> BloodIons.[SID(mEq/L)] </name>
<format><decimal> 1 </decimal></format>
<label> [SID] </label>
</showvalue>
<infobutton>
<row> 1.2 </row>
<col> 26.0 </col>
<line> NORMAL VALUES AND UNITS </line>
<line> </line>
<line> pH = 7.37 </line>
<line> [H+] = 42 </line>