SUBROUTINE rep_matrix
      RETURN
      END SUBROUTINE rep_matrix