Hi everyone
Im having trouble creating  anisotropic coulomb friction model with user subroutine FRIC
I found a technical document containing information on how to create  isotropic coulomb friction model using  user subroutine FRIC.
I tried to modify this model to anisotropic friction model with help of "abaqus theory manaual - coulomb friction - anisotoropic friction" 

attached picture shows strain energy achieved from technical document input file, using embedded anisotropic model in abaqus instead of FRIC (friction coefficient 0.3 , 1, elastic slip 0.005 ). 
 

I tried to achieve same result with modified code but my result is not even close.

I'm attaching HSK technical document , there are input script for abaqus and code for 3D isotropic coulomb friction. 
I'm also attaching code that i have modified.

It will be the best If someone can give the working  anisotropic coulomb friction model.If someone can direct me in correct direction with any tip, it will be also great

Thank you very much