struct DSBB
{   char id[4];
    short nx,ny;
    double  xlo,xhi, ylo,yhi, zlo,zhi;
    float data[]; // comeau
};
DSBB header={ {"DSBB"} // MinGW comeau
                     ,1201,1201,0,1201,0,1201,0,1201};