r1610 modify heat source bc [ver 1.6.7]