ChatGPT, write me a Fortran subroutine that adds mortar tie constraints to a global finite element system using the penalty method that doesn't unduly impact the stable time increment in a finite element simulation using explicit time integr