void CalcMaxLoc<Type,TypeBase,Compare>::FiltrMaxLoc_BCVS ( ElSTDNS vector<Pt2di> & Pts, Im2D<Type,TypeBase> Im, REAL FactInf, REAL TolGeom, Pt2di SzVois, Im2D_U_INT1 Marq ) { Pt2di SzIm = Inf(Im.sz(),Marq.sz()); Box2di BoxIm(Pt2di(0,0),SzIm); Marq.raz(); mBufFiltr.clear(); INT4 ** dIm = Im.data(); for (INT kp1=0; kp1<(INT)Pts.size() ; kp1++) { ELISE_ASSERT ( BoxIm.contains(Pts[kp1]), "GenMaxLoc::FiltrMaxLoc_BCVS" ); } { for (INT kp1=0; kp1<(INT)Pts.size() ; kp1++) { Pt2di p1 = Pts[kp1]; Box2di BoxP1(p1-SzVois,p1+SzVois); INT v1 = dIm[p1.y][p1.x]; INT Vinf = round_up(v1*FactInf); bool Refut = false; for (INT kp2=0 ; (kp2<(INT)Pts.size())&&(!Refut) ; kp2++) { Pt2di p2 = Pts[kp2]; if ( (kp1!= kp2) && CmpTot(v1,dIm[p2.y][p2.x],p1,p2) && BoxP1.contains(p2) && BandeConnectedVsup(p1,p2,Im,Vinf,TolGeom,Marq) ) Refut = true; } if (! Refut) mBufFiltr.push_back(p1); } } Pts = mBufFiltr; }
Im2_Pts_in_Comp<Type>::Im2_Pts_in_Comp ( Im2D<Type,Type> im, const Arg_Flux_Pts_Comp & arg ) : Std_Flux_Of_Points<Type>(im.ty(),arg.sz_buf()), _im (im), _data (im.data()), _ind (0), _nb_pts (im.tx()) { }
void dist_chamfer_cabl(Im2D<U_INT1,INT> I,INT v_max) { Im2D<U_INT1,INT> I0(I.tx(),I.ty(),0); ELISE_COPY(I0.all_pts(),I.in(),I0.out()); Chamfer::d32.im_dist(I); INT nb_dif; ELISE_COPY ( I.all_pts(), I0.in()!=(I.in()!=0), sigma(nb_dif) ); BENCH_ASSERT(nb_dif == 0); INT tx = I.tx(); INT ty = I.ty(); U_INT1 ** d = I.data(); INT vmax = I.vmax()-1; for (int x=1; x<tx-1 ; x++) for (int y=1; y<ty-1 ; y++) { INT v; if (d[y][x]) v = std::min3 ( std::min3(d[y+1][x-1]+3,d[y+1][x]+2,d[y+1][x+1]+3), std::min3(d[y][x-1]+2,vmax,d[y][x+1]+2), std::min3(d[y-1][x-1]+3,d[y-1][x]+2,d[y-1][x+1]+3) ); else v = 0; BENCH_ASSERT(v == d[y][x]); } INT dif; ELISE_COPY ( I.all_pts(), Abs ( Min(I.in(),v_max) - extinc_32(I0.in(0),v_max) ), VMax(dif) ); BENCH_ASSERT(dif == 0); }
bool CalcMaxLoc<Type,TypeBase,Compare>::BandeConnectedVsup ( Pt2di p1, Pt2di p2, Im2D<Type,TypeBase> Im, Type VInf, REAL Tol, Im2D_U_INT1 Marq ) { if (p1==p2) return true; Pt2di Sz = Inf(Im.sz(),Marq.sz()); Box2di Box(Pt2di(0,0), Sz); if (!(Box.contains(p1) && Box.contains(p2))) return false; U_INT1 ** dMarq = Marq.data(); Type ** dIm = Im.data(); mBufCC.clear(); mBufCC.push_back(p1); dMarq[p1.y][p1.x] = 1; Pt2dr aPR1(p1.x,p1.y); Pt2dr aPR2(p2.x,p2.y); SegComp seg12(aPR1,aPR2); bool got = false; for (INT kBuf=0 ; (kBuf!=(INT)mBufCC.size()) && (! got) ; kBuf++) { Pt2di pBuf = mBufCC[ kBuf]; for (INT kV=0 ; kV< 8; kV++) { Pt2di pVois = pBuf + TAB_8_NEIGH[kV]; if ( Box.contains(pVois) && (dMarq[pVois.y][pVois.x] == 0) && (! mCmp(dIm[pVois.y][pVois.x],VInf)) && (seg12.BoxContains(Pt2dr(pVois),1.0,Tol)) ) { if (pVois==p2) got = true; dMarq[pVois.y][pVois.x] = 1; mBufCC.push_back(pVois); } } } { for (INT kBuf=0 ; kBuf<(INT)mBufCC.size() ; kBuf++) { Pt2di pBuf = mBufCC[ kBuf]; dMarq[pBuf.y][pBuf.x] = 0; } } return got; }
void CalcMaxLoc<Type,TypeBase,Compare>::AllMaxLoc ( ElSTDNS vector<Pt2di> &res, Im2D<Type,TypeBase> Im, Pt2di Vois, Pt2di p0, Pt2di p1, TypeBase vMin ) { Pt2di Sz(Im.tx(),Im.ty()); Vois.x = ElAbs(Vois.x); Vois.y = ElAbs(Vois.y); pt_set_min_max(p0,p1); p0 = Sup(p0,Vois); p1 = Inf(p1,Sz-Vois); if ((p1.x<=p0.x) || (p1.y <= p0.y)) return; INT dlx = Vois.x; INT dly = Vois.y; Type ** data = Im.data(); res.clear(); ElSTDNS vector<Pt3di> & OVois = OrdVois(Vois); for (INT Y0=p0.y ; Y0<p1.y ; Y0+=dly) { INT Y1 = ElMin(p1.y,Y0+dly); for (INT X0=p0.x ; X0<p1.x ; X0+=dlx) { INT X1 = ElMin(p1.x,X0+dlx); Type vMax = vMin; INT xMax = DefXY; INT yMax = DefXY; for (INT y=Y0; y<Y1 ; y++) { for (INT x=X0; x<X1 ; x++) { if (mCmp((TypeBase)vMax,(TypeBase)data[y][x])) { xMax = x; yMax = y; vMax = data[y][x]; } } } if (xMax != DefXY) { bool IsMax = true; for ( std::vector<Pt3di> ::iterator itOV = OVois.begin(); IsMax &&(itOV != OVois.end()); itOV++ ) { Type aVal = data[yMax+itOV->y][xMax+itOV->x]; if (itOV->z) { if (!mCmp((TypeBase)aVal,(TypeBase)vMax)) IsMax = false; } else { if (mCmp((TypeBase)vMax,(TypeBase)aVal)) IsMax = false; } } if (IsMax) { res.push_back(Pt2di(xMax,yMax)); } } } } }
FoncATrou_OPB_Comp<Type>::FoncATrou_OPB_Comp ( Liste_Pts<Type,INT> l, INT X0, INT X1, INT Y0, INT Y1 ) : _values (1,1), _l (1), _cpt (NEW_VECTEUR(Y0,Y1+1,INT)), _dim_vals (l.dim()-2) { INT k; set_cste(_cpt+Y0,0,Y1-Y0+1); Im2D<Type,INT> XYV = l.image(); INT nb_pts = 0; Type * tx = XYV.data()[0]; Type * ty = XYV.data()[1]; Type ** xyv = XYV.data(); //---- filtre les pts hors du rectangle --------- INT dim = XYV.ty(); { INT nb_pts_tot = XYV.tx(); for( k=0; k<nb_pts_tot; k++) if ( (tx[k]>=X0) && (tx[k]< X1) && (ty[k]>=Y0) && (ty[k]< Y1) ) { for(INT d=0; d<dim; d++) xyv[d][nb_pts] = xyv[d][k]; nb_pts++; } } //--------- histo en Y + cumule ----------------------- for( k=0; k<nb_pts; k++) _cpt[ty[k]]++; for (INT y = Y0+1; y<=Y1; y++) _cpt[y] += _cpt[y-1]; //---------------- range en y croissant ---------------- _values = Im2D<Type,INT> (nb_pts,_dim_vals+1); _tx = _values.data()[0]; _v = _values.data()+1; for( k=0; k<nb_pts ; k++) { INT adr = --_cpt[ty[k]]; _tx[adr] = tx[k]; for (INT d = 0; d<_dim_vals; d++) _v[d][adr] = xyv[d+2][k]; } }