-from HYDROPy import *
+from HYDROPy import *
from PyQt5.QtCore import *
from PyQt5.QtGui import *
ST.SetAttrName( "CODE_06" )
-ST.Set( u"Pelouses et pâturages naturels", 1.0321 )
-ST.SetAttrValue( u"Pelouses et pâturages naturels", "321" )
-ST.SetColor( u"Pelouses et pâturages naturels", QColor( 204, 242, 77 ) )
+ST.Set( u"Pelouses et pâturages naturels", 31 )
+ST.SetAttrValue( u"Pelouses et pâturages naturels", "321" )
+ST.SetColor( u"Pelouses et pâturages naturels", QColor( 204, 242, 77 ) )
-ST.Set( u"Aéroports", 1.0124 )
-ST.SetAttrValue( u"Aéroports", "124" )
-ST.SetColor( u"Aéroports", QColor( 230, 204, 230 ) )
+ST.Set( u"Aéroports", 43 )
+ST.SetAttrValue( u"Aéroports", "124" )
+ST.SetColor( u"Aéroports", QColor( 230, 204, 230 ) )
-ST.Set( u"Systèmes culturaux et parcellaires complexes", 1.0242 )
-ST.SetAttrValue( u"Systèmes culturaux et parcellaires complexes", "242" )
-ST.SetColor( u"Systèmes culturaux et parcellaires complexes", QColor( 255, 230, 77 ) )
+ST.Set( u"Systèmes culturaux et parcellaires complexes", 19 )
+ST.SetAttrValue( u"Systèmes culturaux et parcellaires complexes", "242" )
+ST.SetColor( u"Systèmes culturaux et parcellaires complexes", QColor( 255, 230, 77 ) )
-ST.Set( u"Cultures annuelles associées à des cultures permanentes", 1.0241 )
-ST.SetAttrValue( u"Cultures annuelles associées à des cultures permanentes", "241" )
-ST.SetColor( u"Cultures annuelles associées à des cultures permanentes", QColor( 255, 230, 166 ) )
+ST.Set( u"Cultures annuelles associées à des cultures permanentes", 27 )
+ST.SetAttrValue( u"Cultures annuelles associées à des cultures permanentes", "241" )
+ST.SetColor( u"Cultures annuelles associées à des cultures permanentes", QColor( 255, 230, 166 ) )
-ST.Set( u"Forêt et végétation arbustive en mutation", 1.0324 )
-ST.SetAttrValue( u"Forêt et végétation arbustive en mutation", "324" )
-ST.SetColor( u"Forêt et végétation arbustive en mutation", QColor( 166, 242, 0 ) )
+ST.Set( u"Forêt et végétation arbustive en mutation", 9 )
+ST.SetAttrValue( u"Forêt et végétation arbustive en mutation", "324" )
+ST.SetColor( u"Forêt et végétation arbustive en mutation", QColor( 166, 242, 0 ) )
-ST.Set( u"Décharges", 1.0132 )
-ST.SetAttrValue( u"Décharges", "132" )
-ST.SetColor( u"Décharges", QColor( 166, 77, 0 ) )
+ST.Set( u"Décharges", 21 )
+ST.SetAttrValue( u"Décharges", "132" )
+ST.SetColor( u"Décharges", QColor( 166, 77, 0 ) )
-ST.Set( u"Végétation clairsemée", 1.0333 )
-ST.SetAttrValue( u"Végétation clairsemée", "333" )
-ST.SetColor( u"Végétation clairsemée", QColor( 204, 255, 204 ) )
+ST.Set( u"Végétation clairsemée", 43 )
+ST.SetAttrValue( u"Végétation clairsemée", "333" )
+ST.SetColor( u"Végétation clairsemée", QColor( 204, 255, 204 ) )
-ST.Set( u"Prairies et autres surfaces toujours en herbe à usage agricole", 1.0231 )
-ST.SetAttrValue( u"Prairies et autres surfaces toujours en herbe à usage agricole", "231" )
-ST.SetColor( u"Prairies et autres surfaces toujours en herbe à usage agricole", QColor( 230, 230, 77 ) )
+ST.Set( u"Prairies et autres surfaces toujours en herbe à usage agricole", 33 )
+ST.SetAttrValue( u"Prairies et autres surfaces toujours en herbe à usage agricole", "231" )
+ST.SetColor( u"Prairies et autres surfaces toujours en herbe à usage agricole", QColor( 230, 230, 77 ) )
-ST.Set( u"Périmètres irrigués en permanence", 1.0212 )
-ST.SetAttrValue( u"Périmètres irrigués en permanence", "212" )
-ST.SetColor( u"Périmètres irrigués en permanence", QColor( 255, 255, 0 ) )
+ST.Set( u"Périmètres irrigués en permanence", 43 )
+ST.SetAttrValue( u"Périmètres irrigués en permanence", "212" )
+ST.SetColor( u"Périmètres irrigués en permanence", QColor( 255, 255, 0 ) )
-ST.Set( u"Plans d'eau", 1.0512 )
+ST.Set( u"Plans d'eau", 90 )
ST.SetAttrValue( u"Plans d'eau", "512" )
ST.SetColor( u"Plans d'eau", QColor( 128, 242, 230 ) )
-ST.Set( u"Territoires agroforestiers", 1.0244 )
+ST.Set( u"Territoires agroforestiers", 14 )
ST.SetAttrValue( u"Territoires agroforestiers", "244" )
ST.SetColor( u"Territoires agroforestiers", QColor( 242, 204, 166 ) )
-ST.Set( u"Forêts mélangées", 1.0313 )
-ST.SetAttrValue( u"Forêts mélangées", "313" )
-ST.SetColor( u"Forêts mélangées", QColor( 77, 255, 0 ) )
+ST.Set( u"Forêts mélangées", 10 )
+ST.SetAttrValue( u"Forêts mélangées", "313" )
+ST.SetColor( u"Forêts mélangées", QColor( 77, 255, 0 ) )
-ST.Set( u"Glaciers et neiges éternelles", 1.0335 )
-ST.SetAttrValue( u"Glaciers et neiges éternelles", "335" )
-ST.SetColor( u"Glaciers et neiges éternelles", QColor( 166, 230, 204 ) )
+ST.Set( u"Glaciers et neiges éternelles", 75 )
+ST.SetAttrValue( u"Glaciers et neiges éternelles", "335" )
+ST.SetColor( u"Glaciers et neiges éternelles", QColor( 166, 230, 204 ) )
-ST.Set( u"Plages, dunes et sable", 1.0331 )
+ST.Set( u"Plages, dunes et sable", 39 )
ST.SetAttrValue( u"Plages, dunes et sable", "331" )
ST.SetColor( u"Plages, dunes et sable", QColor( 230, 230, 230 ) )
-ST.Set( u"Zones incendiées", 1.0334 )
-ST.SetAttrValue( u"Zones incendiées", "334" )
-ST.SetColor( u"Zones incendiées", QColor( 0, 0, 0 ) )
+ST.Set( u"Zones incendiées", 65 )
+ST.SetAttrValue( u"Zones incendiées", "334" )
+ST.SetColor( u"Zones incendiées", QColor( 0, 0, 0 ) )
-ST.Set( u"Tissu urbain continu", 1.0111 )
+ST.Set( u"Tissu urbain continu", 15 )
ST.SetAttrValue( u"Tissu urbain continu", "111" )
ST.SetColor( u"Tissu urbain continu", QColor( 230, 0, 77 ) )
-ST.Set( u"Chantiers", 1.0133 )
+ST.Set( u"Chantiers", 17 )
ST.SetAttrValue( u"Chantiers", "133" )
ST.SetColor( u"Chantiers", QColor( 255, 77, 255 ) )
-ST.Set( u"Estuaires", 1.0522 )
+ST.Set( u"Estuaires", 98 )
ST.SetAttrValue( u"Estuaires", "522" )
ST.SetColor( u"Estuaires", QColor( 166, 255, 230 ) )
-ST.Set( u"Marais maritimes", 1.0421 )
+ST.Set( u"Marais maritimes", 74 )
ST.SetAttrValue( u"Marais maritimes", "421" )
ST.SetColor( u"Marais maritimes", QColor( 204, 204, 255 ) )
-ST.Set( u"Forêts de conifères", 1.0312 )
-ST.SetAttrValue( u"Forêts de conifères", "312" )
-ST.SetColor( u"Forêts de conifères", QColor( 0, 166, 0 ) )
+ST.Set( u"Forêts de conifères", 13 )
+ST.SetAttrValue( u"Forêts de conifères", "312" )
+ST.SetColor( u"Forêts de conifères", QColor( 0, 166, 0 ) )
-ST.Set( u"Surfaces essentiellement agricoles, interrompues par des espaces naturels importants", 1.0243 )
+ST.Set( u"Surfaces essentiellement agricoles, interrompues par des espaces naturels importants", 16 )
ST.SetAttrValue( u"Surfaces essentiellement agricoles, interrompues par des espaces naturels importants", "243" )
ST.SetColor( u"Surfaces essentiellement agricoles, interrompues par des espaces naturels importants", QColor( 230, 204, 77 ) )
-ST.Set( u"Tourbières", 1.0412 )
-ST.SetAttrValue( u"Tourbières", "412" )
-ST.SetColor( u"Tourbières", QColor( 77, 77, 255 ) )
+ST.Set( u"Tourbières", 65 )
+ST.SetAttrValue( u"Tourbières", "412" )
+ST.SetColor( u"Tourbières", QColor( 77, 77, 255 ) )
-ST.Set( u"Extraction de matériaux", 1.0131 )
-ST.SetAttrValue( u"Extraction de matériaux", "131" )
-ST.SetColor( u"Extraction de matériaux", QColor( 166, 0, 204 ) )
+ST.Set( u"Extraction de matériaux", 19 )
+ST.SetAttrValue( u"Extraction de matériaux", "131" )
+ST.SetColor( u"Extraction de matériaux", QColor( 166, 0, 204 ) )
-ST.Set( u"Réseaux routier et ferroviaire et espaces associés", 1.0122 )
-ST.SetAttrValue( u"Réseaux routier et ferroviaire et espaces associés", "122" )
-ST.SetColor( u"Réseaux routier et ferroviaire et espaces associés", QColor( 204, 0, 0 ) )
+ST.Set( u"Réseaux routier et ferroviaire et espaces associés", 35 )
+ST.SetAttrValue( u"Réseaux routier et ferroviaire et espaces associés", "122" )
+ST.SetColor( u"Réseaux routier et ferroviaire et espaces associés", QColor( 204, 0, 0 ) )
-ST.Set( u"Mers et océans", 1.0523 )
-ST.SetAttrValue( u"Mers et océans", "523" )
-ST.SetColor( u"Mers et océans", QColor( 230, 242, 255 ) )
+ST.Set( u"Mers et océans", 99 )
+ST.SetAttrValue( u"Mers et océans", "523" )
+ST.SetColor( u"Mers et océans", QColor( 230, 242, 255 ) )
-ST.Set( u"Equipements sportifs et de loisirs", 1.0142 )
+ST.Set( u"Equipements sportifs et de loisirs", 40 )
ST.SetAttrValue( u"Equipements sportifs et de loisirs", "142" )
ST.SetColor( u"Equipements sportifs et de loisirs", QColor( 255, 230, 255 ) )
-ST.Set( u"Forêts de feuillus", 1.0311 )
-ST.SetAttrValue( u"Forêts de feuillus", "311" )
-ST.SetColor( u"Forêts de feuillus", QColor( 128, 255, 0 ) )
+ST.Set( u"Forêts de feuillus", 9 )
+ST.SetAttrValue( u"Forêts de feuillus", "311" )
+ST.SetColor( u"Forêts de feuillus", QColor( 128, 255, 0 ) )
-ST.Set( u"Vergers et petits fruits", 1.0222 )
+ST.Set( u"Vergers et petits fruits", 25 )
ST.SetAttrValue( u"Vergers et petits fruits", "222" )
ST.SetColor( u"Vergers et petits fruits", QColor( 242, 166, 77 ) )
-ST.Set( u"Végétation sclérophylle", 1.0323 )
-ST.SetAttrValue( u"Végétation sclérophylle", "323" )
-ST.SetColor( u"Végétation sclérophylle", QColor( 166, 230, 77 ) )
+ST.Set( u"Végétation sclérophylle", 10 )
+ST.SetAttrValue( u"Végétation sclérophylle", "323" )
+ST.SetColor( u"Végétation sclérophylle", QColor( 166, 230, 77 ) )
-ST.Set( u"Landes et broussailles", 1.0322 )
+ST.Set( u"Landes et broussailles", 12 )
ST.SetAttrValue( u"Landes et broussailles", "322" )
ST.SetColor( u"Landes et broussailles", QColor( 166, 255, 128 ) )
-ST.Set( u"Tissu urbain discontinu", 1.0112 )
+ST.Set( u"Tissu urbain discontinu", 32 )
ST.SetAttrValue( u"Tissu urbain discontinu", "112" )
ST.SetColor( u"Tissu urbain discontinu", QColor( 255, 0, 0 ) )
-ST.Set( u"Cours et voies d'eau", 1.0511 )
+ST.Set( u"Cours et voies d'eau", 88 )
ST.SetAttrValue( u"Cours et voies d'eau", "511" )
ST.SetColor( u"Cours et voies d'eau", QColor( 0, 204, 242 ) )
-ST.Set( u"Oliveraies", 1.0223 )
+ST.Set( u"Oliveraies", 26 )
ST.SetAttrValue( u"Oliveraies", "223" )
ST.SetColor( u"Oliveraies", QColor( 230, 166, 0 ) )
-ST.Set( u"Vignobles", 1.0221 )
+ST.Set( u"Vignobles", 24 )
ST.SetAttrValue( u"Vignobles", "221" )
ST.SetColor( u"Vignobles", QColor( 230, 128, 0 ) )
-ST.Set( u"Rizières", 1.0213 )
-ST.SetAttrValue( u"Rizières", "213" )
-ST.SetColor( u"Rizières", QColor( 230, 230, 0 ) )
+ST.Set( u"Rizières", 42 )
+ST.SetAttrValue( u"Rizières", "213" )
+ST.SetColor( u"Rizières", QColor( 230, 230, 0 ) )
-ST.Set( u"Zones portuaires", 1.0123 )
+ST.Set( u"Zones portuaires", 45 )
ST.SetAttrValue( u"Zones portuaires", "123" )
ST.SetColor( u"Zones portuaires", QColor( 230, 204, 204 ) )
-ST.Set( u"Zones industrielles ou commerciales et installations publiques", 1.0121 )
+ST.Set( u"Zones industrielles ou commerciales et installations publiques", 30 )
ST.SetAttrValue( u"Zones industrielles ou commerciales et installations publiques", "121" )
ST.SetColor( u"Zones industrielles ou commerciales et installations publiques", QColor( 204, 77, 242 ) )
-ST.Set( u"Marais salants", 1.0422 )
+ST.Set( u"Marais salants", 73 )
ST.SetAttrValue( u"Marais salants", "422" )
ST.SetColor( u"Marais salants", QColor( 230, 230, 255 ) )
-ST.Set( u"Marais intérieurs", 1.0411 )
-ST.SetAttrValue( u"Marais intérieurs", "411" )
-ST.SetColor( u"Marais intérieurs", QColor( 166, 166, 255 ) )
+ST.Set( u"Marais intérieurs", 60 )
+ST.SetAttrValue( u"Marais intérieurs", "411" )
+ST.SetColor( u"Marais intérieurs", QColor( 166, 166, 255 ) )
-ST.Set( u"Espaces verts urbains", 1.0141 )
+ST.Set( u"Espaces verts urbains", 25 )
ST.SetAttrValue( u"Espaces verts urbains", "141" )
ST.SetColor( u"Espaces verts urbains", QColor( 255, 166, 255 ) )
-ST.Set( u"Lagunes littorales", 1.0521 )
+ST.Set( u"Lagunes littorales", 95 )
ST.SetAttrValue( u"Lagunes littorales", "521" )
ST.SetColor( u"Lagunes littorales", QColor( 0, 255, 166 ) )
-ST.Set( u"Roches nues", 1.0332 )
+ST.Set( u"Roches nues", 45 )
ST.SetAttrValue( u"Roches nues", "332" )
ST.SetColor( u"Roches nues", QColor( 204, 204, 204 ) )
-ST.Set( u"Terres arables hors périmètres d'irrigation", 1.0211 )
-ST.SetAttrValue( u"Terres arables hors périmètres d'irrigation", "211" )
-ST.SetColor( u"Terres arables hors périmètres d'irrigation", QColor( 255, 255, 168 ) )
+ST.Set( u"Terres arables hors périmètres d'irrigation", 31 )
+ST.SetAttrValue( u"Terres arables hors périmètres d'irrigation", "211" )
+ST.SetColor( u"Terres arables hors périmètres d'irrigation", QColor( 255, 255, 168 ) )
-ST.Set( u"Zones intertidales", 1.0423 )
+ST.Set( u"Zones intertidales", 75 )
ST.SetAttrValue( u"Zones intertidales", "423" )
ST.SetColor( u"Zones intertidales", QColor( 166, 166, 230 ) )
#include <QGraphicsView>
#include <QPixmap>
#include <QApplication>
+#include <QTest>
const double EPS = 1E-3;
CPPUNIT_ASSERT_EQUAL( 3, (int)distances.size() );
CPPUNIT_ASSERT_DOUBLES_EQUAL( 0.0, distances[0], EPS );
- CPPUNIT_ASSERT_DOUBLES_EQUAL( 43.499, distances[1], EPS );
- CPPUNIT_ASSERT_DOUBLES_EQUAL( 211.474, distances[2], EPS );
+ CPPUNIT_ASSERT_DOUBLES_EQUAL( 44.859, distances[1], EPS );
+ CPPUNIT_ASSERT_DOUBLES_EQUAL( 207.661, distances[2], EPS );
gp_Pnt2d p;
gp_Vec2d q;
HA->D1( 0, p, q );
CPPUNIT_ASSERT_DOUBLES_EQUAL( 13.75, p.X(), EPS );
CPPUNIT_ASSERT_DOUBLES_EQUAL( 6.25, p.Y(), EPS );
- CPPUNIT_ASSERT_DOUBLES_EQUAL( 0.568, q.X(), EPS );
- CPPUNIT_ASSERT_DOUBLES_EQUAL( 0.568, q.Y(), EPS );
+ CPPUNIT_ASSERT_DOUBLES_EQUAL( 0.532, q.X(), EPS );
+ CPPUNIT_ASSERT_DOUBLES_EQUAL( 0.532, q.Y(), EPS );
aDoc->Close();
}
Handle(Geom2d_BSplineCurve) HA = HYDROData_DTM::CreateHydraulicAxis( profiles, distances );
HYDROData_DTM::AltitudePoints points;
- HYDROData_DTM::CurveUZ mid( 5.0, gp_Vec2d(-10,10), 0, 0 );
+ HYDROData_DTM::CurveUZ mid( 5.0, gp_Vec2d(-10,10), 0, 10 );
mid.push_back( HYDROData_DTM::PointUZ( 0, 5 ) );
mid.push_back( HYDROData_DTM::PointUZ( 1, 6 ) );
- HYDROData_DTM::CurveUZ wid( 5.0, gp_Vec2d(-10,10), 0, 0 );
+ HYDROData_DTM::CurveUZ wid( 5.0, gp_Vec2d(-10,10), 0, 10 );
wid.push_back( HYDROData_DTM::PointUZ( 2, 5 ) );
wid.push_back( HYDROData_DTM::PointUZ( 6, 6 ) );
HYDROData_DTM::CurveTo3D( HA, mid, wid, points );
CPPUNIT_ASSERT_EQUAL( 4, (int)points.size() );
- CPPUNIT_ASSERT_EQUAL( HYDROData_DTM::AltitudePoint( 16.380, -2.186, 6.0 ), points[0] );
- CPPUNIT_ASSERT_EQUAL( HYDROData_DTM::AltitudePoint( 15.673, -1.479, 5.0 ), points[1] );
- CPPUNIT_ASSERT_EQUAL( HYDROData_DTM::AltitudePoint( 14.259, -0.065, 5.0 ), points[2] );
- CPPUNIT_ASSERT_EQUAL( HYDROData_DTM::AltitudePoint( 12.137, 2.056, 6.0 ), points[3] );
+ CPPUNIT_ASSERT_EQUAL( HYDROData_DTM::AltitudePoint( 21.588, 5.419, 6.0 ), points[0] );
+ CPPUNIT_ASSERT_EQUAL( HYDROData_DTM::AltitudePoint( 20.881, 6.126, 5.0 ), points[1] );
+ CPPUNIT_ASSERT_EQUAL( HYDROData_DTM::AltitudePoint( 19.466, 7.541, 5.0 ), points[2] );
+ CPPUNIT_ASSERT_EQUAL( HYDROData_DTM::AltitudePoint( 17.345, 9.662, 6.0 ), points[3] );
aDoc->Close();
}
CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0, DTM->GetSpatialStep(), EPS );
DTM->Update();
- CPPUNIT_ASSERT_EQUAL( 9177, (int)DTM->GetAltitudePoints().size() );
+ CPPUNIT_ASSERT_EQUAL( 9108, (int)DTM->GetAltitudePoints().size() );
Handle(AIS_InteractiveContext) aContext = TestViewer::context();
HYDROGUI_ShapeBathymetry* aBathPrs = new HYDROGUI_ShapeBathymetry( 0, aContext, DTM );
aBathPrs->update( true, false );
+ aBathPrs->RescaleDefault();
bool ColorScaleIsDisp = TestViewer::ColorScaleIsDisplayed();
TestViewer::showColorScale( true );
aCS->SetMax( 5.0 );
aCS->SetNumberOfIntervals( 10 );
aBathPrs->UpdateWithColorScale( aCS );
-
+ //QTest::qWait(50000);
QImage aDTMPrs = draw_DTM( aBathPrs, 0.5, 600, 600 );
- CPPUNIT_ASSERT_IMAGES2( &aDTMPrs, "DTM_1" );
+ CPPUNIT_ASSERT_IMAGES3( &aDTMPrs, "DTM_1", false );
delete aBathPrs;
TestViewer::showColorScale( ColorScaleIsDisp );
CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0, DTM->GetSpatialStep(), EPS );
DTM->Update();
- CPPUNIT_ASSERT_EQUAL( 282338, (int)DTM->GetAltitudePoints().size() );
+ CPPUNIT_ASSERT_EQUAL( 281898, (int)DTM->GetAltitudePoints().size() );
Handle(AIS_InteractiveContext) aContext = TestViewer::context();
HYDROGUI_ShapeBathymetry* aBathPrs = new HYDROGUI_ShapeBathymetry( 0, aContext, DTM );
aBathPrs->update( true, false );
+ aBathPrs->RescaleDefault();
bool ColorScaleIsDisp = TestViewer::ColorScaleIsDisplayed();
aBathPrs->UpdateWithColorScale( aCS );
QImage aDTMPrs = draw_DTM( aBathPrs, 0.5, 600, 600 );
- CPPUNIT_ASSERT_IMAGES2( &aDTMPrs, "DTM_2" );
+ CPPUNIT_ASSERT_IMAGES3( &aDTMPrs, "DTM_2", false );
TestViewer::showColorScale( ColorScaleIsDisp );
delete aBathPrs;
aDoc->Close();
CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0123, values[0], EPS );
CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0123, values[1], EPS );
CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0221, values[2], EPS );
- CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0123, values[3], EPS );
- CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0123, values[4], EPS );
- CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0123, values[5], EPS );
+ CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0221, values[3], EPS );
+ CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0221, values[4], EPS );
+ CPPUNIT_ASSERT_DOUBLES_EQUAL( 1.0221, values[5], EPS );
std::vector<int> types = aCase->GetStricklerTypeForPoints( points );
CPPUNIT_ASSERT_EQUAL( 6, (int)types.size() );
CPPUNIT_ASSERT_EQUAL( 123, types[0] );
CPPUNIT_ASSERT_EQUAL( 123, types[1] );
CPPUNIT_ASSERT_EQUAL( 221, types[2] );
- CPPUNIT_ASSERT_EQUAL( 123, types[3] );
- CPPUNIT_ASSERT_EQUAL( 123, types[4] );
- CPPUNIT_ASSERT_EQUAL( 123, types[5] );
+ CPPUNIT_ASSERT_EQUAL( 221, types[3] );
+ CPPUNIT_ASSERT_EQUAL( 221, types[4] );
+ CPPUNIT_ASSERT_EQUAL( 221, types[5] );
aDoc->Close();
}