Corefinding subroutine added