program core_integrals
  implicit none
  BEGIN_DOC
! TODO
  END_DOC
  print*,'core energy = ',core_energy 
end