Example b21525: Activation on 6 vertex collapsed wedge

This example solves an activation problem on a collapsed wedge element, with 6 vertices.


The comfile run by this example is as follows:

# This example solves the bidomain, Beeler-Reuter equation on
# a 6 vertex wedge type element. The equations are discretised
# using the lattice grid method.

# The solution is exported at each time-step to exelem files
# and can be visualised using cmgui


# Set up for bidomain.
$VM=1
$PHI_E=2


fem define parameters;r;6vertwedge
fem define coordinates;r;6vertwedge

fem define node;r;6vertwedge

fem define base;r;6vertwedge

fem define elem;r;6vertwedge

fem define grid;r;6vertwedge
fem update grid geometry
fem update grid metric

# Export the surface normals the the file normals.exdata
fem ex data;normals normals as normals

# Group grid points
fem group grid external as boundary
fem group grid xi2 high as stim_point oneoff element 1

fem def equa;r;6vertwedge class $VM,$PHI_E
fem def mate;r;6vertwedge class $VM,$PHI_E
fem def cell;r;6vertwedge class $VM,$PHI_E

fem update grid material class $VM,$PHI_E

fem def init;r;6vertwedge class $VM,$PHI_E

fem def solve;r;6vertwedge class $VM
fem def solve;r;6vertwedge class $PHI_E
 
fem solve to 0 class $VM,$PHI_E

# Export the grid elements and nodes
fem export node;Domain as Domain reg 1
fem export elem;Domain grid_numbers as Domain reg 1
fem export elem;"MemPot_000" field as Solution class $VM

for $M ( 0..10 )
 {
 for $L ( 0..9 )
  {  
  #Solve for new time
  print "Time step: $M.$L\n"; 
  fem solve restart to "${M}.$L" class $VM,$PHI_E

  # Export solution
  fem export elem;"MemPot_${M}.$L" field as Solution class $VM
 }
}


Files used by this example are:

Name                Modified     Size

