WARNING : ran out of memory

[kyungtae79]

Hi All,

I am trying to create 4 elements of standard brick elements (stdBrick) with uniform size of 20 m.

However, I got the message of ...
WARNING - Node::createDisp() ran out of memory for array of size -6
FATAL Node::getTrialDisp() -- ran out of memory

Is there anyone who knows this problem??

My script is shown below.




--------------------------------------------------------------------------------
wipe

model BasicBuilder -ndm 3 -ndf -3

set origin {}; # coordinates of node 1 in the 1st element
lappend origin 0. 0. 0.

set meshGrid 1; # size of brick element
set nEleX 2; # no. of elements in X direction
set nEleY 2; # no. of elements in Y direction
set nEleZ 1; # no. of elements in Z direction

# Node
set nodeCount 0
for {set k 1} {$k <= [expr $nEleZ+1]} {incr k} {
for {set j 1} {$j <= [expr $nEleY+1]} {incr j} {
for {set i 1} {$i <= [expr $nEleX+1]} {incr i} {

incr nodeCount
set x [expr [lindex $origin 0] + $meshGrid*($i-1)]
set y [expr [lindex $origin 1] + $meshGrid*($j-1)]
set z [expr [lindex $origin 2] + $meshGrid*($k-1)]

node $nodeCount $x $y $z
puts "node $nodeCount $x $y $z"

}
}
}

# Element
set nEle [expr $nEleX * $nEleY * $nEleZ]
puts "Total number of elements = $nEle "

nDMaterial ElasticIsotropic 1 994202.574 0.425;# 1.5

set eleCount 0
for {set k 1} {$k <= $nEleZ} {incr k} {
for {set j 1} {$j <= $nEleY} {incr j} {
for {set i 1} {$i <= $nEleX} {incr i} {

set node1 [expr $i + ($j-1)*($nEleX+1) + ($k-1)*($nEleX+1)*($nEleY+1)]
set node2 [expr $node1+1]
set node3 [expr $node2 + ($nEleX+1)]
set node4 [expr $node3 - 1]

set node5 [expr $node1 + ($nEleX+1)*($nEleY+1)]
set node6 [expr $node2 + ($nEleX+1)*($nEleY+1)]
set node7 [expr $node3 + ($nEleX+1)*($nEleY+1)]
set node8 [expr $node4 + ($nEleX+1)*($nEleY+1)]

incr eleCount
puts "$eleCount"
element stdBrick $eleCount $node1 $node2 $node3 $node4 $node5 $node6 $node7 $node8 1
puts "$eleCount $node1 $node2 $node3 $node4 $node5 $node6 $node7 $node8 1"


}
}
}

[fmk]

ndf must be positive!