bugfix in hqpe.sc.m.F (close(if_eseavr) instead of isx=iclose(if_eseavr))