first impl calcHarr