Changed subroutine because it didn't work and changed FH names