calc_blr()