procedure for modifed x0kf_v4h in hx0fp0.m.F
add procedure for nmbas==1 .and. symmetrize in x0kf_v4h.F