Commit 4e39a62c authored by Chris Dancy's avatar Chris Dancy

Updated master branch to last known stable ACT-R6 version of ACT-R/Phi

parent c8b7c3d2
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>