ÎÒµÄÃüÁîÁ÷ÈçÏ£º
FINISH
/CLEAR
/filname,nayu
/title,DSTC-C40-3
/PREP7
! FRP ºñ¶È, FRP thickness
Fthick=4
! steel ºñ¶È, FRP thickness
Sthick=5
! »ìÄýÍÁµ¯Ä£, Concrete Elastic Modulus
Ec=3.0e4
! »ìÄýÍÁ²´ËɱÈ, Concrete Poisson ratio
EMUc=0.2
! »ìÄýÍÁ¿¹Ñ¹¿¹ÀÇ¿¶È
! Concrete Compressive and Tensile Strength
fc=14.3
ft=1.43
! FRPµ¯Ä£ºÍ²´ËɱÈ
! Elastic Modulue and Poisson ratio for FRP
Ef=2.2e4
EMUf=0.3
!¸Ö¹Üµ¯ÐÔÄ£Á¿
Es=2.106e5
!¸Ö¹Ü²´ËɱÈ
Esmuf=0.25
!¸Ö¹Ü¿¹Ñ¹¿¹ÀÇ¿¶È
sc=36.3e4
st=36.3e4
fy=353.2 !³£ÎÂÏÂÇü·þÓ¦Á¦
exx=2e5 !³£ÎÂÏÂÑîÊÏÄ£Á¿
! Height and Radius of Tube
! Ô²Öù¸ß¶ÈºÍ°ë¾¶
H=750
Rf=121
Rs=72.5
! Ñ¡Ôñ»ìÄýÍÁµ¥Ôª, Concrete element
ET,1,SOLID65
keyopt,1,5,1
keyopt,1,6,3
keyopt,1,7,1
! Ñ¡ÔñFRPµ¥Ôª
ET,2,solid45
! ÊäÈë»ìÄýÍÁ²ÄÁϲÎÊý
MPTEMP,,,,,,,,
MPTEMP,1,20
MPDATA,EX,1,,Ec
MPDATA,PRXY,1,,EMUc
! ÊäÈëÓ¦Á¦Ó¦±äÇúÏß, Concrete stress-stain curve
TB,MISO,1,1,
TBTEMP,20
tbpt,,164e-6,4.92
tbpt,,328e-6,9.75
tbpt,,493e-6,14.36
tbpt,,657e-6,18.57
tbpt,,821e-6,22.23
tbpt,,985e-6,25.21
tbpt,,1149e-6,27.45
tbpt,,1314e-6,28.96
tbpt,,1478e-6,29.79
tbpt,,1642e-6,30.05
tbpt,,1970e-6,28.75
tbpt,,2463e-6,24.51
! ÊäÈëÆÆ»µÇúÃæ, Failure envelop surface
TB,CONC,1,1,9,
TBTEMP,20
TBDATA,,0.4,0.9,ft,-1,,
TBDATA,,,,1,,,
MPTEMP,,,,,,,,
MPTEMP,1,20
! ÊäÈëFRP²ÄÁϲÎÊý
MPDATA,EX,2,,Ef
MPDATA,PRXY,2,,EMUf
TB,bkin,2,1,2
TBTEMP,20
TBDATA,,430,0
! ÊäÈë¸Ö¹Ü²ÄÁϲÎÊý
MPDATA,EX,3,,Es
MPDATA,PRXY,3,,Esmuf
TB,BISO,3,1,2, 1 !Ë«ÏßÐÔ¸÷ÏòͬÐÔÇ¿»¯Ä£ÐÍ
TBDATA,,235,2.106E4
£¡½¨Á¢×éºÏÖùÄ£ÐÍ
pcirc,Rs-Sthick,Rs,0,360 !¸Ö¹Ü
pcirc,Rf,Rf+Fthick,0,360 !frp¹Ü
pcirc,Rs,Rf,0,360 !»ìÄýÍÁ
k,100,0,0,0
k,101,0,0,750
l,100,101
vdrag,all,,,,,,25
LDELE,25,,,1
numcmp,all
vglue,all
numcmp,all
!¸³Óè²ÄÁÏÊôÐÔ
VSEL,S,,,1 !FRP¹Ü 2
VATT,2,0,2
VSEL,S,,,3 !»ìÄýÍÁ 1
VATT,1,0,1
VSEL,S,,,2 !ÐÍ¸Ö 3
VATT,3,0,2
allsel,all
£¡»®·ÖÍø¸ñ
vsweep,1,1,11,1 !Ð͸Ö
vsweep,2,2,20,1 !FRP¹Ü
vsweep,3,21,22,1 !»ìÄýÍÁ
numcmp,all !ѹËõ½Úµã±àºÅ
nummrg,all
ALLSEL,ALL
!*************************
csys,1
et,4,184
keyopt,4,1,1
nsel,s,loc,z,H
nsel,r,loc,x,Rs-Sthick,Rf
n,350000,0,0,H+10
type,4
*get,nnum,node,0,count
*get,ND,node,0,num,min
*do,i,2,nnum
!!½Úµã¸öÊýÊÇnnum£¬Ö»ÐèÒªÉú³Énnum¸ömpcµ¥Ôª
E,350000,ND
ND=NDNEXT(ND)
*enddo
allsel
!**************************
!Ê©¼ÓºÉÔØ
!**************************
F,350000,FZ,-2702920
!**************************
!Ê©¼Ó×ÔÓɶÈÔ¼Êø
!**************************
nsel,s,loc,Z,0
d,all,ux,0,,,,uy,uz
allsel,all
FINISH
!***************************
!½øÈëÇó½âÆ÷
!***************************
/SOLU
!Çó½âÑ¡ÏîÉèÖÃ
ANTYPE,0 !Ñ¡Ôñ·ÖÎöÀàÐÍ
NLGEOM,1 !¼ÆÈë´ó±äÐÎЧӦ
NSUBST,30,100,20,on !×Ó²½Êý
AUTOTS,ON !×Ô¶¯Ê±¼ä²½
NEQIT,50 !ƽºâµü´ú´ÎÊý
CNVTOL,U,,0.015 !ÉèÖÃÊÕÁ²×¼Ôò
ncnv,2 !Èç¹û²»ÊÕÁ²Ê±½áÊø¶ø²»Í˳ö
OUTRES,ALL,ALL !Êä³öËùÓÐ×Ó²½µÄ½á¹û
LNSRCH,1 !ÓÃNewton-Raphson·½·¨¼¤»îÏßÐÔËÑË÷
cutcontrol,nioterpred,0 !ÔÚ·ÇÏßÐÔ½âÎöÖпØÖƲ½³¤µÄÏ÷¼õ
solve
Ä£ÄâÍê³É£¡£¡£¡£¡ËùµÃ½á¹ûÈçÏÂ
A1£¨ÊµÑéÊý¾Ý£© A2£¨Ä£ÄâÊý¾Ý£©
ºÉÔØ Î»ÒÆ ºÉÔØ Î»ÒÆ
200 2.9 200 0.096
400 3.91 400 0.193
600 4.76 600 0.293
800 5.56 800 0.398
1000 6.39 1000 0.511
1100 6.81 1100 0.572
1200 7.37 1200 0.639
1360 8.57 1360 0.867
1460 9.75 1460 0.94
1560 11.21 1560 1.091
1660 13.42 1660 1.161
1920 25.74 1920 2.156
ÊÔÑé¿Ï¶¨ÊÇûÓÐÎÊÌâµÄ£¬µ«ÊÇÓÐÏÞԪģÄâΪʲô¸úÊÔÑé²îµÄÕâô¶à£¬ÎÊÌâ³öÔÚÄÄÀïÄØ£¿ÎÒÒ²¼ì²é²»³öÀ´Ñ½£¬Çó½Ì¸÷λ´óÉñ£¡£¡£¡
![Ä£ÄâÓëÊÔÑéÊý¾Ý²î¾àºÜ´óÊÇÔõô»ØÊ£¿£¿]()
A1ÊÇʦÐÖÊÔÑéËùµÃºÉÔØ-Î»ÒÆÇúÏߣ¬A2ÊÇÎÒÄ£ÄâµÄ½á¹û£¬²îµÄҲ̫¶àÁË¡¤¡¤¡¤¡¤ |