碳纤维梯形波纹腹板工字梁-ANSYS壳单元命令流.pdfVIP

!*文件名：梯形波纹腹板工字梁命令流

!*材料：碳纤维单向预寝料

!*作者：官成宇

!*单位：哈尔滨工程大学

!*时间：2015-3-25

L0=0.600!*跨度

a=0.020!*支座外伸长度

L1=0.031!*梯形下底长

L2=0.010!*梯形上底长

d=0.010!*梯形高

h=0.060!*腹部高

wt=0.040!*上翼缘宽

wd=0.050!*下翼缘宽

t=0.001!*纤维厚度

tw_45=1!*腹板纤维

tw_045=tw_45

tt_90=0.1!*上翼缘纤维

tt_0=2

tt_45=tw_45/2

tt_045=tt_45/2

td_90=0.1!*下翼缘纤维

td_0=3

td_45=tw_45/2

td_045=tt_45/2

F=5000!*载荷大小

zz=0.0035!*全局网格大小

n=nint(L0/2/L1)!*波纹数（n必须小于99）

*if,n,GT,L0/2/L1,THEN!*向下取整

n=n-1

*endif

*if,n,EQ,L0/2/L1,THEN!加载点重合判断与分离

L0=L0+0.0005

*endif

/PREP7

ET,1,SHELL99

KEYOPT,1,2,0!*输入形式0-等厚度层输，最多2501-变厚度层输入

KEYOPT,1,3,0!*额外元素输出0-基本单元输出

KEYOPT,1,4,0!*元素坐标系定义0-无用户子程序定义元素坐标系

KEYOPT,1,5,0!*应变或应力输出0-应变结果被使用

KEYOPT,1,6,0!*额外元素输出(只对层输入)0-基础单元输出，也用于失效准则输出

KEYOPT,1,8,1!*层数据的存储1-存储所有层的数据

KEYOPT,1,9,0!*定义在层的那个位置评价应变、应力和失效准则。

!*0-每层的顶部和底部对应力和应变评价

KEYOPT,1,10,0!*材料特性矩阵输出0-无

KEYOPT,1,11,0!*节点偏移选项

!*0-节点在中间面1-节点在底面2-节点在顶面

ET,2,SHELL99

KEYOPT,2,2,0!*输入形式0-等厚度层输，最多2501-变厚度层输入

KEYOPT,2,3,0!*额外元素输出0-基本单元输出

KEYOPT,2,4,0!*元素坐标系定义0-无用户子程序定义元素坐标系

KEYOPT,2,5,0!*应变或应力输出0-应变结果被使用

KEYOPT,2,6,0!*额外元素输出(只对层输入)0-基础单元输出，也用于失效准则输出

KEYOPT,2,8,1!*层数据的存储1-存储所有层的数据

KEYO