Cladding elements and frame structure

[andrett7]

Hi all,

I want to model a precast building (in 2D) which includes beams, columns and cladding elements, for which i want to use quad elements and block2D command. However i have this error:

WARNING block2D numX? numY? startNode? startEle? eleType? eleArgs? : invalid number of node args: PlaneStress

while executing
"block2D 4 8 1 1 quad 0.16 PlaneStress 666 {
1 0.36 0. 0.
2 1.65 0. 0.
3 1.65 2.70 0.
4 0.36 2.70 0.

}"


The part of the code is this:

set PlateThick 0.16
set PlateMat 666
set fc 53; # Concrete nominal compressive strength (MPa)
set Ec [expr $MPa*22000*pow(($fc/10.),0.3)]; # Concrete Young's Modulus
set nu 0.2
set rho 0.
nDMaterial ElasticIsotropic $PlateMat $Ec $nu $rho

set Plate quad
set tipoA PlaneStress
set eleArgs "$PlateThick $tipoA $PlateMat"

set blockCmd "block2D $nx $ny 1 1 $Plate $eleArgs {
1 $Xinizio 0. 0.
2 [expr $Xinizio+$LengthPannelli] 0. 0.
3 [expr $Xinizio+$LengthPannelli] $Y2 0.
4 $Xinizio $Y2 0.

}"
eval $blockCmd



Could you please help me? Thanks a lot,
Andrea

[fmk]

because inside an eval command you want:

set eleArgs " \"$PlateThick $tipoA $PlateMat\""

then you might have problems with 3 coordinates at the nodes.

[andrett7]

Thanks Dr. McKenna.

Andrea

[andrett7]

Why if I use this sintax:

set nx 16
set ny 4

set start 0.

block2D $nx $ny 1 1 $Quad $eleArgs {
1 $start $start
2 40 0
3 40 10
4 0 10
}

There is the following error:

WARNING block2D numX? numY? startNode? startEle? eleType? eleArgs? : invalid node coordinate for node: 1
expected floating-point number but got "$start"
while executing
"block2D $nx $ny 1 1 $Quad $eleArgs {
1 $start $start
2 40 0
3 40 10
4 0 10
}"


Actually $start is a floating number. Otherwise, if I write directly 1 0. 0. no error occur.

Thanks for your reply.

Andrea

[andrett7]

Ok, I solved in this way:

set Quad quad
set thick 0.18
set mat 30

if {$Quad == "enhancedQuad" } {
set eleArgs "PlaneStress2D 1"
}
if {$Quad == "quad" } {
set eleArgs "$thick PlaneStress2D $mat"
}
if {$Quad == "bbarQuad" } {
set eleArgs "1"
}

set nx 16
set ny 4

set start 0.

set blockCmd "block2D $nx $ny 1 1 $Quad \"$eleArgs\" {
1 $start $start
2 40 0
3 40 10
4 0 10
}"
eval $blockCmd


Andrea