& + (KbryanLewisEQ-KbryanLewis79)*BL79LatArray(i,j,bi,bj)
_RL KbryanLewisEQ
KbryanLewisEQ=diffKrBLEQsurf+(diffKrBLEQdeep-diffKrBLEQsurf)