2022年2022年拱坝ansys命令流 .pdf
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_05.gif)
《2022年2022年拱坝ansys命令流 .pdf》由会员分享,可在线阅读,更多相关《2022年2022年拱坝ansys命令流 .pdf(11页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、某砌石拱坝位于U 型河谷中,坝高55.5m,为单曲等厚拱坝,顶宽5m,底宽 16m,坝顶弧长 115.65m,弧高比 2.1。首先输入基本参数,自底向上生成坝体。!坐标系原点位于拱坝轴线与拱坝参考面的交点在坝基的投影, X轴指向右岸,Y轴指向下游,Z轴铅直向上 ! 单位 :长度 -M,力-KN,加速度 -M/S, 密度 -KN/M3 ! ! FINI!退出当前处理器/CLEAR,START /FILNAME,ARCHDAM,1!指定新的工作文件名/PLOPTS,DATE,0 /TRIAD,LBOT /VIEW,1,1,1,1 /VUP,1,Z *AFUN,DEG Z_UP=53 !上游水位Z_
2、DOWN=0 !下游水位Z_SAND=38 ! 泥沙淤积水位DENS_SAND=0.6 ! 淤积泥沙浮容重ANG_FRI=16 !淤积泥沙内摩擦角LAYER_NUM=8 ! 定义拱层数*DIM,ELEVATION,ARRAY,LAYER_NUM ! 定义拱圈高程*DIM,T_ARCH,ARRAY ,LAYER_NUM ! 定义拱厚*DIM,ARCH_RAD,ARRAY ,LAYER_NUM,2 ! 定义圆弧半径,上下游*DIM,RAD_CEN,ARRAY ,LAYER_NUM ! 定义圆弧中心Y值*DIM,ARCH_ANGLE,ARRAY,LAYER_NUM,2 ! 定义圆弧左右中心角ELEV
3、ATION(1)=55.5,47,39,29,24,19,9,0 ! 拱圈高程H_DAM=ELEVATION(1)-ELEVATION(LAYER_NUM) !坝高T_ARCH(1)=5.00,6.68,8.27,10.25,11.24,12.23,14.22,16.00 ! 拱厚ARCH_RAD(1,1)=68.00,68.00,68.00,68.00,68.00,68.00,68.00,68.00 ! 外半径*VOPER,ARCH_RAD(1,2),ARCH_RAD(1,1),SUB,T_ARCH(1) !计算内半径RAD_CEN(1)=68.00,68.00,68.00,68.00,68
4、.00,68.00,68.00,68.00 ! 圆心位置 ,Y坐标ARCH_ANGLE(1,1)=-47.72,-46.36,-45.06,-43.36,-41.88,-40.38,-37.32,-34.48 !左中心角ARCH_ANGLE(1,2)=49.73,47.13,44.68,41.57,40.44,39.29,36.92,35.72 !右中心角W_DAM1=-ARCH_RAD(1,1)*SIN(ARCH_ANGLE(1,1) ! 坝顶左弦长W_DAM2=ARCH_RAD(1,1)*SIN(ARCH_ANGLE(1,2) ! 坝顶右弦长LOCAL,11,1,0,RAD_CEN(1),
5、ELEVATION(1),-90 !局部柱面坐标,原点位于顶拱圆心,X 轴为拱坝中心线 ,指向上游 ,Y轴为中心角!为查值计算坝体温度,重新定义一套数组*DIM,TEMPUP,TABLE,LAYER_NUM ! 上游面温度*DIM,TEMPDOWN,TABLE,LAYER_NUM ! 下游面温度*DIM,T2_ARCH,TABLE,LAYER_NUM !拱厚*DIM,Y_RAD,TABLE,LAYER_NUM !圆心到坝轴线距离*DIM,RADUP,TABLE,LAYER_NUM ! 外半径名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - -
6、 - - 名师精心整理 - - - - - - - 第 1 页,共 11 页 - - - - - - - - - TEMPUP(1)=-8.84,-7.30,-5.66,-4.94,-4.99,-5.17,-5.73,-6.25 TEMPUP(1,0)=0,6,14,24,29,34,44,53 TEMPDOWN(1)=-8.84,-8.21,-7.36,-6.32,-5.86,-5.45,-4.72,-6.71 TEMPDOWN(1,0)=0,6,14,24,29,34,44,53 T2_ARCH(1)=5.00,6.68,8.27,10.25,11.24,12.23,14.22,16.00
7、 T2_ARCH(1,0)=0,6,14,24,29,34,44,53 Y_RAD(1)=68.00,68.00,68.00,68.00,68.00,68.00,68.00,68.00 Y_RAD(1,0)=0,6,14,24,29,34,44,53 RADUP(1)=68.00,68.00,68.00,68.00,68.00,68.00,68.00,68.00 RADUP(1,0)=0,6,14,24,29,34,44,53 CSYS,0 !/PNUM,KP,1 !/PNUM,LINE,1 /PREP7 KNN=0 *DO,II,1,LAYER_NUM !生成拱坝控制关键点,每层 6 个点
8、,上下游个三个点PX1=ARCH_RAD(II,1)*SIN(ARCH_ANGLE(II,1) PY1=RAD_CEN(II)-ARCH_RAD(II,1)*COS(ARCH_ANGLE(II,1) PX2=ARCH_RAD(II,1)*SIN(ARCH_ANGLE(II,2) PY2=RAD_CEN(II)-ARCH_RAD(II,1)*COS(ARCH_ANGLE(II,2) K,KNN+1,PX1, PY1,ELEVATION(II) K,KNN+2,0,RAD_CEN(II)-ARCH_RAD(II,1),ELEVATION(II) K,KNN+3,PX2, PY2,ELEVATION
9、(II) PX3=ARCH_RAD(II,2)*SIN(ARCH_ANGLE(II,1) PY3=RAD_CEN(II)-ARCH_RAD(II,2)*COS(ARCH_ANGLE(II,1) PX4=ARCH_RAD(II,2)*SIN(ARCH_ANGLE(II,2) PY4=RAD_CEN(II)-ARCH_RAD(II,2)*COS(ARCH_ANGLE(II,2) K,KNN+4,PX3, PY3,ELEVATION(II) K,KNN+5,0,RAD_CEN(II)-ARCH_RAD(II,2),ELEVATION(II) K,KNN+6,PX4, PY4,ELEVATION(II
10、) KNN=6*II *ENDDO LARC,1,3,2 !生成拱圈线*REPEAT,LAYER_NUM*2,3,3,3 L,1,4 *REPEAT,LAYER_NUM,6,6 L,3,6 *REPEAT,LAYER_NUM,6,6 ASKIN,1,3,5,7,9,11,13,15 !生成上游面ASKIN,2,4,6,8,10,12,14,16 !生成下游面ASKIN,17,18,19,20,21,22,23,24 !生成侧面ASKIN,25,26,27,28,29,30,31,32 AL,1,17,2,25 AL,15,24,16,32 名师资料总结 - - -精品资料欢迎下载 - - -
11、- - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页,共 11 页 - - - - - - - - - VA,6,1,3,2,4,5 = 拉伸坝体侧面、底面,并进行切割,生成坝基!拉伸生成坝基ASEL,S,AREA,4 ! 选择右侧面VEXT,ALL,4*H_DAM ! 拉伸成基岩ASEL,S,AREA,3 ! 选择左侧面VEXT,ALL,-4*H_DAM ! 拉伸成基岩ALLSEL ASEL,S,LOC,Z,ELEVATION(LAYER_NUM)-1,ELEVATION(LAYER_NUM)+1 !选择底面VEXT,ALL,-NI
12、NT(H_DAM /10)*10 ASEL,S,AREA,10,20,5 ASEL,A,AREA,23,27,4 VEXT,ALL,4*H_DAM ASEL,S,AREA,8,18,5 ASEL,A,AREA,25,29,4 VEXT,ALL,-4*H_DAM ALLSEL,ALL SAVE WPROTA,90 WPOFFS,NINT(H_DAM*1.5/10)*10 VSBW,ALL,DELETE VSEL,S,LOC,Y,-200,-H_DAM*1.4 VDEL,ALL,1 VSEL,ALL WPOFFS,-NINT(H_DAM*3.5/10)*10 VSBW,ALL,DELETE VSE
13、L,S,LOC,Y,NINT(H_DAM*2/10)*10,NINT(H_DAM*2/10)*100 VDEL,ALL,1 VSEL,ALL WPCSYS,0 WPROTA,90 WPOFFS,NINT(W_DAM2+H_DAM)/10)*10 VSBW,ALL,DELETE VSEL,S,LOC,X,NINT(W_DAM2+H_DAM)/10)*10,NINT(W_DAM2+H_DAM)/10)*50 VDEL,ALL,1 VSEL,ALL WPOFFS,-NINT(W_DAM2+W_DAM1+2*H_DAM)/10)*10 VSBW,ALL,DELETE VSEL,S,LOC,X,-NIN
14、T(W_DAM1+H_DAM)/10)*50,-NINT(W_DAM1+H_DAM)/10)*10 VDEL,ALL,1 WPCSYS,0 VSEL,ALL SAVE 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页,共 11 页 - - - - - - - - - = 用各控制高程切割整个模型,便于划分单元及计算成果和拱梁法比较*DO,II,LAYER_NUM,3,-1 WPOFFS,ELEVATION(II-1)-ELEVATION(II) VSBW,ALL,DELETE
15、*ENDDO WPCSYS,0 ALLSEL WPROTA,90 VSBW,ALL,DELETE WPCSYS,0 NUMMRG,ALL NUMCMP,ALL PX1=ARCH_RAD(1,1)*SIN(ARCH_ANGLE(1,1) PX2=ARCH_RAD(1,1)*SIN(ARCH_ANGLE(1,2) VSEL,S,LOC,X,PX1,PX2 VSEL,R,LOC,Z,ELEVATION(LAYER_NUM),ELEVATION(1) CM,DAM,VOLU VSEL,INVE CM,BEDROCK,VOLU ALLSEL = 生成溢流堰CMSEL,S,DAM VSEL,R,LOC,Z
16、,ELEVATION(1)-0.1,ELEVATION(2)+0.1 /VIEW,1,1,1,1 VPLOT !生成溢流堰 ,为便于建模和施加荷载,与实际不太相符,根据圣维南原理,对大坝的总体应力不会有太大影响W_WEIR=8 !溢流堰单孔宽(坝轴线处 ) NUM_WEIR=5 !溢流堰孔数W_WALL=2.5 !溢流堰闸墩宽 (坝轴线处 ) WPOFFS,ELEVATION(1)-ELEVATION(LAYER_NUM) WPOFFS,RAD_CEN(1) WPROTA,90 *AFUN,RAD PI=2*ACOS(0) SITTA1=(W_WEIR*NUM_WEIR+W_WALL*(NUM
17、_WEIR+1)/68*180/PI ! 溢流堰总中心角SITTA2=W_WEIR/ARCH_RAD(1,1)*180/PI ! 溢流堰单孔中心角SITTA3=W_WALL/ARCH_RAD(1,1)*180/PI ! 溢流堰单个闸墩中心角WPROTA,-SITTA1/2 VSBW,ALL,DELETE *DO,II,1,NUM_WEIR WPROTA,SITTA3 VSBW,ALL,DELETE 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页,共 11 页 - - - -
18、- - - - - WPROTA,SITTA2 VSBW,ALL,DELETE *ENDDO WPROTA,SITTA3 VSBW,ALL,DELETE SAVE CMSEL,S,BEDROCK VSEL,INVE VSEL,R,LOC,Z,ELEVATION(1),ELEVATION(2) CSYS,11 VSEL,R,LOC,Y,-SITTA1/2,SITTA1/2 CM,YLYY ,VOLU *DO,II,1,NUM_WEIR CMSEL,S,YLYY VSEL,R,LOC,Y,-SITTA1/2+II*SITTA3+(II-1)*SITTA2,-SITTA1/2+II*SITTA3+I
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 2022年2022年拱坝ansys命令流 2022 拱坝 ansys 命令
![提示](https://www.taowenge.com/images/bang_tan.gif)
限制150内