Hello everyone,
I have to use an hysteretic friction model. I am trying to code this in Abaqus by using the FRIC subroutine. The language is Fortran 77.
I am testing my code on a very simple model : two plates sliding on eachother. I apply a 1 cycle sinus displacement at the end of one plate and a apply some boundaries at the other side.
The model works fine in loading, but it I want it change when unloading. I am trying to check for slip reversal at the end of loading but it does not seem to work. I have tried many other things but I cannot obtain a proper hysteresis loop...I always have a "jump" in the contact shear stress at the reversal point.
I have attached a view of the model and of the hysteresis curve, and the subroutine file.
Any help would be very appreciated !
Thanks.
Rémi
- Badges
- Science topic