|
/PREP7 !* ! FRP 厚度, FRP thicknessthick=0.11 ! 混凝土弹模, Concrete Elastic ModulusEc=30e3! 混凝土泊松比, Concrete Poisson ratioEMUc=0.2! 混凝土抗压抗拉强度! Concrete Compressive and Tensile Strengthfc=30ft=3! FRP弹模和泊松比! Elastic Modulue and Poisson ratio for FRPEf=230e3EMUf=0.3! Height and Radius of Tube! 圆柱高度和半径H=450R=150! Maximal axial strain! 最大试验轴向应变EPSMax=0.006! 选择混凝土单元, Concrete elementET,1,SOLID65!* KEYOPT,1,1,0KEYOPT,1,5,0KEYOPT,1,6,0KEYOPT,1,7,1!* ! 选择FRP单元, FRP elementET,2,SHELL41!* KEYOPT,2,1,2KEYOPT,2,2,0KEYOPT,2,4,0KEYOPT,2,5,0KEYOPT,2,6,0!* ! 设定混凝土单单元实参数! Concrete element real constantsR,1,2, , , ,2, ,RMORE, , ,2, , , , ! 设定FRP单元实参数 ! FRP element real constantsR,2,thick,thick,thick,thick, , ,RMORE, ,!* ! 输入混凝土材料, Concrete material parametersMPTEMP,,,,,,,, MPTEMP,1,0 MPDATA,EX,1,,Ec MPDATA,PRXY,1,,EMUc! ! 输入应力应变曲线, Concrete stress-stain curveTB,MISO,1,1,5, TBTEMP,0TBPT,,0.0005,fc*0.5 TBPT,,0.001,fc*0.7TBPT,,0.0015,fc*0.85 TBPT,,0.002,fcTBPT,,0.003,fc*0.8! ! 输入破坏曲面, Failure envelop surfaceTB,CONC,1,1,9, TBTEMP,0TBDATA,,.5,.9,ft,-1,,TBDATA,,,,1,,, MPTEMP,,,,,,,, MPTEMP,1,0 !! 输入FRP材料参数, FRP material parametersMPDATA,EX,2,,EfMPDATA,PRXY,2,,EMUf ! 建立圆柱模型, Tube modelCYL4,0,0,R, , , ,H ! 取1/4截面, a quarter of sectionwpro,,-90.000000, VSBW, 1 WPCSYS,-1 wpro,, ,-90.000000,VSBW,ALLWPCSYS,-1 VSEL,S, , , 4,6,1,VDELE,ALL, , ,1ALLSEL,ALL NUMCMP,AREA ! 赋予材性, assign material propertyVATT, 1, 1, 1, 0ASEL,S , , ,3,AATT, 2, 2, 2, 0, ! 划分单元网格,meshESIZE,R/3,0, VSEL, , , , 1 VMESH,1MSHAPE,0,2D MSHKEY,0ASEL,S , , ,3,AMESH,ALL!* ALLSEL,ALL FINISH /SOLU !* ANTYPE,0!* CNVTOL,U, ,0.02,0, ,!* NSUBST,30,0,10 CUTCONTROL,NOITERPRED,1 DA,2,UZ, ! 最大压缩量, maximal axial displacementDA,1,UZ,H*EPSMaxDA,4,UY,DA,5,UX,DK,9, , , ,0,ALL, , , , , , DK,1, , , ,0,UX, , , , , , OUTRES,ALL,1SAVESOLVE FINISH |
