!--------------------------------------------------------------------------------------------------------------------------- !---------------------------------------------------- geometrie ------------------------------------------------------------ !--------------------------------------------------------------------------------------------------------------------------- /PREP7 /COLOR,PBAK,ON,3,13 /REPLOT !--------------------------------------------------------------------------------------------------------------------------- !----------------------------------------------- geometrie definition ------------------------------------------------------ !--------------------------------------------------------------------------------------------------------------------------- K,1,-500,100,0 K,2,500,100,0 K,3,500,-100,0 K,4,-500,-100,0 A,1,2,3,4 !--------------------------------------------------------------------------------------------------------------------------- K,5,0,-100,-56 K,6,0,100,-56 L,5,6 CIRCLE,5,50,6,,360, ADRAG,6,7,8,9,,,5,,,,, !--------------------------------------------------------------------------------------------------------------------------- !----------------------------------------------- material_definition ------------------------------------------------------- !--------------------------------------------------------------------------------------------------------------------------- MP,EX,1,42 MP,EY,1,25 MP,PRXY,1,0.49 MP,GXY,1,6 MP,DENS,1,1.5e-9 R,1,11 !--------------------------------------------------------------------------------------------------------------------------- MP,EX,2,210e3 MP,NUXY,2,0.3 R,2,1 !--------------------------------------------------------------------------------------------------------------------------- !------------------------------------------------ element_definition ------------------------------------------------------- !--------------------------------------------------------------------------------------------------------------------------- ET,1,93 !--------------------------------------------------------------------------------------------------------------------------- ET,2,CONTA174 KEYOPT,2,1,0 KEYOPT,2,2,0 KEYOPT,2,4,1 KEYOPT,2,5,3 KEYOPT,2,11,1 !--------------------------------------------------------------------------------------------------------------------------- ET,3,TARGE170 KEYOPT,3,1,1 !--------------------------------------------------------------------------------------------------------------------------- !---------------------------------------------- SHELL93_mesh_definition ---------------------------------------------------- !--------------------------------------------------------------------------------------------------------------------------- TYPE,1 MAT,1 REAL,1 ESIZE,25 AMESH,1 !--------------------------------------------------------------------------------------------------------------------------- TYPE,1 MAT,2 REAL,2 ESIZE,25 ASEL,S,AREA,,2,5 CM,CYLIN,AREA CMSEL,S,CYLIN,AREA AMESH,ALL ALLSEL !--------------------------------------------------------------------------------------------------------------------------- !----------------------------------------------- MPC184_mesh_definition ---------------------------------------------------- !--------------------------------------------------------------------------------------------------------------------------- *GET,node_count,NODE,,COUNT n_pilot_01 = node_count + 1 N,n_pilot_01,0,100,-56 n_pilot_02 = n_pilot_01 + 1 N,n_pilot_02,0,-100,-56 ET,4,MPC184 KEYOPT,4,1,1 KEYOPT,4,2,0 MP,EX,4,210e3 CMSEL,S,CYLIN,AREA NSLA,S,1 NSEL,R,LOC,Y,100 *GET,target_node,NODE,,COUNT nn = 0 TYPE,4 REAL,4 MAT,4 *DO,i,1,target_node nn = ndnext(nn) NSEL,A,NODE,,n_pilot_01 E,nn,n_pilot_01 NSEL,U,NODE,,n_pilot_01 *ENDDO !--------------------------------------------------------------------------------------------------------------------------- CMSEL,S,CYLIN,AREA NSLA,S,1 NSEL,R,LOC,Y,-100 *GET,target_node,NODE,,COUNT nn = 0 TYPE,4 REAL,4 MAT,4 *DO,i,1,target_node nn = ndnext(nn) NSEL,A,NODE,,n_pilot_02 E,nn,n_pilot_02 NSEL,U,NODE,,n_pilot_02 *ENDDO ALLSEL NSEL,S,NODE,,n_pilot_01 NSEL,A,NODE,,n_pilot_02 D,ALL,ALL ALLSEL !--------------------------------------------------------------------------------------------------------------------------- !---------------------------------------------- CONTA174_mesh_definition --------------------------------------------------- !--------------------------------------------------------------------------------------------------------------------------- TYPE,2 REAL,3 ESEL,S,REAL,,1 CM,PLATE,ELEM CMSEL,S,PLATE,ELEM ESURF ALLSEL !--------------------------------------------------------------------------------------------------------------------------- !---------------------------------------------- TARGE170_mesh_definition --------------------------------------------------- !--------------------------------------------------------------------------------------------------------------------------- TYPE,3 ESEL,S,REAL,,2 CM,CYLIN_ELEM,ELEM CMSEL,S,CYLIN_ELEM,ELEM ESURF ALLSEL !--------------------------------------------------------------------------------------------------------------------------- !------------------------------------------------ boundary conditions ------------------------------------------------------ !--------------------------------------------------------------------------------------------------------------------------- ASEL,S,AREA,,1 NSLA,S,1 NSEL,R,LOC,X,0 D,ALL,UX D,ALL,UY D,ALL,ROTX D,ALL,ROTY D,ALL,ROTZ ALLSEL EPLOT FINISH !--------------------------------------------------------------------------------------------------------------------------- !------------------------------------------------------ solution ----------------------------------------------------------- !--------------------------------------------------------------------------------------------------------------------------- /SOLU !--------------------------------------------------------------------------------------------------------------------------- !------------------------------------------------ solution definition ------------------------------------------------------ !--------------------------------------------------------------------------------------------------------------------------- SAVE,Probekoerper,db,,ALL RESCONTROL,,ALL,ALL ANTYPE,STATIC NLGEOM,ON SOLCONTROL,ON AUTOTS,ON OUTRES,ALL,ALL ACEL,0,0,9810 TIME,1 NSUBST,50,200,10 SOLVE FINISH