Example 215: Fit a cylindrical polar mesh to 2D geometric data


The comfile run by this example is as follows:

#Example_215 Fitting a cylindrical polar mesh to 2D geometric data
 
fem
fem define coor;r;example_215;example #Define cylindrical polar coords
fem define node;r;;example            #Define the nodes
fem define base;r;;example            #Define a linear basis function
fem define element;r;;example         #Define the elements
fem define data;r;;example            #Define the data poins
fem define window;c               #Calculate the window size
fem draw line                     #Draw the mesh
fem draw node                     #Draw the nodes
fem draw data                     #Draw the data
fem define xi;c linear            #Calculate Xi positions
fem draw data trace               #Current material positions
fem draw data projection          #Shows discrepancy
fem list data error               #List the data error
fem define field;r;;example           #Define field for fitting nodal
#                                 !  variables
fem define element;r;;example field #Define field elements
fem define fit;r;;example geometry    #Define fit parameters
fem list node                     #List the nodal parameters
fem fit                           #Fit nodal coordinates
fem list node                     #List the fitted nodes
fem list data error               #List the data error
fem update node fit               #Update the nodal parameters from
#                                 !  the fitted parameters
fem draw line                     #Draw new mesh
fem draw node                     #Draw the new nodes

Additional testing commands:

fem list node
fem list data error

Files used by this example are:

Name                Modified     Size

example_215.com 10-Apr-2000 1.5k example_215.ipbase 10-Apr-2000 893 example_215.ipcoor 10-Apr-2000 935 example_215.ipdata 10-Apr-2000 4.4k example_215.ipelem 10-Apr-2000 2.0k example_215.ipelfd 10-Apr-2000 1.6k example_215.ipfiel 10-Apr-2000 1.5k example_215.ipfit 13-Apr-2007 1.6k example_215.ipnode 10-Apr-2000 1.3k new.ipdata 10-Apr-2000 1.2k new.ipfiel 10-Apr-2000 988 test_output.com 10-Apr-2000 34

Download the entire example:

Name                      Modified     Size

examples_2_21_215.tar.gz 27-Aug-2010 5.3k

Testing status by version:

StatusTestedReal time (s)
i686-linux
cmSuccessSun Mar 6 00:01:37 20160
cm-debugSuccessSat Mar 5 00:01:55 20161
mips-irix
cmSuccessSun Aug 19 01:25:17 20072
cm-debugSuccessWed Aug 15 01:21:19 20075
cm-debug-clear-mallocSuccessSat Aug 18 01:24:17 20079
cm-debug-clear-malloc7SuccessMon Aug 20 01:21:29 20078
cm64SuccessSun Aug 19 01:22:43 20073
cm64-debugSuccessTue Aug 21 01:19:24 20076
cm64-debug-clear-mallocSuccessThu Apr 1 10:10:57 20042
rs6000-aix
cmSuccessWed Mar 4 01:06:51 20090
cm-debugSuccessMon Mar 2 01:06:05 20090
cm64SuccessWed Mar 4 01:06:51 20090
cm64-debugSuccessTue Mar 3 01:11:35 20091
x86_64-linux
cmSuccessSun Mar 6 00:01:00 20160
cm-debugSuccessSat Mar 5 00:01:11 20160

Testing status by file:


Html last generated: Sun Mar 6 05:50:08 2016

Input last modified: Thu Aug 26 13:03:24 2010


CMISS Help / Examples / 2 / 21 / 215