Example cellml/noble_1962: Noble 1962

This example solves the Noble 1962 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/n_model_1962;
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;n_model_1962 write variables yqs niqslist 1..9 binary;
$Tend = 5000;
$dt = 5.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;n_model_1962 history n_model_1962 from grid yqs iy 1..9 binary;
fem define export;r;$example/n_model_1962;
fem export signal;n_model_1962 electrodes signal n_model_1962 names cell;

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

Files used by this example are:

Name                 Modified     Size

noble_1962.com 13-Oct-2003 1.1k cellml.ipequa 13-Oct-2003 1.5k cellml.ippara 13-Oct-2003 5.9k lsoda.ipsolv 13-Oct-2003 1.2k n_model_1962.binsig 13-Oct-2003 69k n_model_1962.cml 13-Oct-2003 36k n_model_1962.ipcell 14-Oct-2003 3.7k n_model_1962.ipexpo 13-Oct-2003 657

Download the entire example:

Name                               Modified     Size

examples_cellml_noble_1962.tar.gz 19-Aug-2006 39k

Testing status by version:

StatusTestedReal time (s)
i686-linux
cmSuccessSun Mar 6 00:04:38 20165
cm-debugSuccessSat Mar 5 00:19:15 201610
mips-irix
cmSuccessSun Aug 19 02:54:44 200781
cm-debugSuccessWed Aug 15 02:49:59 2007206
cm-debug-clear-mallocSuccessSat Aug 18 03:09:01 2007216
cm-debug-clear-malloc7SuccessMon Aug 20 03:07:49 2007216
cm64SuccessSun Aug 19 02:56:06 200782
cm64-debugSuccessTue Aug 21 03:06:13 2007203
cm64-debug-clear-mallocSuccessThu Apr 1 11:49:41 200492
rs6000-aix
cmSuccessWed Mar 4 01:11:59 20096
cm-debugSuccessMon Mar 2 01:19:04 200937
cm64SuccessWed Mar 4 01:12:25 20096
cm64-debugSuccessTue Mar 3 01:21:35 200937
x86_64-linux
cmSuccessSun Mar 6 00:01:17 20163
cm-debugSuccessSat Mar 5 00:02:11 20166

Testing status by file:


Html last generated: Sun Mar 6 05:51:21 2016

Input last modified: Tue Oct 14 09:40:37 2003


CMISS Help / Examples / cellml / noble_1962