calculating a bearing