removed fortran HF code