apdl-正方四角锥网架（Apdl- square four pyramid network）.docVIP

apdl-正方四角锥网架（Apdl- square four pyramid network） 完成 /清晰！清除当前数据库文件，并开始一个新的启动 / prep7！进入前处理 ！（1）用户界面设计，输入基本几何参数 当然，开始的，5！生成多行参数输入对话框 * CSET，1,3，LX，grid侧LX =（M），1！输入网络长边方向上弦杆长 * CSET，4,6，LY，grid侧LY =（M），1.2！输入网络短边方向上弦杆长 * CSET，7,9，N，N =“顶面长边grid号，6 ！输入上弦平面网络长边方向节点数 * CSET，10,12，M，N的顶面=“短边grid号，7 ！输入上弦平面网络短边方向节点数 * CSET，15，Z，Z之间的顶部和底部表面distance =（M），1 ！输入上，，下弦平面网络之间的垂直距离 * CSET，61、62、M、网格的“请输入几何参数。” ！在对话框顶部显示提示“请输入几何参数的电网” 当然，最终的 （2）计算节点坐标位置，并定义节点！ ！计算上弦平面节点坐标位置并定义节点 *做，我，1，m， *做，J，N *（i-1）+ 1，N *我 N，J，（j-1-n *（i-1））×1，1y *（i-1），0 * enddo * enddo ！计算下弦平面节点坐标位置并定义节点 *做的事，我，1，M-1， *做，J，N×M + 1 +（i-1）*（N-1），（N-1）*我+ N×M N，J，（2×（N×M（i-1）*（N-1））- 1）/ 2×1，（2×I-1）/ 2×1Y，Z * enddo * enddo （3）定义单元类型及实常数！ rtnum = 1！可输入的实常数类型数最大数 *暗区，阵列，rtnum！定义杆件截面面积数组 *暗，izzin，阵列，rtnum！定义面积惯性矩数组 *暗，iyyin，阵列，rtnum！定义面积惯性矩数组 *暗，tkzin，阵列，rtnum！定义截面沿Z轴高度数组 *暗，tkyin，阵列，rtnum！定义截面沿Y轴高度数组 *暗，thetain，阵列，rtnum！定义杆件轴线与X轴夹角数组 *暗，istrnin，阵列，rtnum！定义杆件初始应变数组 *暗，ixxin，阵列，rtnum！定义杆件扭矩数组 *暗，shearzin，阵列，rtnum！定义剪切变形常量数组 *暗，shearyin，阵列，rtnum！定义剪切变形常量数组 当然，开始的，1！生成单元类型选择对话框 * CSET，1,3，eltype，link8输入0，输入1单元，0！单元类型选择0为link8,1为BEAM4 * CSET，61、62、eltype，element 1型的选择：” 当然，最终的 *如果eltype，情商，0，然后！若输入0，即eltype = 0 1、单元等！定义第一类杆件为LINK8 *使用 *如果eltype，情商，1，然后！若输入1，eltype = 1 1、梁等！定义第一类杆件为BEAM4 *使用 当然，开始的，10！生成第一类实常数R1输入对话框 * CSET，1,3，地区（1），section面积（mm ^ 2），地区（1）=“，！面积 * CSET，4,6，izzin区域（1），转动惯量，伊茨（1）=“，！惯性矩Z * CSET，9，iyyin区域（1），转动惯量，IYY变化而变化（1）=“，！惯性矩Y * CSET，10,12， tkzin（1），沿Z轴thickness，tkz（1）=“，！截面沿Z轴高度 * CSET，15，tkyin（1），沿Y轴thickness，东京（1）=“，！截面沿Y轴高度 * CSET，16,18，thetain（1），X轴的入门，对（1）=“，！杆件轴线与X轴夹角 * CSET，19、21、istrnin（1），initial应变，istrn（1）=“，！杆件初始应变 * CSET，22、24、ixxin（1），惯性torsional时刻，i（1）=“，！杆件扭矩 * CSET，25,27，shearzin（1），shear测定常量Z SHEARZ（1）=“，！剪切变形常量Z * CSET，朝，shearyin（1），shear测定常量Y，SHEARY（1）=“，！剪切变形常量Y * CSET，61、62、输入实常数1：！定义单元实常数 *有63、64，只要输入区域，如果使用的单元！若为LINK8只输入截面面积 当然，最终的 *做的事，我，1，利用数字定义单元常数rtnum！ *如果eltype，情商，0，然后！若选择的是杆单元，eltype = 0 R，我区（I）！定义杆单元截面积 *使用 *如果eltype，情商，1，然后！若选择的是梁单元，即eltype = 1 R，我区（我），（我），izzin iyyin