program hcore_guess_prog
 call hcore_guess
end