*HEADING : SIMPLE CONTACT TEST, FINITE SLIDING CONTACT WITHOUT FRICTION, RIGID ** Contact Features Tested: ** *FRICTION, *CHANGE FRICTION (mu=0 and mu=0.3) *NODE 1, 0.5, 0. 2, 5.5, 0. 3, 0.5, 5. 4, 5.5, 5. 1000, 0., 0. *ELEMENT,TYPE=CAX4,ELSET=SOLID 1, 1,2,4,3 *SOLID SECTION,ELSET=SOLID,MATERIAL=SOLMAT *MATERIAL,NAME=SOLMAT *ELASTIC 30.E6,.3 *DENSITY 10., *DAMPING, ALPHA=0.1 *rigid body,analytical surface=BSURF,REFNODE=1000 *surface,TYPE=SEGMENTS,NAME=BSURF START,0. , 0. LINE, 6. , 0. *surface,NAME=ASURF SOLID,S1 *CONTACT PAIR,INTERACTION=SMOOTH ASURF,BSURF *SURFACE INTERACTION,NAME=SMOOTH *FRICTION 0.0, *EQUATION 2, 3,2,1., 4,2,-1. *BOUNDARY 1,1 3,1 1000,1,2 1000,6 *STEP *STATIC *CONTACT PRINT,SECONDARY=ASURF *EL PRINT S, *NODE PRINT,FREQ=0 *DLOAD 1,P3,250. *END STEP *STEP,NLGEOM LARGE DISPLACEMENT ANALYSIS *STATIC .5,1. *DLOAD 1,P3,250 *OUTPUT,FIELD *NODE OUTPUT U, *ELEMENT OUTPUT S, *CONTACT OUTPUT,VARIABLE=PRESELECT,SECONDARY=ASURF *END STEP ** ** step 3: change surface friction ** *STEP,NLGEOM *STATIC 1.0,1.0 *CHANGE FRICTION,INTERACTION=SMOOTH *FRICTION 0.3, *ENDSTEP ** ** step 4: slide to the left w/ friction ** *STEP,NLGEOM *STATIC *BOUNDARY 3,1,,0.1 4,1,,0.1 *CONTACT PRINT,SECONDARY=ASURF,MAIN=BSURF *PRINT,CONTACT=YES *ENDSTEP ** ** step 5: Steady state dynamics, direct analysis ** *STEP *STEADY STATE DYNAMICS,DIRECT 20,80,5 *DLOAD 1,P3,250. *BOUNDARY 1,1 3,1 1000,1,2 1000,6 *OUTPUT,FIELD *NODE OUTPUT U, RF, *ELEMENT OUTPUT E, S, *CONTACT OUTPUT,VARIABLE=PRESELECT,SECONDARY=ASURF *END STEP ** ** step 6: frequency extraction ->all modes are extracted ** *STEP *FREQUENCY,EIGENSOLVER=LANCZOS, SIM=NO 2,,,, *BOUNDARY 1,1 3,1 1000,1,2 1000,6 *NODE PRINT,F=0 *EL PRINT,F=0 *END STEP ** ** step 7: complex eigenvalue extraction - tests modal analysis following ** complex eigensolver ** *STEP *COMPLEX FREQUENCY *END STEP ** ** step 8: Steady state dynamics, subspace projection ** *STEP *STEADY STATE DYNAMICS,SUBSPACE PROJECTION,INTERVAL=RANGE 20,80,5 *DLOAD 1,P3,250. *OUTPUT,FIELD *NODE OUTPUT U, RF, *ELEMENT OUTPUT S, E, *CONTACT OUTPUT,VARIABLE=PRESELECT,SECONDARY=ASURF *END STEP