McAllister-Noble-Tsien 1975

Example cellml/MNT_1975: McAllister-Noble-Tsien 1975

This example solves the McAllister-Noble-Tsien 1975 (MNT) Purkinje fibre and pace-maker model, defined by a CellML version of the model.

NOTE: This example requires a CellML 1.0 enabled version of CMISS to run.

The comfile run by this example is as follows:

if (! defined $example) {
    $example = "./";
}
$chopped = chop $example;
if ($chopped ne "/") {
    $example .= $chopped;
}

fem define parameters;r;$example/cellml;
fem define node;d;
fem define bas;d;
fem define elem;d;
fem define grid;d;
fem update grid geometry;
fem update grid metric;
fem define equation;r;$example/cellml;
fem define cell;r;$example/mcallister_noble_tsien_model_1975;
fem define material;d cell;
fem define material;d;
fem update grid material;
fem define initial;d;
fem define solve;r;$example/lsoda;
fem solve to 0;
fem open history;mcallister_noble_tsien_model_1975 write variables yqs niqslist 1..22 binary;
$Tend = 5000;
$dt = 1.0;
for ($time=0;$time<$Tend;$time+=$dt) {
    fem solve restart to $time;
    fem write history time $time variables yqs binary;
}
fem close history binary;
fem evaluate electrode;mcallister_noble_tsien_model_1975 history mcallister_noble_tsien_model_1975 from grid yqs iy 1..22 binary;
fem define export;r;$example/mcallister_noble_tsien_model_1975;
fem export signal;mcallister_noble_tsien_model_1975 electrodes signal mcallister_noble_tsien_model_1975 names cell;

# For testing we compare the generated CMISS signal files
if ($TESTING) {
    fem compare signal;mcallister_noble_tsien_model_1975 basis both masterfile $example/mcallister_noble_tsien_model_1975 comparefile mcallister_noble_tsien_model_1975 binary;
}

Files used by this example are:

Name                                      Modified     Size

MNT_1975.com                              18-Oct-2003  1.3k
MNT.gnu                                   18-Oct-2003  1.9k
cellml.ipequa                             18-Oct-2003  1.5k
cellml.ippara                             18-Oct-2003  5.9k
lsoda.ipsolv                              18-Oct-2003  1.2k
mcallister_noble_tsien_model_1975.binsig  18-Oct-2003  601k
mcallister_noble_tsien_model_1975.cml     04-Nov-2003   98k
mcallister_noble_tsien_model_1975.ipcell  18-Oct-2003  6.7k
mcallister_noble_tsien_model_1975.ipexpo  18-Oct-2003  658

Download the entire example:

Name                             Modified     Size

examples_cellml_MNT_1975.tar.gz  19-Aug-2006  415k

Testing status by version:

	Status	Tested	Real time (s)
i686-linux
cm	Failure	Wed May 16 01:07:58 2012	71
	last break	Sun Apr 16 01:44:00 2006	60
cm-debug	Failure	Wed May 16 01:23:58 2012	95
	last break	Sat Aug 22 01:33:00 2009	45
	last success	Mon Mar 13 01:56:00 2006	77
mips-irix
cm	Failure	Tue Aug 21 05:34:53 2007	249
	last break	Tue Apr 17 01:58:00 2007	241
cm-debug	Failure	Tue Aug 21 04:30:14 2007	463
	last break	Tue Apr 17 02:07:00 2007	443
cm-debug-clear-malloc	Failure	Tue Aug 21 06:06:39 2007	460
	last break	Tue Apr 17 03:00:00 2007	448
cm-debug-clear-malloc7	Failure	Tue Aug 21 05:58:22 2007	462
	last break	Tue Apr 17 03:26:00 2007	447
cm64	Failure	Mon Aug 20 06:10:54 2007	252
	last break	Tue Apr 17 01:52:00 2007	248
cm64-debug	Failure	Tue Aug 21 06:00:05 2007	460
	last break	Tue Apr 17 02:47:00 2007	459
cm64-debug-clear-malloc	Failure	Tue Aug 21 06:11:25 2007	460
	last break	Tue Apr 17 02:27:00 2007	452
rs6000-aix
cm	Failure	Wed Mar 4 01:30:39 2009	29
	last break	Tue Apr 17 02:24:00 2007	27
cm-debug	Failure	Wed Mar 4 01:39:17 2009	84
	last break	Thu Sep 13 02:10:00 2007	85
cm64	Failure	Wed Mar 4 01:30:37 2009	30
	last break	Tue Apr 17 02:25:00 2007	27
cm64-debug	Failure	Wed Mar 4 01:38:21 2009	84
	last break	Thu Sep 13 02:10:00 2007	82
x86_64-linux
cm	Failure	Wed May 16 00:13:26 2012	12
	last break	Thu May 4 01:08:00 2006	16
cm-debug	Failure	Wed May 16 00:16:22 2012	15
	last break	Tue Apr 11 01:15:00 2006	23

Testing status by file:

cmiss_test.log

i686-linux
Success	cm:	cmiss_test.log.retain.
Success	cm-debug:	cmiss_test.log.retain.
mips-irix
Success	cm:	cmiss_test.log.retain.
Success	cm-debug:	cmiss_test.log.retain.
Success	cm-debug-clear-malloc:	cmiss_test.log.retain.
Success	cm-debug-clear-malloc7:	cmiss_test.log.retain.
Success	cm64:	cmiss_test.log.retain.
Success	cm64-debug:	cmiss_test.log.retain.
Success	cm64-debug-clear-malloc:	cmiss_test.log.retain.
rs6000-aix
Success	cm:	cmiss_test.log.retain.
Success	cm-debug:	cmiss_test.log.retain.
Success	cm64:	cmiss_test.log.retain.
Success	cm64-debug:	cmiss_test.log.retain.
x86_64-linux
Success	cm:	cmiss_test.log.retain.
Success	cm-debug:	cmiss_test.log.retain.

mcallister_noble_tsien_model_1975.opcomp

i686-linux
Failure	cm:	ndiff test: significant differences with generic answer.
Failure	cm-debug:	ndiff test: significant differences with generic answer.
mips-irix
Failure	cm:	ndiff test: significant differences with generic answer.
Failure	cm-debug:	ndiff test: significant differences with generic answer.
Failure	cm-debug-clear-malloc:	ndiff test: significant differences with generic answer.
Failure	cm-debug-clear-malloc7:	ndiff test: significant differences with generic answer.
Failure	cm64:	ndiff test: significant differences with generic answer.
Failure	cm64-debug:	ndiff test: significant differences with generic answer.
Failure	cm64-debug-clear-malloc:	ndiff test: significant differences with generic answer.
rs6000-aix
Failure	cm:	ndiff test: significant differences with generic answer.
Failure	cm-debug:	ndiff test: significant differences with generic answer.
Failure	cm64:	ndiff test: significant differences with generic answer.
Failure	cm64-debug:	ndiff test: significant differences with generic answer.
x86_64-linux
Failure	cm:	ndiff test: significant differences with generic answer.
Failure	cm-debug:	ndiff test: significant differences with generic answer.

Html last generated: Wed May 16 06:00:02 2012

Input last modified: Tue Nov 4 16:04:09 2003

CMISS Help / Examples / cellml / MNT_1975