General Mechanical

General Mechanical

Topics related to Mechanical Enterprise, Motion, Additive Print and more.

cerig connections and constraints

    • giacomo
      Subscriber
      my project is a wind tower that has a flange at the base with 12 bolts and 12 gussets realized in Ansys apdl. the tower is beam, while the gusset plates and flange are shell. 
      Are the cerig connections and the constraints I impose correct?
      Thank you!
       
      FINISH
      /CLEAR
       
      /PREP7
      !PARAMETRI
      alt=30         !altezza torre
      spess=0.008  !spessore torre------------------------ 
      r1=1 !1  !raggio base
      r2=0.5 !0.8    !raggio cima
      rfl=1.5   !raggio flangia
      yG=(r1+2*r2)*alt/(3*(r1+r2)) !baricentro G della torre
      spfl=0.06!0.06!0.125   !spessore flangia
      spfazz=0.06!0.06!0.06  !spessore fazzoletti
      altfazz=1   !altezza fazzoletti   
      lsupf=0.05 !lato superiore fazzoletto
      linff=0.05 !lato inferiore fazzoletto
       
      mass1=0.001
      r,2,mass1,mass1,mass1
       
       
       
      !keypoints
      k,1,0,0,0 
      k,2,0,altfazz,0
      k,3,0,yG,0     
      k,4,0,alt,0    
       
       
       
      !LINES
      l,1,2
      l,2,3
      l,3,4
       
      !Element type
      ET,1,BEAM189
      ET,2,MASS21
      ET,3,SHELL181
       
      !materiali
      EX,1,2e11    !Pa
      NUXY,1,0.3
      DENS,1,7850   !kg/m^3
       
      R,1,7000 !7000 !Massa di kg rotore
       
      !Mesh della massa
      ksel,s,kp,,4
      REAL,1
      TYPE,2
      kmesh,all
      alls
       
      !definisco la sezione della torre
       
      SECTYPE,   1, BEAM, CTUBE, base, 0  
      SECOFFSET, CENT 
      SECDATA,r1-spess,r1,20,0,0,0,0,0,0,0,0,0 
       
      SECTYPE,   2, BEAM, CTUBE, top, 0   
      SECOFFSET, CENT 
      SECDATA,r2-spess,r2,20,0,0,0,0,0,0,0,0,0 
       
      SECTYPE,3,TAPER, ,tapered   
      SECDATA,   1,0,altfazz,0,               
      SECDATA,   2,0,alt,0,               
       
      !lo shell
       
      SECTYPE,4,shell
      SECDATA,spfl  
      secoffset,bottom                !flangia
       
      SECTYPE,5,shell                     !torre alla base
      SECDATA,spess
      secoffset,top                        
       
      SECTYPE,7,shell                     !flangia
      SECDATA,spfl
      secoffset,bottom
       
      SECTYPE,6,shell
      SECDATA,spfazz                        
       
       
      !MESH torre (linea princ)
      MAT,1
      TYPE,1
      SECNUM,3
      lsel,s,line,,2,3
      lesize,all,0.1    !!!!!!0.05
      lmesh,all
      alls
       
      MAT,1
      TYPE,1
      SECNUM,1
      lsel,s,line,,1
      lesize,all,0.1
      lmesh,all
      alls
       
      LWPL,-1,1,0
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
       
      !posizione bulloni
      pb=(rfl-r1)/2+r1 !distanza centro bullone dal centro torre
      pi=3.14159265
      !scelgo 12 bulloni M27 classe 10.9
      d1=0.027
       
      rbul=(d1*1.5+spfl*tan(30*pi/180))/2 !Base del cono su elemento compresso
      alfa=30*pi/180
       
       
       
       
      CYL4,pb,0,rbul
      CYL4,pb*cos(alfa),pb*sin(alfa),rbul
      CYL4,pb*cos(2*alfa),pb*sin(2*alfa),rbul
      CYL4,pb*cos(3*alfa),pb*sin(3*alfa),rbul
      CYL4,pb*cos(4*alfa),pb*sin(4*alfa),rbul
      CYL4,pb*cos(5*alfa),pb*sin(5*alfa),rbul
      CYL4,pb*cos(6*alfa),pb*sin(6*alfa),rbul
      CYL4,pb*cos(7*alfa),pb*sin(7*alfa),rbul
      CYL4,pb*cos(8*alfa),pb*sin(8*alfa),rbul
      CYL4,pb*cos(9*alfa),pb*sin(9*alfa),rbul
      CYL4,pb*cos(10*alfa),pb*sin(10*alfa),rbul
      CYL4,pb*cos(11*alfa),pb*sin(11*alfa),rbul
       
       
      !fazzoletti kpoints
       
          !posizione dei fazzoletti ogni alfa gradi sulla flangia
       
          !kpoints base flangia fazz
      k,3000,rfl*cos(alfa/2),0,rfl*sin(alfa/2)
      k,3001,rfl*cos(alfa/2+alfa),0,rfl*sin(alfa/2+alfa)
      k,3002,rfl*cos(alfa/2+2*alfa),0,rfl*sin(alfa/2+2*alfa)
      k,3003,rfl*cos(alfa/2+3*alfa),0,rfl*sin(alfa/2+3*alfa)
      k,3004,rfl*cos(alfa/2+4*alfa),0,rfl*sin(alfa/2+4*alfa)
      k,3005,rfl*cos(alfa/2+5*alfa),0,rfl*sin(alfa/2+5*alfa)
      k,3006,rfl*cos(alfa/2+6*alfa),0,rfl*sin(alfa/2+6*alfa)
      k,3007,rfl*cos(alfa/2+7*alfa),0,rfl*sin(alfa/2+7*alfa)
      k,3008,rfl*cos(alfa/2+8*alfa),0,rfl*sin(alfa/2+8*alfa)
      k,3009,rfl*cos(alfa/2+9*alfa),0,rfl*sin(alfa/2+9*alfa)
      k,3010,rfl*cos(alfa/2+10*alfa),0,rfl*sin(alfa/2+10*alfa)
      k,3011,rfl*cos(alfa/2+11*alfa),0,rfl*sin(alfa/2+11*alfa)
       
          !kpoints altezza fazzoletti
      k,3012,r1*cos(alfa/2),altfazz,r1*sin(alfa/2)
      k,3013,r1*cos(alfa/2+alfa),altfazz,r1*sin(alfa/2+alfa)
      k,3014,r1*cos(alfa/2+2*alfa),altfazz,r1*sin(alfa/2+2*alfa)
      k,3015,r1*cos(alfa/2+3*alfa),altfazz,r1*sin(alfa/2+3*alfa)
      k,3016,r1*cos(alfa/2+4*alfa),altfazz,r1*sin(alfa/2+4*alfa)
      k,3017,r1*cos(alfa/2+5*alfa),altfazz,r1*sin(alfa/2+5*alfa)
      k,3018,r1*cos(alfa/2+6*alfa),altfazz,r1*sin(alfa/2+6*alfa)
      k,3019,r1*cos(alfa/2+7*alfa),altfazz,r1*sin(alfa/2+7*alfa)
      k,3020,r1*cos(alfa/2+8*alfa),altfazz,r1*sin(alfa/2+8*alfa)
      k,3021,r1*cos(alfa/2+9*alfa),altfazz,r1*sin(alfa/2+9*alfa)
      k,3022,r1*cos(alfa/2+10*alfa),altfazz,r1*sin(alfa/2+10*alfa)
      k,3023,r1*cos(alfa/2+11*alfa),altfazz,r1*sin(alfa/2+11*alfa)
       
      !kpoints base cilindro fazzoletti
      k,3024,r1*cos(alfa/2),0,r1*sin(alfa/2)
      k,3025,r1*cos(alfa/2+alfa),0,r1*sin(alfa/2+alfa)
      k,3026,r1*cos(alfa/2+2*alfa),0,r1*sin(alfa/2+2*alfa)
      k,3027,r1*cos(alfa/2+3*alfa),0,r1*sin(alfa/2+3*alfa)
      k,3028,r1*cos(alfa/2+4*alfa),0,r1*sin(alfa/2+4*alfa)
      k,3029,r1*cos(alfa/2+5*alfa),0,r1*sin(alfa/2+5*alfa)
      k,3030,r1*cos(alfa/2+6*alfa),0,r1*sin(alfa/2+6*alfa)
      k,3031,r1*cos(alfa/2+7*alfa),0,r1*sin(alfa/2+7*alfa)
      k,3032,r1*cos(alfa/2+8*alfa),0,r1*sin(alfa/2+8*alfa)
      k,3033,r1*cos(alfa/2+9*alfa),0,r1*sin(alfa/2+9*alfa)
      k,3034,r1*cos(alfa/2+10*alfa),0,r1*sin(alfa/2+10*alfa)
      k,3035,r1*cos(alfa/2+11*alfa),0,r1*sin(alfa/2+11*alfa)
       
          !kpoints lato superiore fazzoletti
      k,3036,(r1+lsupf)*cos(alfa/2),altfazz,(r1+lsupf)*sin(alfa/2)
      k,3037,(r1+lsupf)*cos(alfa/2+alfa),altfazz,(r1+lsupf)*sin(alfa/2+alfa)
      k,3038,(r1+lsupf)*cos(alfa/2+2*alfa),altfazz,(r1+lsupf)*sin(alfa/2+2*alfa)
      k,3039,(r1+lsupf)*cos(alfa/2+3*alfa),altfazz,(r1+lsupf)*sin(alfa/2+3*alfa)
      k,3040,(r1+lsupf)*cos(alfa/2+4*alfa),altfazz,(r1+lsupf)*sin(alfa/2+4*alfa)
      k,3041,(r1+lsupf)*cos(alfa/2+5*alfa),altfazz,(r1+lsupf)*sin(alfa/2+5*alfa)
      k,3042,(r1+lsupf)*cos(alfa/2+6*alfa),altfazz,(r1+lsupf)*sin(alfa/2+6*alfa)
      k,3043,(r1+lsupf)*cos(alfa/2+7*alfa),altfazz,(r1+lsupf)*sin(alfa/2+7*alfa)
      k,3044,(r1+lsupf)*cos(alfa/2+8*alfa),altfazz,(r1+lsupf)*sin(alfa/2+8*alfa)
      k,3045,(r1+lsupf)*cos(alfa/2+9*alfa),altfazz,(r1+lsupf)*sin(alfa/2+9*alfa)
      k,3046,(r1+lsupf)*cos(alfa/2+10*alfa),altfazz,(r1+lsupf)*sin(alfa/2+10*alfa)
      k,3047,(r1+lsupf)*cos(alfa/2+11*alfa),altfazz,(r1+lsupf)*sin(alfa/2+11*alfa)
       
          !kpoints lato inferiore fazzoletti
      k,3048,rfl*cos(alfa/2),linff,rfl*sin(alfa/2)
      k,3049,rfl*cos(alfa/2+alfa),linff,rfl*sin(alfa/2+alfa)
      k,3050,rfl*cos(alfa/2+2*alfa),linff,rfl*sin(alfa/2+2*alfa)
      k,3051,rfl*cos(alfa/2+3*alfa),linff,rfl*sin(alfa/2+3*alfa)
      k,3052,rfl*cos(alfa/2+4*alfa),linff,rfl*sin(alfa/2+4*alfa)
      k,3053,rfl*cos(alfa/2+5*alfa),linff,rfl*sin(alfa/2+5*alfa)
      k,3054,rfl*cos(alfa/2+6*alfa),linff,rfl*sin(alfa/2+6*alfa)
      k,3055,rfl*cos(alfa/2+7*alfa),linff,rfl*sin(alfa/2+7*alfa)
      k,3056,rfl*cos(alfa/2+8*alfa),linff,rfl*sin(alfa/2+8*alfa)
      k,3057,rfl*cos(alfa/2+9*alfa),linff,rfl*sin(alfa/2+9*alfa)
      k,3058,rfl*cos(alfa/2+10*alfa),linff,rfl*sin(alfa/2+10*alfa)
      k,3059,rfl*cos(alfa/2+11*alfa),linff,rfl*sin(alfa/2+11*alfa)
       
       
       
      ! fazzoletti tramite kpoints
      A,3000,3048,3036,3012,3024
      A,3001,3049,3037,3013,3025
      A,3002,3050,3038,3014,3026
      A,3003,3051,3039,3015,3027
      A,3004,3052,3040,3016,3028
      A,3005,3053,3041,3017,3029
      A,3006,3054,3042,3018,3030
      A,3007,3055,3043,3019,3031
      A,3008,3056,3044,3020,3032
      A,3009,3057,3045,3021,3033
      A,3010,3058,3046,3022,3034
      A,3011,3059,3047,3023,3035
       
       
      !perimetro esterno flangia
      larc,3000,3001,1,rfl
      larc,3001,3002,1,rfl
      larc,3002,3003,1,rfl
      larc,3003,3004,1,rfl
      larc,3004,3005,1,rfl
      larc,3005,3006,1,rfl
      larc,3006,3007,1,rfl
      larc,3007,3008,1,rfl
      larc,3008,3009,1,rfl
      larc,3009,3010,1,rfl
      larc,3010,3011,1,rfl
      larc,3011,3000,1,rfl
       
      !perimetro interno flangia
      larc,3024,3025,1,rfl
      larc,3025,3026,1,rfl
      larc,3026,3027,1,rfl
      larc,3027,3028,1,rfl
      larc,3028,3029,1,rfl
      larc,3029,3030,1,rfl
      larc,3030,3031,1,rfl
      larc,3031,3032,1,rfl
      larc,3032,3033,1,rfl
      larc,3033,3034,1,rfl
      larc,3034,3035,1,rfl
      larc,3035,3024,1,rfl
       
      !area inferiore flangia pezzo per pezzo
      al,56,124,61,112
      al,61,125,66,113
      al,66,126,71,114
      al,71,127,76,115
      al,76,128,81,116
      al,81,129,86,117
      al,86,130,91,118
      al,91,131,96,119
      al,96,132,101,120
      al,101,133,106,121
      al,106,134,111,122
      al,111,135,56,123
       
       
       
       
      alls
      asel,s,area,,1,12
      cm,bull,area
      asel,s,area,,25,36
      cm,fla,area
      alls
      ASBA,fla,bull !comando ASBA SOTTRAE ALL'ELEMENTO FLANGIA I BULL:realizzo i fori per i bulloni
       
       
       
       
      !Mesh fazzoletti
      asel,s,area,,13,24
      SECNUM,6
      TYPE,3
      MAT,1
      aesize,all,0.05
      amesh,all
       
       
       
       
       
      !Mesh base
      asel,s,area,,37,48
      SECNUM,4
      TYPE,3
      MAT,1
      aesize,all,0.05
      amesh,all
       
       
       
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
       
       
      !CERIG 
      alls
      !lsel,s,line,,124,135
      lsel,s,line,,55,110,5
      nsll,s,1
      cm,slave1,node
       
      ksel,s,kp,,2
      nslk,s,2
       
       
      *get,master1,node,,num,min
       
      cmsel,a,slave1
      cerig,master1,628,all
      cerig,master1,2192,all
      cerig,master1,914,all
      cerig,master1,776,all
      cerig,master1,1055,all
      cerig,master1,1472,all
      cerig,master1,1610,all
      cerig,master1,1196,all
      cerig,master1,1334,all
      cerig,master1,1758,all
      cerig,master1,1906,all
      cerig,master1,2054,all
       
       
      !
      lsel,s,line,,124,135
      nsll,s,1
      cm,slave2,node
       
      ksel,s,kp,,1
      nslk,s,1
       
       
      !nsel,a,node,,1
      *get,master2,node,,num,min
      cmsel,a,slave2
      cerig,master2,all,all
      alls
       
      !!!!secondi nodi
       
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave3,node
      nsel,s,node,,603
      *get,master3,node,,num,min
       
      cmsel,a,slave3
      cerig,master3,630,all
      cerig,master3,2194,all
      cerig,master3,916,all
      cerig,master3,778,all
      cerig,master3,1057,all
      cerig,master3,1474,all
      cerig,master3,1612,all
      cerig,master3,1198,all
      cerig,master3,1336,all
      cerig,master3,1760,all
      cerig,master3,1908,all
      cerig,master3,2056,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!terzi nodi
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave4,node
      nsel,s,node,,602
      *get,master4,node,,num,min
       
      cmsel,a,slave4
      cerig,master4,631,all
      cerig,master4,2195,all
      cerig,master4,917,all
      cerig,master4,779,all
      cerig,master4,1058,all
      cerig,master4,1475,all
      cerig,master4,1613,all
      cerig,master4,1199,all
      cerig,master4,1337,all
      cerig,master4,1761,all
      cerig,master4,1909,all
      cerig,master4,2057,all
       
      alls
      !!!!!!!!!!!!!!!!!!!!!!!!quarti nodi
       
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave5,node
      nsel,s,node,,601
      *get,master5,node,,num,min
       
      cmsel,a,slave5
      cerig,master5,632,all
      cerig,master5,2196,all
      cerig,master5,918,all
      cerig,master5,780,all
      cerig,master5,1059,all
      cerig,master5,1476,all
      cerig,master5,1614,all
      cerig,master5,1200,all
      cerig,master5,1338,all
      cerig,master5,1762,all
      cerig,master5,1910,all
      cerig,master5,2058,all
       
      alls
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!quinti nodi
       
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave6,node
      nsel,s,node,,600
      *get,master6,node,,num,min
       
      cmsel,a,slave6
      cerig,master6,633,all
      cerig,master6,2197,all
      cerig,master6,919,all
      cerig,master6,781,all
      cerig,master6,1060,all
      cerig,master6,1477,all
      cerig,master6,1615,all
      cerig,master6,1201,all
      cerig,master6,1339,all
      cerig,master6,1763,all
      cerig,master6,1911,all
      cerig,master6,2059,all
       
      alls
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!sesti 
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave7,node
      nsel,s,node,,599
      *get,master7,node,,num,min
       
      cmsel,a,slave7
      cerig,master7,634,all
      cerig,master7,2198,all
      cerig,master7,920,all
      cerig,master7,782,all
      cerig,master7,1061,all
      cerig,master7,1478,all
      cerig,master7,1616,all
      cerig,master7,1202,all
      cerig,master7,1340,all
      cerig,master7,1764,all
      cerig,master7,1912,all
      cerig,master7,2060,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!settimi
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave8,node
      nsel,s,node,,598
      *get,master8,node,,num,min
       
      cmsel,a,slave8
      cerig,master8,635,all
      cerig,master8,2199,all
      cerig,master8,921,all
      cerig,master8,783,all
      cerig,master8,1062,all
      cerig,master8,1479,all
      cerig,master8,1617,all
      cerig,master8,1203,all
      cerig,master8,1341,all
      cerig,master8,1765,all
      cerig,master8,1913,all
      cerig,master8,2061,all
       
      alls
       
      !!!!!!!!!!ottavi
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave9,node
      nsel,s,node,,597
      *get,master9,node,,num,min
       
      cmsel,a,slave9
      cerig,master9,636,all
      cerig,master9,2200,all
      cerig,master9,922,all
      cerig,master9,784,all
      cerig,master9,1063,all
      cerig,master9,1480,all
      cerig,master9,1618,all
      cerig,master9,1204,all
      cerig,master9,1342,all
      cerig,master9,1766,all
      cerig,master9,1914,all
      cerig,master9,2062,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
       
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave10,node
      nsel,s,node,,596
      *get,master10,node,,num,min
       
      cmsel,a,slave10
      cerig,master10,637,all
      cerig,master10,2201,all
      cerig,master10,923,all
      cerig,master10,785,all
      cerig,master10,1064,all
      cerig,master10,1481,all
      cerig,master10,1619,all
      cerig,master10,1205,all
      cerig,master10,1343,all
      cerig,master10,1767,all
      cerig,master10,1915,all
      cerig,master10,2063,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
       
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave11,node
      nsel,s,node,,595
      *get,master11,node,,num,min
       
      cmsel,a,slave11
      cerig,master11,638,all
      cerig,master11,2202,all
      cerig,master11,924,all
      cerig,master11,786,all
      cerig,master11,1065,all
      cerig,master11,1482,all
      cerig,master11,1620,all
      cerig,master11,1206,all
      cerig,master11,1344,all
      cerig,master11,1768,all
      cerig,master11,1916,all
      cerig,master11,2064,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave12,node
      nsel,s,node,,594
      *get,master12,node,,num,min
       
      cmsel,a,slave12
      cerig,master12,639,all
      cerig,master12,2203,all
      cerig,master12,925,all
      cerig,master12,787,all
      cerig,master12,1066,all
      cerig,master12,1483,all
      cerig,master12,1621,all
      cerig,master12,1207,all
      cerig,master12,1345,all
      cerig,master12,1769,all
      cerig,master12,1917,all
      cerig,master12,2065,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
       
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave13,node
      nsel,s,node,,593
      *get,master13,node,,num,min
       
      cmsel,a,slave13
      cerig,master13,640,all
      cerig,master13,2204,all
      cerig,master13,926,all
      cerig,master13,788,all
      cerig,master13,1067,all
      cerig,master13,1484,all
      cerig,master13,1622,all
      cerig,master13,1208,all
      cerig,master13,1346,all
      cerig,master13,1770,all
      cerig,master13,1918,all
      cerig,master13,2066,all
       
      alls
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave14,node
      nsel,s,node,,592
      *get,master14,node,,num,min
       
      cmsel,a,slave14
      cerig,master14,641,all
      cerig,master14,2205,all
      cerig,master14,927,all
      cerig,master14,789,all
      cerig,master14,1068,all
      cerig,master14,1485,all
      cerig,master14,1623,all
      cerig,master14,1209,all
      cerig,master14,1347,all
      cerig,master14,1771,all
      cerig,master14,1919,all
      cerig,master14,2067,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave15,node
      nsel,s,node,,591
      *get,master15,node,,num,min
       
      cmsel,a,slave15
      cerig,master15,642,all
      cerig,master15,2206,all
      cerig,master15,928,all
      cerig,master15,790,all
      cerig,master15,1069,all
      cerig,master15,1486,all
      cerig,master15,1624,all
      cerig,master15,1210,all
      cerig,master15,1348,all
      cerig,master15,1772,all
      cerig,master15,1920,all
      cerig,master15,2068,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave16,node
      nsel,s,node,,590
      *get,master16,node,,num,min
       
      cmsel,a,slave16
      cerig,master16,643,all
      cerig,master16,2207,all
      cerig,master16,929,all
      cerig,master16,791,all
      cerig,master16,1070,all
      cerig,master16,1487,all
      cerig,master16,1625,all
      cerig,master16,1211,all
      cerig,master16,1349,all
      cerig,master16,1773,all
      cerig,master16,1921,all
      cerig,master16,2069,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave17,node
      nsel,s,node,,589
      *get,master17,node,,num,min
       
      cmsel,a,slave17
      cerig,master17,644,all
      cerig,master17,2208,all
      cerig,master17,930,all
      cerig,master17,792,all
      cerig,master17,1071,all
      cerig,master17,1488,all
      cerig,master17,1626,all
      cerig,master17,1212,all
      cerig,master17,1350,all
      cerig,master17,1774,all
      cerig,master17,1922,all
      cerig,master17,2070,all
       
      alls
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave18,node
      nsel,s,node,,588
      *get,master18,node,,num,min
       
      cmsel,a,slave18
      cerig,master18,645,all
      cerig,master18,2209,all
      cerig,master18,931,all
      cerig,master18,793,all
      cerig,master18,1072,all
      cerig,master18,1489,all
      cerig,master18,1627,all
      cerig,master18,1213,all
      cerig,master18,1351,all
      cerig,master18,1775,all
      cerig,master18,1923,all
      cerig,master18,2071,all
       
      alls
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave19,node
      nsel,s,node,,587
      *get,master19,node,,num,min
       
      cmsel,a,slave19
      cerig,master19,646,all
      cerig,master19,2210,all
      cerig,master19,932,all
      cerig,master19,794,all
      cerig,master19,1073,all
      cerig,master19,1490,all
      cerig,master19,1628,all
      cerig,master19,1214,all
      cerig,master19,1352,all
      cerig,master19,1776,all
      cerig,master19,1924,all
      cerig,master19,2072,all
       
      alls
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
       
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave20,node
      nsel,s,node,,586
      *get,master20,node,,num,min
       
      cmsel,a,slave20
      cerig,master20,647,all
      cerig,master20,2211,all
      cerig,master20,933,all
      cerig,master20,795,all
      cerig,master20,1074,all
      cerig,master20,1491,all
      cerig,master20,1629,all
      cerig,master20,1215,all
      cerig,master20,1353,all
      cerig,master20,1777,all
      cerig,master20,1925,all
      cerig,master20,2073,all
       
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      lsel,s,line,,55,110,5
      nsll,s,1
       
      cm,slave21,node
      nsel,s,node,,585
      *get,master21,node,,num,min
       
      cmsel,a,slave21
      cerig,master21,648,all
      cerig,master21,2212,all
      cerig,master21,934,all
      cerig,master21,796,all
      cerig,master21,1075,all
      cerig,master21,1492,all
      cerig,master21,1630,all
      cerig,master21,1216,all
      cerig,master21,1354,all
      cerig,master21,1778,all
      cerig,master21,1926,all
      cerig,master21,2074,all
       
      alls
       
       
       
       
       
       
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      !!!!!!!!!!!!!!!DEFINISCO KEYPOINTS FORI
       
      K,60000,pb*cos(0*alfa),0,pb*sin(0*alfa)
      K,60001,pb*cos(1*alfa),0,pb*sin(1*alfa)
      K,60002,pb*cos(2*alfa),0,pb*sin(2*alfa)
      K,60003,pb*cos(3*alfa),0,pb*sin(3*alfa)
      K,60004,pb*cos(4*alfa),0,pb*sin(4*alfa)
      K,60005,pb*cos(5*alfa),0,pb*sin(5*alfa)
      K,60006,pb*cos(6*alfa),0,pb*sin(6*alfa)
      K,60007,pb*cos(7*alfa),0,pb*sin(7*alfa)
      K,60008,pb*cos(8*alfa),0,pb*sin(8*alfa)
      K,60009,pb*cos(9*alfa),0,pb*sin(9*alfa)
      K,60010,pb*cos(10*alfa),0,pb*sin(10*alfa)
      K,60011,pb*cos(11*alfa),0,pb*sin(11*alfa)
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      !cerig fori 
      !BULLONE 1 
      alls
      *get,loc_x,kp,60000,loc,X,,,
      *get,loc_y,kp,60000,loc,Y,,,
      *get,loc_z,kp,60000,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_1,node,0,num,max
       
      !!!!
      !BULLONE 2
      alls
      *get,loc_x,kp,60001,loc,X,,,
      *get,loc_y,kp,60001,loc,Y,,,
      *get,loc_z,kp,60001,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_2,node,0,num,max
      !BULLONE 3
      alls
      *get,loc_x,kp,60002,loc,X,,,
      *get,loc_y,kp,60002,loc,Y,,,
      *get,loc_z,kp,60002,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_3,node,0,num,max
      !BULLONE 4
      alls
      *get,loc_x,kp,60003,loc,X,,,
      *get,loc_y,kp,60003,loc,Y,,,
      *get,loc_z,kp,60003,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_4,node,0,num,max
      alls
      !BULLONE 5
      alls
      *get,loc_x,kp,60004,loc,X,,,
      *get,loc_y,kp,60004,loc,Y,,,
      *get,loc_z,kp,60004,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_5,node,0,num,max
      alls
      !BULLONE 6
      alls
      *get,loc_x,kp,60005,loc,X,,,
      *get,loc_y,kp,60005,loc,Y,,,
      *get,loc_z,kp,60005,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_6,node,0,num,max
      alls
      !BULLONE 7
      alls
      *get,loc_x,kp,60006,loc,X,,,
      *get,loc_y,kp,60006,loc,Y,,,
      *get,loc_z,kp,60006,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_7,node,0,num,max
      alls
      !BULLONE 8
      alls
      *get,loc_x,kp,60007,loc,X,,,
      *get,loc_y,kp,60007,loc,Y,,,
      *get,loc_z,kp,60007,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_8,node,0,num,max
      alls
      !BULLONE 9
      alls
      *get,loc_x,kp,60008,loc,X,,,
      *get,loc_y,kp,60008,loc,Y,,,
      *get,loc_z,kp,60008,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_9,node,0,num,max
      alls
      !BULLONE 10
      alls
      *get,loc_x,kp,60009,loc,X,,,
      *get,loc_y,kp,60009,loc,Y,,,
      *get,loc_z,kp,60009,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_10,node,0,num,max
      alls
      !BULLONE 11
      alls
      *get,loc_x,kp,60010,loc,X,,,
      *get,loc_y,kp,60010,loc,Y,,,
      *get,loc_z,kp,60010,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_11,node,0,num,max
      alls
      !BULLONE 12
      alls
      *get,loc_x,kp,60011,loc,X,,,
      *get,loc_y,kp,60011,loc,Y,,,
      *get,loc_z,kp,60011,loc,Z,,,
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,loc_x,loc_y,loc_z
      nsel,s,node,,n_max+1
      *get,bul_12,node,0,num,max
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      alls
      nsel,s,node,,all
      *get,n_max,node,0,num,max
      n,n_max+1,0,-0.1,0
      nsel,s,node,,n_max+1
      *get,bul_centro,node,0,num,max
      alls
       
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!! faccio la mesh dei nodi appena creati
      type,2
      real,2
      e,bul_1
      e,bul_2
      e,bul_3
      e,bul_4
      e,bul_5
      e,bul_6
      e,bul_7
      e,bul_8
      e,bul_9
      e,bul_10
      e,bul_11
      e,bul_12
      e,bul_centro
      ! Faccio cerig tra fori e "bulloni"
       
      lsel,s,line,,4,7
      nsll,s,1
      cm,slave100,node
      cmsel,s,slave100
      nsel,a,node,,bul_1
      cerig,bul_1,all,all
       
      alls
      lsel,s,line,,48,51
      nsll,s,1
      cm,slave101,node
      cmsel,s,slave101
      nsel,a,node,,bul_2
      cerig,bul_2,all,all
       
      alls
      lsel,s,line,,44,47
      nsll,s,1
      cm,slave102,node
      cmsel,s,slave102
      nsel,a,node,,bul_3
      cerig,bul_3,all,all
       
      alls
      lsel,s,line,,40,43
      nsll,s,1
      cm,slave103,node
      cmsel,s,slave103
      nsel,a,node,,bul_4
      cerig,bul_4,all,all
       
      lsel,s,line,,36,39
      nsll,s,1
      cm,slave104,node
      cmsel,s,slave104
      nsel,a,node,,bul_5
      cerig,bul_5,all,all
       
      alls
      lsel,s,line,,32,35
      nsll,s,1
      cm,slave105,node
      cmsel,s,slave105
      nsel,a,node,,bul_6
      cerig,bul_6,all,all
       
      alls
      lsel,s,line,,28,31
      nsll,s,1
      cm,slave106,node
      cmsel,s,slave106
      nsel,a,node,,bul_7
      cerig,bul_7,all,all
       
      alls
      lsel,s,line,,24,27
      nsll,s,1
      cm,slave107,node
      cmsel,s,slave107
      nsel,a,node,,bul_8
      cerig,bul_8,all,all
       
       
      lsel,s,line,,20,23
      nsll,s,1
      cm,slave108,node
      cmsel,s,slave108
      nsel,a,node,,bul_9
      cerig,bul_9,all,all
       
      alls
      lsel,s,line,,16,19
      nsll,s,1
      cm,slave109,node
      cmsel,s,slave109
      nsel,a,node,,bul_10
      cerig,bul_10,all,all
       
      alls
      lsel,s,line,,12,15
      nsll,s,1
      cm,slave110,node
      cmsel,s,slave110
      nsel,a,node,,bul_11
      cerig,bul_11,all,all
       
      alls
      lsel,s,line,,8,11
      nsll,s,1
      cm,slave111,node
      cmsel,s,slave111
      nsel,a,node,,bul_12
      cerig,bul_12,all,all
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      ! Faccio cerig tra "bulloni" e nodo centrale
       
      alls
      nsel,s,node,,bul_1
      nsel,a,node,,bul_2
      nsel,a,node,,bul_3
      nsel,a,node,,bul_4
      nsel,a,node,,bul_5
      nsel,a,node,,bul_6
      nsel,a,node,,bul_7
      nsel,a,node,,bul_8
      nsel,a,node,,bul_9
      nsel,a,node,,bul_10
      nsel,a,node,,bul_11
      nsel,a,node,,bul_12
       
      cm,slave112,node
      alls
      cmsel,s,slave112
      nsel,a,node,,bul_centro
      cerig,bul_centro,all,all
      alls
       
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      !VINCOLI
      alls
      lsel,s,line,,4,51
      nsll,s,1
      d,all,ux,,,,,uy,uz
       
      fini
       
      /SOLU
      antype,0
       
      ksel,s,kp,,4
      nslk,s,1
      f,all,fx,1 
       
      ksel,s,kp,,3
      nslk,s,1
      f,all,fx,1 
       
      alls
      gplot
       
      solve
    • Erik Kostson
      Ansys Employee

      Hi
      I can not comment on the large script you have provided.

      (perhaps other forum members can give some feedback here)


      We can give some guidelines as I did before on what you can do to model this and check that it is working.

      First on how to set up a connect between a tubular shell and a beam element (just like I proposed before) use this:

      https://engineering.stackexchange.com/questions/29811/how-to-create-rbe2-between-the-end-edges-of-a-cylinder-and-end-nodes-of-a-beam-e

      Again, as mentioned, keep the cerig away from the area of interest (so away from the area where you want to evaluate stresses).

      The final model/'sanity' check is to put a load on the top of the beam and make sure the model behaves OK, and that all of the applied force, is reacted at the base fixed nodes (so applied force should be equal to reaction at base/fixed nodes). 

      Hope this helps.
      Erik

Viewing 1 reply thread
  • The topic ‘cerig connections and constraints’ is closed to new replies.