untitled2.bak

能够读取卫星数据ldf文件格式

function bm_ratio, b1, b2, check=check
  NDVI_float= (float(b1) - float(b2)) / (float(b1) + float(b2))
 ; if (NDVI_float LE 0.0 AND b2 LE 0.110 ) then NDVI_float = FLOAT( 0.000 )
 b1 = BYTSCL(NDVI_float, min = -1.0, max = 1.0)
  return, b1
end