Open source implementation of a user material subroutine for composite materials