example_b21525.com 29-Apr-2003 1.5k 6vertwedge.ipbase 29-Apr-2003 2.4k 6vertwedge.ipcell 29-Apr-2003 2.0k 6vertwedge.ipcoor 29-Apr-2003 570 6vertwedge.ipelem 29-Apr-2003 404 6vertwedge.ipequa 26-May-2003 1.6k 6vertwedge.ipgrid 29-Apr-2003 603 6vertwedge.ipinit 29-Apr-2003 903 6vertwedge.ipmate 29-Apr-2003 1.8k 6vertwedge.ipnode 29-Apr-2003 1.8k 6vertwedge.ippara 29-Apr-2003 5.9k 6vertwedge.ipsolv 13-Apr-2007 1.8k Domain.exelem 29-Apr-2003 36k Domain.exnode 29-Apr-2003 1.0k MemPot_0.0.exelem 29-Apr-2003 47k MemPot_0.1.exelem 29-Apr-2003 47k MemPot_0.2.exelem 29-Apr-2003 47k MemPot_0.3.exelem 29-Apr-2003 47k MemPot_0.4.exelem 29-Apr-2003 47k MemPot_0.5.exelem 29-Apr-2003 47k MemPot_0.6.exelem 29-Apr-2003 47k MemPot_0.7.exelem 29-Apr-2003 47k MemPot_0.8.exelem 29-Apr-2003 47k MemPot_0.9.exelem 29-Apr-2003 47k MemPot_000.exelem 29-Apr-2003 47k MemPot_1.0.exelem 29-Apr-2003 47k MemPot_1.1.exelem 29-Apr-2003 47k MemPot_1.2.exelem 29-Apr-2003 47k MemPot_1.3.exelem 29-Apr-2003 47k MemPot_1.4.exelem 29-Apr-2003 47k MemPot_1.5.exelem 29-Apr-2003 47k MemPot_1.6.exelem 29-Apr-2003 47k MemPot_1.7.exelem 29-Apr-2003 47k MemPot_1.8.exelem 29-Apr-2003 47k MemPot_1.9.exelem 29-Apr-2003 47k MemPot_10.0.exelem 29-Apr-2003 47k MemPot_10.1.exelem 29-Apr-2003 47k MemPot_10.2.exelem 29-Apr-2003 47k MemPot_10.3.exelem 29-Apr-2003 47k MemPot_10.4.exelem 29-Apr-2003 47k MemPot_10.5.exelem 29-Apr-2003 47k MemPot_10.6.exelem 29-Apr-2003 47k MemPot_10.7.exelem 29-Apr-2003 47k MemPot_10.8.exelem 29-Apr-2003 47k MemPot_10.9.exelem 29-Apr-2003 47k MemPot_2.0.exelem 29-Apr-2003 47k MemPot_2.1.exelem 29-Apr-2003 47k MemPot_2.2.exelem 29-Apr-2003 47k MemPot_2.3.exelem 29-Apr-2003 47k MemPot_2.4.exelem 29-Apr-2003 47k MemPot_2.5.exelem 29-Apr-2003 47k MemPot_2.6.exelem 29-Apr-2003 47k MemPot_2.7.exelem 29-Apr-2003 47k MemPot_2.8.exelem 29-Apr-2003 47k MemPot_2.9.exelem 29-Apr-2003 47k MemPot_3.0.exelem 29-Apr-2003 47k MemPot_3.1.exelem 29-Apr-2003 47k MemPot_3.2.exelem 29-Apr-2003 47k MemPot_3.3.exelem 29-Apr-2003 47k MemPot_3.4.exelem 29-Apr-2003 47k MemPot_3.5.exelem 29-Apr-2003 47k MemPot_3.6.exelem 29-Apr-2003 47k MemPot_3.7.exelem 29-Apr-2003 47k MemPot_3.8.exelem 29-Apr-2003 47k MemPot_3.9.exelem 29-Apr-2003 47k MemPot_4.0.exelem 29-Apr-2003 47k MemPot_4.1.exelem 29-Apr-2003 47k MemPot_4.2.exelem 29-Apr-2003 47k MemPot_4.3.exelem 29-Apr-2003 47k MemPot_4.4.exelem 29-Apr-2003 47k MemPot_4.5.exelem 29-Apr-2003 47k MemPot_4.6.exelem 29-Apr-2003 47k MemPot_4.7.exelem 29-Apr-2003 47k MemPot_4.8.exelem 29-Apr-2003 47k MemPot_4.9.exelem 29-Apr-2003 47k MemPot_5.0.exelem 29-Apr-2003 47k MemPot_5.1.exelem 29-Apr-2003 47k MemPot_5.2.exelem 29-Apr-2003 47k MemPot_5.3.exelem 29-Apr-2003 47k MemPot_5.4.exelem 29-Apr-2003 47k MemPot_5.5.exelem 29-Apr-2003 47k MemPot_5.6.exelem 29-Apr-2003 47k MemPot_5.7.exelem 29-Apr-2003 47k MemPot_5.8.exelem 29-Apr-2003 47k MemPot_5.9.exelem 29-Apr-2003 47k MemPot_6.0.exelem 29-Apr-2003 47k MemPot_6.1.exelem 29-Apr-2003 47k MemPot_6.2.exelem 29-Apr-2003 47k MemPot_6.3.exelem 29-Apr-2003 47k MemPot_6.4.exelem 29-Apr-2003 47k MemPot_6.5.exelem 29-Apr-2003 47k MemPot_6.6.exelem 29-Apr-2003 47k MemPot_6.7.exelem 29-Apr-2003 47k MemPot_6.8.exelem 29-Apr-2003 47k MemPot_6.9.exelem 29-Apr-2003 47k MemPot_7.0.exelem 29-Apr-2003 47k MemPot_7.1.exelem 29-Apr-2003 47k MemPot_7.2.exelem 29-Apr-2003 47k MemPot_7.3.exelem 29-Apr-2003 47k MemPot_7.4.exelem 29-Apr-2003 47k MemPot_7.5.exelem 29-Apr-2003 47k MemPot_7.6.exelem 29-Apr-2003 47k MemPot_7.7.exelem 29-Apr-2003 47k MemPot_7.8.exelem 29-Apr-2003 47k MemPot_7.9.exelem 29-Apr-2003 47k MemPot_8.0.exelem 29-Apr-2003 47k MemPot_8.1.exelem 29-Apr-2003 47k MemPot_8.2.exelem 29-Apr-2003 47k MemPot_8.3.exelem 29-Apr-2003 47k MemPot_8.4.exelem 29-Apr-2003 47k MemPot_8.5.exelem 29-Apr-2003 47k MemPot_8.6.exelem 29-Apr-2003 47k MemPot_8.7.exelem 29-Apr-2003 47k MemPot_8.8.exelem 29-Apr-2003 47k MemPot_8.9.exelem 29-Apr-2003 47k MemPot_9.0.exelem 29-Apr-2003 47k MemPot_9.1.exelem 29-Apr-2003 47k MemPot_9.2.exelem 29-Apr-2003 47k MemPot_9.3.exelem 29-Apr-2003 47k MemPot_9.4.exelem 29-Apr-2003 47k MemPot_9.5.exelem 29-Apr-2003 47k MemPot_9.6.exelem 29-Apr-2003 47k MemPot_9.7.exelem 29-Apr-2003 47k MemPot_9.8.exelem 29-Apr-2003 47k MemPot_9.9.exelem 29-Apr-2003 47k normals.exdata 29-Apr-2003 96k

Download the entire example:

Name                                        Modified     Size

examples_b_b2_b21_b215_b2152_b21525.tar.gz 14-Apr-2007 578k

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

Input last modified: Fri Apr 13 10:39:49 2007


CMISS Help / Examples / b / b2 / b21 / b215 / b2152 / b21525