source: trunk/WRF.COMMON/WRFV3/external/io_grib1/WGRIB/bms.h

Last change on this file was 2759, checked in by aslmd, 2 years ago

adding unmodified code from WRFV3.0.1.1, expurged from useless data +1M size

File size: 425 bytes
Line 
1/* version 1.2 of grib headers  w. ebisuzaki */
2
3#define BMS_LEN(bms)            ((bms) == NULL ? 0 : (bms[0]<<16)+(bms[1]<<8)+bms[2])
4#define BMS_UnusedBits(bms)     ((bms) == NULL ? 0 : bms[3])
5#define BMS_StdMap(bms)         ((bms) == NULL ? 0 : ((bms[4]<<8) + bms[5]))
6#define BMS_bitmap(bms)         ((bms) == NULL ? NULL : (bms)+6)
7#define BMS_nxny(bms)           ((((bms) == NULL) || BMS_StdMap(bms)) \
8        ? 0 : (BMS_LEN(bms)*8 - 48 - BMS_UnusedBits(bms)))
Note: See TracBrowser for help on using the repository browser.