1 /* mod13A2 Adjacent cloud detected 1Km bit[8] 2 * 00 -> class 0: No 3 * 01 -> class 1: Yes 4 */ 5 6 #include <grass/raster.h> 7 mod13A2d(CELL pixel)8CELL mod13A2d (CELL pixel) 9 { 10 CELL qctemp; 11 12 pixel >>= 8; /*bit [8] becomes [0] */ 13 qctemp = pixel & 0x01; 14 15 return qctemp; 16 } 17 18 19