Abaqus VFRIC Subroutine

[snlg94]

Dear all,

Currently I am trying to model a contact between two plates. For this purpose I have a VFRIC subroutine written by using Fortran. In my model friction coefficient depends on some variables and one of these variables need to decrease by time. What I want to know is, how can I define a variable in my VFRIC or maybe in Abaqus CAE, which decreases by time? The other variables are already defined by props. I would appreciate any kind of help. Moreover, I am open to book/article suggestions about subroutines, depvar etc. Although I am using Abaqus for some time, I am quite new at Subroutine that is why I am a bit confused.

Best regards,

 

[Mustaine3]

The values of the step time and total time are passed into the subroutine and can be used as you like. Have a look at the documentation of VFRIC.

 

[snlg94]

Hi Mustaine3, thank you for your reply. I already checked the documentation. However; it is still not clear to me. This is the code, I have. Here the variable m needs to decrease by time. How can I define it as a function of time?

if (p.LT.p_crit) p=p_crit
if (v.LT.v_crit) v=v_crit
if (t.LT.t_crit) t=t_crit
KontMu(jConSlvUid(1,k))=c*p**p_exp
* *v**v_exp
* *t**t_exp
* *m**m_exp
ft = min ( KontMu(jConSlvUid(1,k))*fNormal(k),
* fStickForce(k) )
fTangential(1,k) = -ft
fTangential(2,k) = 0.0
else
KontMu(jConSlvUid(1,k)) = 0.0
end if
KurentNodeInc(jConSlvUid(1,k))=jFlags(2)
KurentNodeStep(jConSlvUid(1,k))=jFlags(1)
end do
end if
return
end