00001 /* the second part was added to deal with jet impact */ 00002 #define INP(i,j) (ap[i][j] > 0.5 \ 00003 /* || (i == 27 && j == 2 && ap[i-1][2] > 0.5 && ap[i+1][2] > 0.5)*/) 00004 #define INU(i,j) (INP(i,j) || INP(i-1,j)) 00005 #define INV(i,j) (INP(i,j) || INP(i,j-1)) 00006 #define BU(i,j) (INU(i+1,j) || INU(i-1,j) || INU(i,j+1) || INU(i,j-1) || \ 00007 INV(i,j) || INV(i,j+1) || INV(i-1,j) || INV(i-1,j+1)) 00008 #define BV(i,j) (INV(i+1,j) || INV(i-1,j) || INV(i,j+1) || INV(i,j-1) || \ 00009 INU(i,j) || INU(i+1,j) || INU(i,j-1) || INU(i+1,j-1)) 00010 00011 #define UNDEFINED 1000