Find single peak in image and update SRCPOS in header
input image (nrow, ncol)
FITS header to update
find_source()