source: trunk/WRF.COMMON/WRFV2/external/io_grib1/WGRIB/bms.h @ 3567

Last change on this file since 3567 was 11, checked in by aslmd, 14 years ago

spiga@svn-planeto:ajoute le modele meso-echelle martien

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.