void InitCharactersNames()
{
	int		n;
// English
// man names
	n = 0;
	n = AddStr2Array(&sEnManNames, n, "Abel,Adam,Aidan,Alan,Aleyn,Alfred,Andrew,Arthur");
	n = AddStr2Array(&sEnManNames, n, "Bernard,Bertram,Brendan,Brennan,Brian,Brock,Chad,Charles,Cole,Colm");
	n = AddStr2Array(&sEnManNames, n, "Connor,Corin,Daniel,David,Davy,Donald,Dougal,Duane,Eamonn,Ed,Edgar,Edmond,Edmund,Edward,Edward");
	n = AddStr2Array(&sEnManNames, n, "Edwin,Elias,Evan,Ewan,Fergus,Filbert,Finian,Flann,Gabriel,Gareth,Garrett,Garry,Gavin,Gawayn");
	n = AddStr2Array(&sEnManNames, n, "Geffrey,George,Gerard,Gilbert,Gilbert,Godwin,Gregory,Gryffen,Guy,Gyles,Hamond,Harold");
	n = AddStr2Array(&sEnManNames, n, "Henry,Henry,Herbert,Hugh,Ian,Isaac,Jacob,James,James,Jasper,Jeremy,John,John,Jordan,Joseph,Kalen,Kenneth");
	n = AddStr2Array(&sEnManNames, n, "Kermit,Kevin,Killian,Leonard,Lewis,Lewys,Lionel,Lynn,Malcolm,Marvin,Matthew,Mayew");
	n = AddStr2Array(&sEnManNames, n, "Michael,Miles,Morys,Moses,Nicholl,Nigel,Olyver,Oscar,Oswald,Owaine,Owen");
	n = AddStr2Array(&sEnManNames, n, "Oweyn,Patrick,Paul,Peter,Peter,Piers,Pires,Ralph,Randolf,Rauf,Raulf,Raulfe,Rawlin,Richard");
	n = AddStr2Array(&sEnManNames, n, "Robert,Robyn,Roger,Ronald,Ronan,Rouland,Rys,Sampson,Sean,Simon,Simon,Solomon,Stephan,Stephen,Symon");
	n = AddStr2Array(&sEnManNames, n, "Terry,Thomas,Thomas,Tobias,Triston,Walter,Waryn,Waulter,Waut,Wauter,Wilfred,William,Yon");

// women names
	n = 0;
	n = AddStr2Array(&sEnWomenNames, n, "Adelina,Alicia,Alison,Amanda,Amelia,Amy,Anne,Astrid,Audrey,Aurelia,Aurora,Avis");
	n = AddStr2Array(&sEnWomenNames, n, "Bella,Camilla,Cecilia,Celia,Clare,Claudia,Diana,Edith,Eloise,Emily,Emma");
	n = AddStr2Array(&sEnWomenNames, n, "Eva,Flora,Gillian,Hilary,Ida,Jane,Joan,Julia,Karen,Laura,Lavinia,Letitia,Lillian,Mabel");
	n = AddStr2Array(&sEnWomenNames, n, "Mary,Mildred,Mirabel,Monica,Nadine,Natalia,Sabina,Sarah,Serena,Simona");
	n = AddStr2Array(&sEnWomenNames, n, "Sylvia,Una,Ursula,Valeria,Vivian,Yvette,Yvonne");

// families
	n = 0;
	n = AddStr2Array(&sEnFamilies, n, "Abbott,Acum,Adeane,Adrain,Agate,Agnew,Aguilar,Agutter,Aldren,Allaun,Ambler,Ankers");
	n = AddStr2Array(&sEnFamilies, n, "Applin,Archer,Argent,Arlott,Arlotte,Armer,Armour,Arram");
	n = AddStr2Array(&sEnFamilies, n, "Ashman,Ashmead,Atthill,Attley,Attwell,Attwick,Attwood,Atwater");
	n = AddStr2Array(&sEnFamilies, n, "Atyeo,Ault,Averill,Ayer,Ayler,Bacchus,Backer,Bacon,Bagg,Bagge,Bail,Bailey");
	n = AddStr2Array(&sEnFamilies, n, "Baker,Ball,Ballard,Balmer,Banker,Bankes,Banks,Barber");
	n = AddStr2Array(&sEnFamilies, n, "Barker,Barne,Baron,Barrat,Barratt,Barrell,Barrett,Barrow,Barry,Barter,Bastard,Baud,Baxter,Bayliss");
	n = AddStr2Array(&sEnFamilies, n, "Beamer,Bean,Beard,Becket,Beckett,Beeman,Bekker,Belch,Belcher,Belgian,Belham,Bellamy");
	n = AddStr2Array(&sEnFamilies, n, "Belt,Belt,Bevin,Bew,Bezzant,Biddick,Bigg,Biggs,Bighead");
	n = AddStr2Array(&sEnFamilies, n, "Binks,Binns,Bird,Bisgood,Bishop,Bismire,Bisp,Biss,Bisset,Black,Blacker,Blake,Blaker");
	n = AddStr2Array(&sEnFamilies, n, "Blank,Blaxter,Blecher,Blessed,Blewett,Bligh,Blight,Blinman,Bliss");
	n = AddStr2Array(&sEnFamilies, n, "Blood,Bloom,Bloomer,Blunden,Blunt,Blythe,Boar,Body,Bolam,Bold");
	n = AddStr2Array(&sEnFamilies, n, "Bollom,Bonamy,Bond,Bone,Bonger,Bonner,Bonser,Booker,Boon,Boorman,Boosey,Boot,Boote,Bootham");
	n = AddStr2Array(&sEnFamilies, n, "Boss,Bossey,Boucher,Boulter,Bowie,Bowler,Bowley");
	n = AddStr2Array(&sEnFamilies, n, "Bowman,Bowring,Bowser,Bowyer,Boyter,Bradfer,Bradnam,Bragg,Bragge,Brasher");
	n = AddStr2Array(&sEnFamilies, n, "Brayer,Brazier,Bream,Breese,Brend,Brewer,Bridge,Bridger,Bridle,Bright");
	n = AddStr2Array(&sEnFamilies, n, "Broad,Brock,Brook,Brooker,Brown,Browne");
	n = AddStr2Array(&sEnFamilies, n, "Buck,Buckler,Buckman,Buffard,Bugg,Bulger,Bull,Bullied,Bullock,Bullpen,Bulmer,Bunyan");
	n = AddStr2Array(&sEnFamilies, n, "Burd,Burgess,Burl,Burle,Burman,Burnet,Burrell,Bushell,Buss,Buss,Butcher,Butler,Butlin,Butner,Butters");
	n = AddStr2Array(&sEnFamilies, n, "Buttery,Button,Buzzard,Byrom,Bysouth,Bywater,Bywood,Caddow,Cake,Callow");
	n = AddStr2Array(&sEnFamilies, n, "Calverd,Cam,Camp,Cann,Cannard,Cannel,Cannell,Canter,Capel,Caperon,Capon,Capper,Card,Carder");
	n = AddStr2Array(&sEnFamilies, n, "Carless,Carman,Carter,Carver,Casbolt,Castle,Cater,Catt,Cave,Century");
	n = AddStr2Array(&sEnFamilies, n, "Chafer,Chaff,Chaffe,Chaffer,Chalk,Chalker");
	n = AddStr2Array(&sEnFamilies, n, "Chant,Chapel,Chaplin,Chapman,Chappel,Charity,Chase,Chaucer");
	n = AddStr2Array(&sEnFamilies, n, "Cheator,Cheek,Cheese,Cheever,Cherry,Chick,Chicken,Chin,Chinn");
	n = AddStr2Array(&sEnFamilies, n, "Clapp,Clarges,Clark,Clarke,Cleaver,Clerk,Coe,Coke,Collier,Collop");
	n = AddStr2Array(&sEnFamilies, n, "Coltman,Comfort,Comley,Conner,Conning,Cook,Cooke,Cooper,Coot,Coote,Cope");
	n = AddStr2Array(&sEnFamilies, n, "Copner,Coppard,Corden,Corker,Corp,Corpe,Corrick,Costner,Cottam,Cotter");
	n = AddStr2Array(&sEnFamilies, n, "Cottier,Cotton,Couch,Coucher,Counter,Courage,Court");
	n = AddStr2Array(&sEnFamilies, n, "Cowper,Coy,Crane,Crass,Craze,Cribb,Crisp,Crispe,Crocker,Croker");
	n = AddStr2Array(&sEnFamilies, n, "Cropper,Crozier,Crump,Cruse,Cryer,Cuckow,Cuff,Curling,Curtin");
	n = AddStr2Array(&sEnFamilies, n, "Cuss,Cutter,Cypher,Dagg,Dale,Damson,Dance,Dancer,Dark,Darke,Darling,Dash");
	n = AddStr2Array(&sEnFamilies, n, "Day,Dayman,Daymond,de Boer,Deacon,Dear");
	n = AddStr2Array(&sEnFamilies, n, "Deare,Dearman,Debney,Deller,Demmer,Denman,Dent");
	n = AddStr2Array(&sEnFamilies, n, "Dexter,Digweed,Diver,Dixey,Dobell,Dodd,Doe,Dormer,Douce,Doughty,Dove,Dowsett,Drake,Drane");
	n = AddStr2Array(&sEnFamilies, n, "Draper,Drapper,Drawer,Dray,Dring,Driver,Drury,Dubois,Duncalf,Dunn,Dunne,Dwelley");
	n = AddStr2Array(&sEnFamilies, n, "Dyer,Earl,Earle,East,Eld,Elder,Ewer,Faber,Fage,Fair,Fairfax");
	n = AddStr2Array(&sEnFamilies, n, "Fairman,Falcon,Falder,Falkner,Fane,Fant,Farman,Farmer");
	n = AddStr2Array(&sEnFamilies, n, "Farr,Farrar,Farrier,Fatt,Fauchon,Fawn,Fear,Fearon,Feather,Feaver,Fell,Fellows");
	n = AddStr2Array(&sEnFamilies, n, "Fender,Fennell,Fenner,Ferrier,Feverel,Fewster,Fickle,Fiddler,Fidge,Fido,Fidoe,Fielder");
	n = AddStr2Array(&sEnFamilies, n, "Fielder,Filer,Finch,Fine,Fish,Fisher,Fisk,Fiske,Fitch,Fitter");
	n = AddStr2Array(&sEnFamilies, n, "Flann,Flanner,Flasher,Flatman,Flaxman,Flesher,Flinter,Floater,Flower,Flunder");
	n = AddStr2Array(&sEnFamilies, n, "Follett,Foot,Footman,Ford,Forder,Foreman,Forest,Forster,Fortman");
	n = AddStr2Array(&sEnFamilies, n, "Fortnam,Fowle,Fowler,Frater,Free");
	n = AddStr2Array(&sEnFamilies, n, "Freeman,Frere,Friend,Frost,Froud,Froude,Fry,Frye,Fuggle,Fuller");
	n = AddStr2Array(&sEnFamilies, n, "Furber,Gabb,Gadd,Gain,Gaine,Galley,Galpin,Gamlin,Gape,Gard,Gardham,Gardner");
	n = AddStr2Array(&sEnFamilies, n, "Garland,Garlic,Garnet,Garnett,Garnon,Garnons,Gay,Gaylor,Gaylord,Gear");
	n = AddStr2Array(&sEnFamilies, n, "Gearing,Gelding,Gent,Gentle,Gerrish,Giddy,Gigg,Gilder,Gilroy,Ginger,Girdler");
	n = AddStr2Array(&sEnFamilies, n, "Girle,Glass,Gleave,Gleed,Glew,Glover,Goacher,Goatman,Gold,Golden");
	n = AddStr2Array(&sEnFamilies, n, "Good,Goodale,Goodday,Goode,Goodlad");
	n = AddStr2Array(&sEnFamilies, n, "Gook,Gosling,Gossard,Gotobed,Gough,Grand,Grave,Grealey,Greaves");
	n = AddStr2Array(&sEnFamilies, n, "Grice,Grieve,Grill,Groom,Groser,Gross,Grout,Grover,Grubb,Guest,Guild,Gully");
	n = AddStr2Array(&sEnFamilies, n, "Gurden,Hacker,Hall,Hand,Hansard,Hardy,Harfoot,Harlock,Harper,Hart,Haslam,Hatcher");
	n = AddStr2Array(&sEnFamilies, n, "Hawk,Hawke,Hawker,Hayes,Hayward,Headlam,Hendy,Hensman,Herd,Hewer,Hext,Hilder,Hillam,Hine,Hinton,Hoar");
	n = AddStr2Array(&sEnFamilies, n, "Hoare,Hogg,Holland,Hollier,Holman,Holyman,Hooper,Hopper,Horder,Horner,Hotham");
	n = AddStr2Array(&sEnFamilies, n, "Hotter,Hucker,Hunt,Hunter,Husband,Hussey,Idle,Inman,Jagger,Jansen,Janssen,Jardine,Jay,Jaye");
	n = AddStr2Array(&sEnFamilies, n, "Jenner,Joiner,Jucker,Judge,Keat,Keate,Keech,Keen,Keene,Kelham,Kellogg,Kember,Kemp,Kempe,Kew");
	n = AddStr2Array(&sEnFamilies, n, "Kilner,Kippen,Kipps,Kirk,Kirke,Kiss,Kisser,Knight,Labbett,Ladel,Ladell,Lakeman,Lander");
	n = AddStr2Array(&sEnFamilies, n, "Lappin,Lapping,Large,Lark,Larner,Larter,Latimer,Latter,Lawless");
	n = AddStr2Array(&sEnFamilies, n, "Lawman,Lazar,Le,Le,Le,Lea,Leach,Leaf,Leafe,Leaker,Leal,Lean,Leane");
	n = AddStr2Array(&sEnFamilies, n, "Leaper,Leather,Lebeau,Leech,Legate,Legh,Leigh,Leleu,Leng,Leopard,Lepper,Letcher");
	n = AddStr2Array(&sEnFamilies, n, "Leuty,Leveson,Light,Limer,Lipp,Lister,Litham,Lithman,Little");
	n = AddStr2Array(&sEnFamilies, n, "Loader,Lodder,Long,Longman");
	n = AddStr2Array(&sEnFamilies, n, "Lorimer,Louch,loud,Love,Loveday,Lovejoy,Lovel,Lovell,Lovitt,Luff,Lugg,Lusher,Luther");
	n = AddStr2Array(&sEnFamilies, n, "Lyte,Machin,Maffey,Maiden,Maidman,Male,Mallard,Mallory,Malter");
	n = AddStr2Array(&sEnFamilies, n, "Mangall,Mangold,Manley,Marbler,Mare,Mariner,Marker,Marler,Marlow,Marmion,Marner,Marrow");
	n = AddStr2Array(&sEnFamilies, n, "Martyr,Mason,Masters,Mather,Maufe,Mawditt,May,Maybank,Mayer,Mayland");
	n = AddStr2Array(&sEnFamilies, n, "Meadows,Meager,Meares,Meek,Meeke,Melk,Mercer,Mercy,Merry");
	n = AddStr2Array(&sEnFamilies, n, "Mew,Meystre,Mildmay,Milk,Miller,Millman,Mills,Milner,Minchin,Minet,Minter");
	n = AddStr2Array(&sEnFamilies, n, "Miskin,Mockler,Monday,Monger,Monk,Morehen,Morrant,Morrell,Mort,Mottram");
	n = AddStr2Array(&sEnFamilies, n, "Mower,Moyne,Much,Mudge,Murch,Muskett,Mustard,Mutter,Mutton,Napier,Napper,Nares,Nash");
	n = AddStr2Array(&sEnFamilies, n, "Nayland,Naylor,Neam,Neame,Nears,Neate,Neave,Neck,Needler,Neep,New,Newman,Newnham");
	n = AddStr2Array(&sEnFamilies, n, "Newsham,Newson,Niker,Noad,Noblet,North,Nott,Nunn,Nurse,Oade,Odam,Offer,Officer,Old,Orgill");
	n = AddStr2Array(&sEnFamilies, n, "Orpet,Orpett,Osler,Ostler,Otter,Outlaw,Oxnard,Oyler,Packer,Page,Paget,Paige,Painter,Pakeman");
	n = AddStr2Array(&sEnFamilies, n, "Palmer,Palmer,Paniers,Panter,Panther,Pape,Papigay,Pardew,Pardey,Pardner,Parfett");
	n = AddStr2Array(&sEnFamilies, n, "Parker,Parkman,Parson,Parsons,Partner");
	n = AddStr2Array(&sEnFamilies, n, "Patten,Pattern,Peabody,Peacock,Pear,Pearl,Pearman,Peart,Pease");
	n = AddStr2Array(&sEnFamilies, n, "Peat,Peate,Peay,Pee,Peever,Pegler,Peller,Pellew,Pelly,Pelter,Penny");
	n = AddStr2Array(&sEnFamilies, n, "Pepper,Perrier,Pestell,Pester,Petch,Petcher,Petchey");
	n = AddStr2Array(&sEnFamilies, n, "Pettit,Pettitt,Petty,Physick,Pigg,Pilcher,Pilgrim,Pincher,Pinder,Pingree,Pink");
	n = AddStr2Array(&sEnFamilies, n, "Pinker,Pinn,Pinnock,Piper,Pitman,Pitman,Pitter,Plater,Player,Pledger,Plowman,Plum");
	n = AddStr2Array(&sEnFamilies, n, "Plumer,Plummer,Pocket,Poe,Pole,Poles,Pond,Poor,Poore,Pope,Popejoy");
	n = AddStr2Array(&sEnFamilies, n, "Porcher,Port,Porter,Portly,Postle,Postma,Potter,Poulter,Pound,Povey,Pratt");
	n = AddStr2Array(&sEnFamilies, n, "Pretty,Prew,Pride,Priest,Prime,Prin,Prince,Prince,Pring,Prior,Procter,Proud,Proude");
	n = AddStr2Array(&sEnFamilies, n, "Provost,Prowse,Prudhom,Pullan,Punter,Purcell,Purchas,Purefoy,Purser,Purves");
	n = AddStr2Array(&sEnFamilies, n, "Puscat,Pyatt,Pye,Quaif,Quaife,Quant,Quarry,Queen,Quick,Quilter,Radnage,Ramadge");
	n = AddStr2Array(&sEnFamilies, n, "Ramage,Ramm,Ramson,Rank,Raper,Rastel,Rastell,Ratter,Raven,Rawbone,Reader,Ready,Redman,Redwood");
	n = AddStr2Array(&sEnFamilies, n, "Reeve,Renner,Restler,Retter,Rich,Rideout,Rider,Ridges,Ridler,Rimmer,Ring,Ringer,Ripper,Roe");
	n = AddStr2Array(&sEnFamilies, n, "Roebuck,Roke,Roller,Rook,Rooke,Roope,Root,Roper,Round,Rous,Rouse,Rover,Rowe,Rower,Rowsell");
	n = AddStr2Array(&sEnFamilies, n, "Roy,Rozier,Rudd,Rump,Rundall,Russ,Rust,Ruth,Rutter,Rymer,Sacker,Sadd,Sadler,Saffron,Sage");
	n = AddStr2Array(&sEnFamilies, n, "Sailer,Saint,Salter,Sands,Sanger,Sapper,Sargent,Savage,Sawyer,Sayer,Scaife");
	n = AddStr2Array(&sEnFamilies, n, "Scorer,Scragg,Scutt,Seales,Seaman,Secker,Secrett,Secular,Sedgman");
	n = AddStr2Array(&sEnFamilies, n, "Sellar,Sellars,Selth,Senior,Service,Sevier,Sewer,Sexton,Seyler,Sharman,Shedder");
	n = AddStr2Array(&sEnFamilies, n, "Sheriff,Shields,Ship,Shipman,Shooter,Shopper,Shutler,Shuttle");
	n = AddStr2Array(&sEnFamilies, n, "Silk,Silver,Singer,Sizer,Skinner,Slader,Slater");
	n = AddStr2Array(&sEnFamilies, n, "Slipper,Sloman,Sloper,Smith,Smither,Snider,Sniders,Soper,South,Sowman,Spence,Spencer");
	n = AddStr2Array(&sEnFamilies, n, "Spender,Spice,Spicer,Spier,Spooner,Squier,Squiers,Squires,Stainer,Statham,Stather");
	n = AddStr2Array(&sEnFamilies, n, "Steel,Steele,Steward,Stocker,Stokes,Storer");
	n = AddStr2Array(&sEnFamilies, n, "Sueur,Summer,Sumner,Surgeon,Sutler,Taberer,Tanner,Taper,Tapper,Tasker");
	n = AddStr2Array(&sEnFamilies, n, "Taylor,Teacher,Tector,Tennant,Thaxter,Theaker,Thew,Thrower,Tiller");
	n = AddStr2Array(&sEnFamilies, n, "Tillman,Tinker,Tinkler,Tisser,Toller,Tolman,Toner,Toner,Topper,Towers");
	n = AddStr2Array(&sEnFamilies, n, "Tozer,Tranter,Tricker,Trinder,Tripe,Trippe,Tripper,Trist,Troake");
	n = AddStr2Array(&sEnFamilies, n, "Trumper,Tubman,Tucker,Tumman,Tunnah,Tunnard,Tupper,Turner,Tyler,Ulman");
	n = AddStr2Array(&sEnFamilies, n, "Usher,Vale,Veck,Veil,Vender,Venner,Verrier,Vicar,Vicars,Vickers");
	n = AddStr2Array(&sEnFamilies, n, "Vickery,Vine,Vinter,Voller,Wafer,Wager,Waghorn,Wain");
	n = AddStr2Array(&sEnFamilies, n, "Waine,Wainman,Wait,Waite,Wakeman,Walker,Waller,Waller,Want,Ward,Warde,Warden,Warman,Warner");
	n = AddStr2Array(&sEnFamilies, n, "Washer,Waterer,Wax,Waxman,Weather,Weaver,Webb,Webbe,Webber,Webster");
	n = AddStr2Array(&sEnFamilies, n, "Welham,Welles,Wellman,West,Wheeler,Whiter,Whitney");
	n = AddStr2Array(&sEnFamilies, n, "Wicken,Wicker,Wicker,Willen,Willows,Wood,Woodger,Woodman,Woods,Woodyer");
	n = AddStr2Array(&sEnFamilies, n, "Wooler,Wooller,Woolman,Workman,Wort,Wright,Wrighte,Wylam,Yeoman");

// Holland
// man names
	n = 0;
	n = AddStr2Array(&sHoManNames, n, "Aart,Abram,Adaem,Adam,Adriaen,Aelwiin,Aerkiin,Aerkijn,Aernd,Aernde,Aerne");
	n = AddStr2Array(&sHoManNames, n, "Aernken,Aernt,Aert,Agt,Aldert,Alewiin,Alewijn,Alewijn,Andreas,Andrees,Andries");
	n = AddStr2Array(&sHoManNames, n, "Arendt,Ariaan,Arie,Arie,Arnd,Arne,Arnt,Aron,Ave,Aven");
	n = AddStr2Array(&sHoManNames, n, "Baernt,Baeye,Baltus,Barber,Barend,Barent,Bart");
	n = AddStr2Array(&sHoManNames, n, "Bartel,Bartje,Bartoen,Bastian,Berend,Bernd");
	n = AddStr2Array(&sHoManNames, n, "Bert,Bertoen,Bertus,Beye,Blaas,Boeyken,Bonsart");
	n = AddStr2Array(&sHoManNames, n, "Bouden,Boudiin,Boudijn,Bram,Buus,Calle,Carel,Case,Casper,Ceerles,Chris");
	n = AddStr2Array(&sHoManNames, n, "Claeis,Claes,Claeys,Claeyse");
	n = AddStr2Array(&sHoManNames, n, "Clase,Clays,Clayse,Coen,Coen,Coene,Coenen");
		n = AddStr2Array(&sHoManNames, n, "Coensen,Coliin,Colijn,Cop,Coper,Copken,Copkijn,Coppe,Coppiin,Coppijn,Costiin,Costijn");
	n = AddStr2Array(&sHoManNames, n, "Daaf,Daam,Damaes,Danel");
	n = AddStr2Array(&sHoManNames, n, "Daniel,David,Desin,Dieric,Dirc,Dirk,Dirric,Domaes,Doncker,Dries,Ector");
	n = AddStr2Array(&sHoManNames, n, "Edam,Eduard,Elias,Ellik,Engel,Enghel,Enrik");
	n = AddStr2Array(&sHoManNames, n, "Faucoen,Femensy,Filips,Florens,Floriis,Florijs,Floris,Floris,Foyken");
	n = AddStr2Array(&sHoManNames, n, "Frank,Frank,Frans,Frerk,Friko,Frits,Fye,Fyen,Garret,Geert,Geliis");
	n = AddStr2Array(&sHoManNames, n, "Gerrit,Gerrit,Ghaeyen,Gheeret");
	n = AddStr2Array(&sHoManNames, n, "Gheraed,Gherede,Gheret,Gheride,Gheriit,Gherijt,Gheryde,Gheryt");
	n = AddStr2Array(&sHoManNames, n, "Gielis,Gijs");
	n = AddStr2Array(&sHoManNames, n, "Gilliis,Gillijs,Gillis,Godeken,Goris,Goverd");
	n = AddStr2Array(&sHoManNames, n, "Guido,Han,Hannes,Hannijn,Hans,Hans,Hans,Hanse,Hansen,Hanssen,Hanze,Harck,Harman,Harry,Heerman");
	n = AddStr2Array(&sHoManNames, n, "Hein,Heinman,Heinric,Hendrik");
	n = AddStr2Array(&sHoManNames, n, "Henk,Henric,Hensen,Hereman,Herman,Herry,Hessel,Heyne,Heynen,Heynken,Heynric");
	n = AddStr2Array(&sHoManNames, n, "Hille,Hiskia,Hughe,Hughen,Hugo,Huybert,Iacob,Ian,Ianne,Ihan");
	n = AddStr2Array(&sHoManNames, n, "Ihanne,Iorijs,Jaap,Jaapie,Jackel,Jacken,Jacob,Jacobje,Jacop,Jaepje,Jan,Jan,Jan,Janne,Jannes");
	n = AddStr2Array(&sHoManNames, n, "Japic,Jden,Jeroen,Jhan,Jobje,Jocen,Jochem,Johan,Joost,Jorijs,Joris,Jurgen,Jurian");
	n = AddStr2Array(&sHoManNames, n, "Jurn,Jurrian,Jury,Justaes,Justin,Karel,Karel,Kees,Kees,Kersten,Keyl,Klaar,Klaas");
	n = AddStr2Array(&sHoManNames, n, "Klaas,Koba,Koris,Korsten,Krelis,Krelius,Kris,Langhe");
	n = AddStr2Array(&sHoManNames, n, "Laurens,Lauwe,Lem,Lezart,Liclase,Lisse");
	n = AddStr2Array(&sHoManNames, n, "Louwe,Lyonijs,Maarten,Maas,Maes,Mark,Martiin,Mathiis,Mathijs,Mathijs");
	n = AddStr2Array(&sHoManNames, n, "Mathise,Meeus,Melijs,Michiel,Moyses,Muloc,Nol,Noyden,Nyclaes");
	n = AddStr2Array(&sHoManNames, n, "Nyclays,Obele,Odzier,Oel,Oelaert,Oelard,Oelout,Ogier,Olaert,Oliuier,Olivier,Olooud,Olyuier,Orlijn");
	n = AddStr2Array(&sHoManNames, n, "Otkiin,Otte,Otten,Otto,Parien,Paul,Pelgrem,Peter,Peter,Philips,Philps,Phylips,Pierart");
	n = AddStr2Array(&sHoManNames, n, "Pieter,Pieter,Poppe,Poppen,Pouwels,Pouwles,Pyraert,Pyret,Quade,Raes,Rasen,Reinaer");
	n = AddStr2Array(&sHoManNames, n, "Reinken,Reinoud,Renger,Rengher,Reygher,Reynaer,Reyner,Reyner,Reynier,Reynken");
	n = AddStr2Array(&sHoManNames, n, "Reynoud,Reynout,Ricout,Roel,Roelant,Roelof,Roever,Roland,Rolfe,Rolof,Rost,Rubbe");
	n = AddStr2Array(&sHoManNames, n, "Rupert,Rutgert,Sammel,Sander,Sander,Segher,Servaas,Siimken,Simon,Smiaa");
	n = AddStr2Array(&sHoManNames, n, "Spike,Staert,Stans,Stefan,Steuen,Steven,Stoffel,Storm,Symoen,Symon,Sympken,Teeuwis");
	n = AddStr2Array(&sHoManNames, n, "Thoniis,Thonijs,Tiel,Tielman,Toff,Toffels,Toon,Tyelman,Ulrich,Ury");
	n = AddStr2Array(&sHoManNames, n, "Vlas,Voppe");
	n = AddStr2Array(&sHoManNames, n, "Vulric,Waelram,Warnaer,Wasmoet");
	n = AddStr2Array(&sHoManNames, n, "Wiitman,Wijtman,Willaem,Willam,Willem,Wisse,Wissen,Witte,Wlric,Wolf");
	n = AddStr2Array(&sHoManNames, n, "Wolfart,Wolfert,Wouter,Wyteman,Yden,Yedam,Yedamme,Yewiin,Ymmen,Zymoen");

// women names
	n = 0;
	n = AddStr2Array(&sHoWomenNames, n, "Adda,Aechte,Aeltje,Agneese,Agnes,Agnes,Aletta,Aliden,Aliid,Aliit,Alijd,Alijt,Alijt,Alta,Alyden");
	n = AddStr2Array(&sHoWomenNames, n, "Ane,Anna,Annatje,Anne,Annecke,Anneken,Annen,Annetie,Annetje,Antie,Antje");
	n = AddStr2Array(&sHoWomenNames, n, "Baertge,Baet,Batje,Beletje,Belij,Belitie,Bell,Bella,Bella,Bregje");
	n = AddStr2Array(&sHoWomenNames, n, "Catrijn,Catrina,Celia,Christa,Daatje,Dienje,Dina,Eelet,Eilburg");
	n = AddStr2Array(&sHoWomenNames, n, "Elen,Els,Els,Elsje,En,Eva,Eyntje,Filippa,Fransje");
	n = AddStr2Array(&sHoWomenNames, n, "Geerje,Geertie,Geertje,Geesje,Geleyn,Gellis");
	n = AddStr2Array(&sHoWomenNames, n, "Gheile,Griet,Grietje,Heile,Heintje,Heleen,Hentje");
	n = AddStr2Array(&sHoWomenNames, n, "Heyl,Heyltje,Jaantje,Janneke");
	n = AddStr2Array(&sHoWomenNames, n, "Jannie,Janotje,Jansje,Jantina,Jetje,Johanna,Judith.");
	n = AddStr2Array(&sHoWomenNames, n, "Kaat,Kaatje,Katrijn,Katrina,Keesje");
	n = AddStr2Array(&sHoWomenNames, n, "Kesia,Krisje,Kristel,Lea,Lijsbet,Lijsbet,Lijskin,Lisebet");
	n = AddStr2Array(&sHoWomenNames, n, "Lysbet,Lysebet");
	n = AddStr2Array(&sHoWomenNames, n, "Maria,Marieke,Marien,Marijke,Marisse,Marja,Naatje,Neese,Nies,Paultje");
	n = AddStr2Array(&sHoWomenNames, n, "Rian,Roosje,Sefia,Seletje,Selie,Seytie,Sitske,Tanna,Tanneke,Tientje");
	n = AddStr2Array(&sHoWomenNames, n, "Tietje,Tiletje,Tineke,Tjaatje,Trijn,Trude,Trude,Truden,Trui,Truitje,Tryntje,Yaen");
	n = AddStr2Array(&sHoWomenNames, n, "Yde,Yolente,Zoete,Zoetync");

// families
	n = 0;
	n = AddStr2Array(&sHoFamilies, n, "Aarland,Aartse,Acker,Aertsen,Ageet,Ager,Alger,Aliee");
	n = AddStr2Array(&sHoFamilies, n, "Aljie,Alyea,Amerman,Amient,Andries,Arbaugh,Arendse,Arendsz,Arents,Aten");
	n = AddStr2Array(&sHoFamilies, n, "Auke,Ayer,Ayers,Baal,Baans,Bacher,Badie,Bahn,Bakel,Bakker,Balk,Bant,Banta");
	n = AddStr2Array(&sHoFamilies, n, "Bare,Bartels,Barth,Bateu,Beakes,Beal");
	n = AddStr2Array(&sHoFamilies, n, "Beam,Beeres,Behney,Bekker,Bellier,Benda,Benson,Berdan,Berden,Berens");
	n = AddStr2Array(&sHoFamilies, n, "Bester,Beukema,Bezuyen,Bills,Blaikie,Blanck,Blank,Blasser");
	n = AddStr2Array(&sHoFamilies, n, "Bleom,Bleyck,Blind,Bloem,Blom,Bocquet,Boeke");
	n = AddStr2Array(&sHoFamilies, n, "Bogaert,Bogarde,Bogart,Bogert,Boje,Bonen,Bonger,Bongert");
	n = AddStr2Array(&sHoFamilies, n, "Bonn,Bonnel,Boogert,Boome,Boomer,Borden,Borgond,Born,Bos,Bosch,Botes,Botha,Boud");
	n = AddStr2Array(&sHoFamilies, n, "Bougart,Bouwer,Bovie,Boymans,Bradt,Bredder");
	n = AddStr2Array(&sHoFamilies, n, "Brevort,Brink,Brits,Brout,Brouwer,Brower");
	n = AddStr2Array(&sHoFamilies, n, "Bruijn,Brune,Brunner,Bruyn,Buikema,Buma,Burdg,Burger,Burgis,Burpo,Burtis,Buys");
	n = AddStr2Array(&sHoFamilies, n, "Cadmus,Calitz,Camac,Canniff,Carolus,Casjouw,Caspers,Cassou,Celer,Claar,Claesen");
	n = AddStr2Array(&sHoFamilies, n, "Clap,Clapgut,Classut,Clauss,Clein,Cleine,Clemens,Clement,Clenen,Cleyn,Cocu,Coers");
	n = AddStr2Array(&sHoFamilies, n, "Coerten,Coetsee,Cogh,Cootzee,Corleis,Corlies,Cornel,Cornell");
	n = AddStr2Array(&sHoFamilies, n, "Corniel,Coteel,Cresson,Cronk,Crouse,Crouter,Cruse,Cruyff,Cuvilje,Cuyper,Cyper");
	n = AddStr2Array(&sHoFamilies, n, "Dahm,Dalling,Darlang,Dater,Davids,De Baen,De Bane,De Baun,De Boer,De Boog,De Camp");
	n = AddStr2Array(&sHoFamilies, n, "De Cow,De Goey,De Graw,De Haan,De Haes");
	n = AddStr2Array(&sHoFamilies, n, "De Kook,De Nijs,De Pre");
	n = AddStr2Array(&sHoFamilies, n, "De Voe,De Vol,De Voor,De Vouw");
	n = AddStr2Array(&sHoFamilies, n, "De Witt,Decker,Declark,Dedkind,Dedrick,Dejong,Dekker,Dekkers");
	n = AddStr2Array(&sHoFamilies, n, "Delorme,Den,Dennies,Derksen,Derr,Dey,Deyoe,Dierman");
	n = AddStr2Array(&sHoFamilies, n, "Dircks,Dirksdr,Doars,Doorn,Doremus,Dorer,Dost,Doull,Drabbe,Drats,Drebbel,Dret");
	n = AddStr2Array(&sHoFamilies, n, "Drotske,Dubou,Dudok,Durfee,Durje,Dutoit,Duyking,Duzant,Dyckman");
	n = AddStr2Array(&sHoFamilies, n, "Eby,Eckhart,Eckhaus,Edema,Egborts,Ekker,Elting,Eltingh,Emans,Embich,Emden,Enck,Engel");
	n = AddStr2Array(&sHoFamilies, n, "Ennes,Ennis,Epke,Epkese,Erasmus,Erb,Eschelm,Etsels,Evers,Everse,Everts");
	n = AddStr2Array(&sHoFamilies, n, "Ewout,Exel,Faas,Feake,Ferseur,Fessler,Fesyeur,Fies,Fleck,Floris");
	n = AddStr2Array(&sHoFamilies, n, "Fobes,Fonda,Fones,Foos,Foshuer,Francen,Frans,Franse,Fransse,Fransz");
	n = AddStr2Array(&sHoFamilies, n, "Frena,Fugard,Galle,Garber");
	n = AddStr2Array(&sHoFamilies, n, "Gassert,Geertz,Geingob,Gerber,Gericke,Gerlach,Geroe,Gerrits");
	n = AddStr2Array(&sHoFamilies, n, "Gerryts,Gesner,Gessel,Geurts,Gies,Gillam,Gisze");
	n = AddStr2Array(&sHoFamilies, n, "Goosen,Goosens,Goubau,Graaf,Groen,Groff,Groll,Groos,Groote,Grupp");
	n = AddStr2Array(&sHoFamilies, n, "Gurnee,Haacke,Haag,Haeckle,Hafte,Hageman,Hahlo,Haight");
	n = AddStr2Array(&sHoFamilies, n, "Haldron,Hals,Hanekom,Hanse,Hansen,Harden,Harding,Haring,Harman,Harmse,Harnish,Hartje");
	n = AddStr2Array(&sHoFamilies, n, "Haward,Hecht,Heevink");
	n = AddStr2Array(&sHoFamilies, n, "Hendrix,Hengel,Henion,Henning,Hennion,Henrard");
	n = AddStr2Array(&sHoFamilies, n, "Hermans,Herque,Herr,Herring,Hershey,Hersman,Hertje,Herty,Hesp,Hess,Hessels,Heynkes,Hibon");
	n = AddStr2Array(&sHoFamilies, n, "Hiddink,Hoff,Hofman,Hofmeyr,Hofstra,Hol,Holbein");
	n = AddStr2Array(&sHoFamilies, n, "Holdrum,Holst,Honig,Hoornik,Hooten,Hoover,Hoppe,Hoppen,Hopper");
	n = AddStr2Array(&sHoFamilies, n, "Horsch,Horst,Housman,Hout,Hoy,Huber,Hulit,Hulse");
	n = AddStr2Array(&sHoFamilies, n, "Huster,Huyghen,Huyler,Iani,Jacobse,Jans,Jansdr,Jansen");
	n = AddStr2Array(&sHoFamilies, n, "Jewell,Jimmink,Jonge,Jongman,Jonk,Joosten,Jopie,Jorise");
	n = AddStr2Array(&sHoFamilies, n, "Jurcks,Jurckse,Jurckx,Jurcx,Jurrie,Kalff,Kalkman,Kamps,Kamstra");
	n = AddStr2Array(&sHoFamilies, n, "Kapt,Karaay,Karch,Kayser,Keemer,Keizer,Kempers,Kendig,Kepper,Kerck,Kern");
	n = AddStr2Array(&sHoFamilies, n, "Ketel,Khoza,Kiers,Kiersen,Kiess,Kiestra,Kindt,Kinne,Kipp");
	n = AddStr2Array(&sHoFamilies, n, "Klock,Knaus,Koch,Koella,Koemans,Koler,Konight");
	n = AddStr2Array(&sHoFamilies, n, "Koninck,Koning,Konink,Koopman,Korving,Koshney,Kosters,Kough");
	n = AddStr2Array(&sHoFamilies, n, "Kramer,Kreider,Kreitz,Krey,Krige,Krijnen,Kroes,Krom,Kruger,Kruyt,Kuipers,Kulmus,Kung,Kuyper,Lafeber");
	n = AddStr2Array(&sHoFamilies, n, "Lander,Landis,Lansink,Laros,Lashier,Leedt,Leffert");
	n = AddStr2Array(&sHoFamilies, n, "Lent,Lepper,Lewin,Lieuwes,Loers,Lootens,Loots,Lorine,Losier,Louw");
	n = AddStr2Array(&sHoFamilies, n, "Louwman,Lovica,Lozier,Lubbe,Lucieer,Lueders,Lutjens,Lutkens,Lutz");
	n = AddStr2Array(&sHoFamilies, n, "Luyt,Luz,Maarsen,Maart,Maase,Mabie,Malan,Mangin,Mans");
	n = AddStr2Array(&sHoFamilies, n, "Manus,Marais,Mares,Maris,Maritz");
	n = AddStr2Array(&sHoFamilies, n, "Maston,Mathis,Mauve,Meens,Mees,Meesen,Meet,Meeuws");
	n = AddStr2Array(&sHoFamilies, n, "Memlinc,Mennes,Merri,Mervis");
	n = AddStr2Array(&sHoFamilies, n, "Metsys,Mey,Meyer,Meyers,Mickler,Miedema,Minnaar,Mjoberg");
	n = AddStr2Array(&sHoFamilies, n, "Moleg,Mollema,Mor,Mulder,Muller,Muntz,Muskens");
	n = AddStr2Array(&sHoFamilies, n, "Musser,Myers,Mylin,Mytens,Nagel,Nagle,Nainkin,Naude,Naugle,Nedry,Neth");
	n = AddStr2Array(&sHoFamilies, n, "Nixon,Noldt,Nolt,Nordien,Norval,Numan");
	n = AddStr2Array(&sHoFamilies, n, "Nyssen,Oprel,Oremans,Ostrum");
	n = AddStr2Array(&sHoFamilies, n, "Ouijer,Ouke,Paers,Paesen,Paulen,Paulse,Paulus,Peers,Peeters,Peiffer,Peterse");
	n = AddStr2Array(&sHoFamilies, n, "Petilon,Peu,Pienaar,Pier,Pieters,Pitje");
	n = AddStr2Array(&sHoFamilies, n, "Poeze,Pooe,Postma,Poulse,Poulsen,Poulus,Powelse,Prins");
	n = AddStr2Array(&sHoFamilies, n, "Prys,Pukstys,Pulis,Quasten,Rapalje,Rau,Redeker");
	n = AddStr2Array(&sHoFamilies, n, "Reiff,Reimer,Reiss,Reitz,Rendich,Renimen,Resink,Rettan");
	n = AddStr2Array(&sHoFamilies, n, "Reyer,Reyers,Reyner,Rhoodie,Ridnaer,Rienks,Rindel");
	n = AddStr2Array(&sHoFamilies, n, "Ritsma,Roding,Roelofs,Rohland,Rohrer,Rom,Rombley,Romeyn,Romme");
	n = AddStr2Array(&sHoFamilies, n, "Romp,Ronhaar,Roorda,Roos,Rossouw,Rottier");
	n = AddStr2Array(&sHoFamilies, n, "Rulon,Rumpff,Rupp,Rutan,Ruychou,Rycke,Ryer,Ryersen,Ryke,Sa,Saal,Sabin,Saher");
	n = AddStr2Array(&sHoFamilies, n, "Savich,Saylor,Schad,Schaers,Scharer");
	n = AddStr2Array(&sHoFamilies, n, "Schenck,Schenk,Schmitt");
	n = AddStr2Array(&sHoFamilies, n, "Schoert,Scholey,Scholl,Schonen,Schoon,Schott");
	n = AddStr2Array(&sHoFamilies, n, "Schulte,Schultz,Schulze,Schut,Scrots,Seedorf,Seran,Serven");
	n = AddStr2Array(&sHoFamilies, n, "Sherk,Shermer,Shiebel,Shirk,Shrantz,Shreve,Shurte,Shurtze,Sickedr,Sipkens");
	n = AddStr2Array(&sHoFamilies, n, "Sips,Sjoerte,Slot,Smedes,Smeets,Smidt,Smit,Smuts,Sneden,Snoek,Snyder");
	n = AddStr2Array(&sHoFamilies, n, "Snyman,Soete,Sohier,Some,Somer,Sooy,Speer,Spier");
	n = AddStr2Array(&sHoFamilies, n, "Staats,Stacye,Stam,Stapel,Steck,Steffy,Stegg,Stevens");
	n = AddStr2Array(&sHoFamilies, n, "Stille,Stimets,Stoll,Stompe,Stot,Straet,Straut,Street");
	n = AddStr2Array(&sHoFamilies, n, "Stroo,Strydom,Stucker,Stypers,Suffern,Suvaal,Suzman,Swaim");
	n = AddStr2Array(&sHoFamilies, n, "Swarr,Swart,Swin,Swits,Switser,Sykes,Symons,Syourt,Taelman,Talens,Tantum");
	n = AddStr2Array(&sHoFamilies, n, "Tappan,Tappen,Taument,Teeuw,Teeuwe");
	n = AddStr2Array(&sHoFamilies, n, "Terheun,Terhune,Teunis,Thacher,Theis,Theunis");
	n = AddStr2Array(&sHoFamilies, n, "Thiel,Thijs,Thyssen,Tibbets,Tibout,Tice,Tiele");
	n = AddStr2Array(&sHoFamilies, n, "Tilba,Tilburg,Timmer,Toers,Toors,Tops,Torion,Touers,Trico");
	n = AddStr2Array(&sHoFamilies, n, "Tromp,Tschanz,Tullier,Turck,Tuyl,Ungerer,Valen,Valleau");
	n = AddStr2Array(&sHoFamilies, n, "Van As,Van Bon");
	n = AddStr2Array(&sHoFamilies, n, "Van Dyk,Van Eck");
	n = AddStr2Array(&sHoFamilies, n, "Van Ert");
	n = AddStr2Array(&sHoFamilies, n, "Van Kol");
	n = AddStr2Array(&sHoFamilies, n, "Varick,Vedder,Vedeker,Veens,Veldman");
	n = AddStr2Array(&sHoFamilies, n, "Venter,Verbeek,Verhoog,Verken,Verkuhl");
	n = AddStr2Array(&sHoFamilies, n, "Verster,Vervey,Verwey");
	n = AddStr2Array(&sHoFamilies, n, "Veseur,Vever,Vilas,Viljoen,Vink,Vis,Visagie,Vlekke,Vliese,Vlok,Voelker,Voienne");
	n = AddStr2Array(&sHoFamilies, n, "Volck,Von,Von,Von,Von,Von,Vonk,Voorhis,Vorster,Vos");
	n = AddStr2Array(&sHoFamilies, n, "Vries,Vriesde,Vrije,Vroeman,Vroom,Vrooman,Vuuren,Waerdt,Wagner,Wagter,Wakelin");
	n = AddStr2Array(&sHoFamilies, n, "Wanner,Wapnick,Wassen,Weber,Weimer,Wenger,Wenne,Wenzler,Wessel,Wessels");
	n = AddStr2Array(&sHoFamilies, n, "Wibier,Widlak,Wiekens,Wiese");
	n = AddStr2Array(&sHoFamilies, n, "Wilgus,Wilken,Willems,Willets,Wilnis,Wind,Winne,Winnink,Winter,Witschg,Witwer");
	n = AddStr2Array(&sHoFamilies, n, "Woeder,Woelffs,Woglom,Wolpe,Wouda");
	n = AddStr2Array(&sHoFamilies, n, "Wustgen,Wyckoff,Yeager,Yonkman,Yost,Zenden,Zie");
	n = AddStr2Array(&sHoFamilies, n, "Zink");

// French
// man names
	n = 0;
	n = AddStr2Array(&sFrManNames, n, "Abelard,Adhemar,Adrien,Aimable,Aimery,Alban,Albin,Aleaume,Aleaume,Amadeo,Amedee,Amelien,Amiel,Amils");
	n = AddStr2Array(&sFrManNames, n, "Amils,Amyon,Amyon,Anadee,Andre,Antoine,Aribert,Arnald,Arnaud,Arnaud,Arnould");
	n = AddStr2Array(&sFrManNames, n, "Arnould,Aubry,Aubry,Auguste,Aurel,Aurel,Aurele,Aymeri,Aymon,Ayol");
	n = AddStr2Array(&sFrManNames, n, "Begon,Begue,Bellamy,Benoit,Bernier,Bernier,Beuve,Beuve,Blaize");
	n = AddStr2Array(&sFrManNames, n, "Bruyant,Bruyant,Camille,Candide,Caschin,Catulle,Cecil");
	n = AddStr2Array(&sFrManNames, n, "Cesar,Charles,Clair,Claude,Clement,Corin,Crepin,Deodat");
	n = AddStr2Array(&sFrManNames, n, "Desire,Didier,Dominic,Doolin,Doolin,Dreu,Durand,Elie,Elie,Elisee,Emile,Ernaut");
	n = AddStr2Array(&sFrManNames, n, "Fabian,Fallard,Faure,Faust,Felix,Fidele,Fiebras,Firmin,Florian,Fluvant,Forsard,Fortune");
	n = AddStr2Array(&sFrManNames, n, "Foulque,Foulque,Fromony,Gaetan,Gaidon,Galafre,Galien");
	n = AddStr2Array(&sFrManNames, n, "Gerard,Gerner,Gilles,Girard,Girars,Girars,Girbers,Girbers");
	n = AddStr2Array(&sFrManNames, n, "Gontier,Gontier,Gralam,Gris,Gueri,Gueri,Guibert,Guibert");
	n = AddStr2Array(&sFrManNames, n, "Guillot,Guy,Hamund,Harde,Harde,Helgot,Herluin");
	n = AddStr2Array(&sFrManNames, n, "Hernaut,Hilaire,Honore,Hugues,Huon,Huon,Isore,Isore,Jakelin,Jean,Jehan,Jehan");
	n = AddStr2Array(&sFrManNames, n, "Jerome,Jules,Julien,Justin,Landri,Laurent,Leonce,Louis,Loup,Lucien,Mainet,Malbert");
	n = AddStr2Array(&sFrManNames, n, "Malger,Marc,Marcel,Marius,Martial,Martin,Maugis,Maugis,Maurice,Maxime");
	n = AddStr2Array(&sFrManNames, n, "Milon,Milon,Naimes,Namus,Orable,Oriabel,Othon,Patric,Patron,Pepin");
	n = AddStr2Array(&sFrManNames, n, "Pierre,Ponce,Pons,Prades,Prosper,Quentin,Rabel,Raoul,Raymond,Regis,Remy,Rene,Rene,Renier");
	n = AddStr2Array(&sFrManNames, n, "Richard,Robert,Romain,Serge,Severin,Silvain,Sulpice,Thierry");
	n = AddStr2Array(&sFrManNames, n, "Turpin,Victor,Vincent,Virgile,Vital,Wigayn,Yon,Yves");

// women names
	n = 0;
	n = AddStr2Array(&sFrWomenNames, n, "Aaliz,Adaliz,Adeline,Adnette,Aelis,Aida,Alais,Alazais,Albane,Alesta,Algaia");
	n = AddStr2Array(&sFrWomenNames, n, "Aliz,Amalone,Ame,Amedee,Ameline,Amour,Andre,Andreva");
	n = AddStr2Array(&sFrWomenNames, n, "Anne,Ansere,Arnaude,Aude,Aurelie");
	n = AddStr2Array(&sFrWomenNames, n, "Aurore,Ava,Axelle,Aye,Belle");
	n = AddStr2Array(&sFrWomenNames, n, "Bibiane,Blanche,Blonde,Bluette,Brune");
	n = AddStr2Array(&sFrWomenNames, n, "Camille,Candide,Cecile,Celia,Celina,Cerise,Claire");
	n = AddStr2Array(&sFrWomenNames, n, "Claudie,Colombe,Condors,Cosette,Deborah");
	n = AddStr2Array(&sFrWomenNames, n, "Desiree,Elzire,Emilie,Enora");
	n = AddStr2Array(&sFrWomenNames, n, "Esperte,Esquiva");
	n = AddStr2Array(&sFrWomenNames, n, "Estelle,Esther,Eve,Fabiola,Felicie,Flavie,Flora,Flore");
	n = AddStr2Array(&sFrWomenNames, n, "Gaude,Gauzia,Gentile,Ginette,Grace,Grazide,Guiborc");
	n = AddStr2Array(&sFrWomenNames, n, "Honors,Ide,Jacotte,Janine,Jehanne,Joie");
	n = AddStr2Array(&sFrWomenNames, n, "Josiane,Judith,Julie,Justine,Laure,Lea,Lelia,Leonie,Lia,Loisa");
	n = AddStr2Array(&sFrWomenNames, n, "Loris,Louve,Lubias,Lucie,Lucrece,Lula,Lutisse,Marelle");
	n = AddStr2Array(&sFrWomenNames, n, "Marine,Marthe,Martine,Mathena,Maura,Maxine,Merle,Mery");
	n = AddStr2Array(&sFrWomenNames, n, "Milene,Nadege,Nadia,Nana,Natalie,Nicolle,Nina,Noemie,Oriabel");
	n = AddStr2Array(&sFrWomenNames, n, "Pauline,Petrona,Rachel,Rebecca,Regine,Renee,Rixenda");
	n = AddStr2Array(&sFrWomenNames, n, "Rixende,Roese,Roheis,Romaine,Rosalie,Rose,Rousse,Rubea,Sabine,Salome,Sara,Serena");
	n = AddStr2Array(&sFrWomenNames, n, "Sidonie,Simone,Solenne,Susanne,Sybille,Sylvie,Ursule");
	n = AddStr2Array(&sFrWomenNames, n, "Valerie,Yolande");

// families
	n = 0;
	n = AddStr2Array(&sFrFamilies, n, "Abeille,About,Acre,Adam,Agarand,Aguilar,Alard,Albert,Alenson");
	n = AddStr2Array(&sFrFamilies, n, "Allard,Allaro,Allut,Alphand,Althape,Amable,Amann,Ambre");
	n = AddStr2Array(&sFrFamilies, n, "Amiens,Amiez,Amiot,Amoudry,Ampere,Ancel,Anciaux,Andreu,Anelka,Angloma,Angrand");
	n = AddStr2Array(&sFrFamilies, n, "Anjou,Anouilh,Antioch,Araines,Arata,Arbelet,Arbez,Arcand,Ardant,Arles,Arnaud,Arpinon");
	n = AddStr2Array(&sFrFamilies, n, "Arrau,Arron,Artois,Arzel,Assouad,Astruc");
	n = AddStr2Array(&sFrFamilies, n, "Attilio,Aubarat,Auber,Aubert,Aubigny,Aubon,Aubry,Aucagne,Audiard,Aufort");
	n = AddStr2Array(&sFrFamilies, n, "Auger,Augier,Auneil,Aunoi,Auradou,Auric,Auriol,Autain,Authie,Auxerre,Auzias,Avallon");
	n = AddStr2Array(&sFrFamilies, n, "Avesnes,Ayarai,Bacha,Badeau,Badre,Baijot,Baille,Baix");
	n = AddStr2Array(&sFrFamilies, n, "Balibar,Ballou,Ballu,Baluze,Bangue,Banquet,Bar,Barat,Baratte,Barbier");
	n = AddStr2Array(&sFrFamilies, n, "Bardot,Bardou,Bareau,Bariani,Barres,Barret,Barthez,Barthou,Bary");
	n = AddStr2Array(&sFrFamilies, n, "Bastide,Baudart,Baudet,Baudry,Baumont,Bautain,Bazille,Bazire");
	n = AddStr2Array(&sFrFamilies, n, "Beaujeu");
	n = AddStr2Array(&sFrFamilies, n, "Becart,Becot,Bedard,Beineix,Belchat,Belcour,Bellot,Benazi,Benoit");
	n = AddStr2Array(&sFrFamilies, n, "Benth,Berchet,Berge,Berger,Bergy,Beriou");
	n = AddStr2Array(&sFrFamilies, n, "Bernard,Bernat,Bernier,Bertin,Berton,Berty,Besacon");
	n = AddStr2Array(&sFrFamilies, n, "Besonhe,Besson,Bessy,Bethune,Bevis,Beylier,Bezace,Biez,Bigeard,Bigeois");
	n = AddStr2Array(&sFrFamilies, n, "Binoche,Blacque,Blanc,Blanche,Blanco,Blanvel,Bleneau");
	n = AddStr2Array(&sFrFamilies, n, "Bliche,Blois,Blondel,Blouin,Bluteau,Bobot,Bocande,Bodart,Body,Boeuf,Boileau,Boirot");
	n = AddStr2Array(&sFrFamilies, n, "Bois,Bonaly,Bonamy,Bondies,Bonet,Bonnard,Bonnat");
	n = AddStr2Array(&sFrFamilies, n, "Bonnot,Bontin,Bontoux,Bony,Boon,Borain,Bordieu");
	n = AddStr2Array(&sFrFamilies, n, "Borely,Borot,Bosquet,Bouchet,Bouchez");
	n = AddStr2Array(&sFrFamilies, n, "Boudin,Boughe,Bouic,Boulais,Boulez");
	n = AddStr2Array(&sFrFamilies, n, "Bourbon,Bourdin,Bourdy,Bourel,Bourget");
	n = AddStr2Array(&sFrFamilies, n, "Bourlet,Bourque,Boursin,Bousies,Boussac");
	n = AddStr2Array(&sFrFamilies, n, "Boussod,Boutard,Boutin,Boutron,Boutter,Bouvard,Bouvron,Boves,Boyer,Boyette");
	n = AddStr2Array(&sFrFamilies, n, "Bozon,Braud,Braudel,Brebeuf,Brechu,Brehaut");
	n = AddStr2Array(&sFrFamilies, n, "Brenet,Breton,Breton,Breton,Brezin,Briane,Brie,Brienne,Brindal,Brion,Briot,Briquet");
	n = AddStr2Array(&sFrFamilies, n, "Brisson,Broc,Brocard,Brochet,Bromont,Brouset,Brouzet");
	n = AddStr2Array(&sFrFamilies, n, "Brucy,Brulois,Bruneau,Brunet,Brunius,Bruyas,Buchon,Bude,Buisson,Bujold,Bunul,Buque,Burtin,Burty");
	n = AddStr2Array(&sFrFamilies, n, "Bussey,Buzaine,Cabal,Cabanel,Cabaner,Cadart,Cagnat,Caillet");
	n = AddStr2Array(&sFrFamilies, n, "Caillot,Cali,Callier,Calmes,Cals,Camelot");
	n = AddStr2Array(&sFrFamilies, n, "Camoin,Camus,Candela,Capelle,Carala,Cardin,Cardone,Caree,Carnot");
	n = AddStr2Array(&sFrFamilies, n, "Caron,Carrard,Carrat,Carraz,Cartier,Casabou,Cassard,Cassatt,Cassel");
	n = AddStr2Array(&sFrFamilies, n, "Castang,Castel,Castel,Caster,Castets,Catteau,Caubere,Causier");
	n = AddStr2Array(&sFrFamilies, n, "Cavour,Cayeux,Cazalet,Cazalis,Censier,Ceran,Cevaer,Cezanne,Chabert");
	n = AddStr2Array(&sFrFamilies, n, "Chabon,Chailly,Chalon,Chalons,Chambon");
	n = AddStr2Array(&sFrFamilies, n, "Chappes,Chardon");
	n = AddStr2Array(&sFrFamilies, n, "Charron");
	n = AddStr2Array(&sFrFamilies, n, "Charzat,Chastel,Chatard,Chatas");
	n = AddStr2Array(&sFrFamilies, n, "Chauvet,Chenal,Cherel,Cherier");
	n = AddStr2Array(&sFrFamilies, n, "Cheval,Chevit,Chirot,Choisi,Choisy,Choquet");
	n = AddStr2Array(&sFrFamilies, n, "Cinelu,Citte,Cixous,Claret,Clari,Clarico,Clavell,Cleach");
	n = AddStr2Array(&sFrFamilies, n, "Cleda,Clement,Clerc,Clerico,Clouet,Clouzot");
	n = AddStr2Array(&sFrFamilies, n, "Cocteau,Coeur,Coeuroy,Coffier,Colemi,Collard");
	n = AddStr2Array(&sFrFamilies, n, "Collopy,Comay,Combe,Combes,Comeau,Comtois,Cone,Conil,Conte");
	n = AddStr2Array(&sFrFamilies, n, "Cornaut,Corot,Coste,Cote,Cottard,Cottaz,Cottins,Coucy,Couderc");
	n = AddStr2Array(&sFrFamilies, n, "Couprie,Courbet,Courcy,Cousin,Coutela");
	n = AddStr2Array(&sFrFamilies, n, "Couture,Couve,Crasson,Cremer,Crespy,Cretier,Cros,Cueff,Cugnon");
	n = AddStr2Array(&sFrFamilies, n, "Cupidon,Cusson,Cuvier,d'Aubec,d'Orsay,d'Orty");
	n = AddStr2Array(&sFrFamilies, n, "Dabry,Dacier,Dacourt,Dagort,Dalle,Dallons,Dampier,Dandieu,Danel,Danfrie");
	n = AddStr2Array(&sFrFamilies, n, "Daoustd,Dary,Daudet,Daumier,Daunay,Dautane");
	n = AddStr2Array(&sFrFamilies, n, "Daux");
	n = AddStr2Array(&sFrFamilies, n, "De Leon,De Man");
	n = AddStr2Array(&sFrFamilies, n, "Deblock,Deboos,Debove,Debusse,Debussy,Decaux");
	n = AddStr2Array(&sFrFamilies, n, "Dechy,Decugis,Deferne,Degas,Degert,Deglau,Dehaene,Deharo");
	n = AddStr2Array(&sFrFamilies, n, "Delair,Delaune,Delluc,Delong");
	n = AddStr2Array(&sFrFamilies, n, "Delorm,Delpech,Delvaux,Demilly,Demy,Deneuve,Deneye,Deniau");
	n = AddStr2Array(&sFrFamilies, n, "Denis,Denizot,Denon,Denot,Deprez,Deprez,Derain,Derame");
	n = AddStr2Array(&sFrFamilies, n, "Deshors,Desire,Desneux,Dessum,Destine,Destot");
	n = AddStr2Array(&sFrFamilies, n, "Dewees,Deylaud,Dhenin,Dhinnin,Diderot,Didier,Dietou");
	n = AddStr2Array(&sFrFamilies, n, "Dimier,Diole,Diomede,Dionne,Distel,Doillac,Doleuze,Dolige");
	n = AddStr2Array(&sFrFamilies, n, "Dor,Doreau,Dorsile,Doublet,Doucet,Douie,Doumen,Doumer,Dourthe,Droette,Drouet,Du");
	n = AddStr2Array(&sFrFamilies, n, "Dubosc,Ducat,Duclos,Ducoton,Ducret,Ducros,Duellet,Duese,Dufaux");
	n = AddStr2Array(&sFrFamilies, n, "Duffet,Dufoix,Dufrene,Dugarry,Dugas,Duguay,Dumas,Dumay,Dunand");
	n = AddStr2Array(&sFrFamilies, n, "Duphot,Dupin,Duplan,Dupouey,Dupray,Duran,Durand,Duranty,Duret,Durieux,Durot,Duthuit");
	n = AddStr2Array(&sFrFamilies, n, "Dutoit,Dutronc,Dutruel,Duval,Duvall,Ega,Elby,Elien,Emery");
	n = AddStr2Array(&sFrFamilies, n, "Ereau,Erignac,Eriq,Erler,Escot,Escude,Esprit");
	n = AddStr2Array(&sFrFamilies, n, "Estruen,Evigan,Evrard,Fabre,Faby,Faille,Falcon,Falcoz,Fantin,Farner,Farry");
	n = AddStr2Array(&sFrFamilies, n, "Fauche,Faure,Fauvel,Favour,Favre,Favreau,Febre,Feneon,Ferat,Ferga,Ferga,Ferques");
	n = AddStr2Array(&sFrFamilies, n, "Ferrier,Ferttet,Fevre,Feydeau,Ficher,Fiere,Filion,Finance,Fioupou,Fiquet,Fivet,Flandre");
	n = AddStr2Array(&sFrFamilies, n, "Fleury,Flor,Floray,Florent,Flory,Flotard,Focquet,Fontang");
	n = AddStr2Array(&sFrFamilies, n, "Foray,Foree,Forez,Forget");
	n = AddStr2Array(&sFrFamilies, n, "Fostroy,Foubert,Foucan,Foucher,Foucras,Foulon,Fouques,Fouquet,Fourier");
	n = AddStr2Array(&sFrFamilies, n, "Foury,Foy,Fremont,Friaize");
	n = AddStr2Array(&sFrFamilies, n, "Frutaz,Fuchs,Fuligny,Fumon,Furnon,Gabriel,Gachet,Gachot,Gagnon");
	n = AddStr2Array(&sFrFamilies, n, "Gallet,Gallois,Galthie,Gamelin");
	n = AddStr2Array(&sFrFamilies, n, "Gantois,Gaounon,Garaudy,Gareau,Gariel,Garinet,Garnier,Garreau,Gaspard,Gasquet");
	n = AddStr2Array(&sFrFamilies, n, "Gassou,Gatien,Gaubil,Gaudet,Gaudry,Gauliet,Gauliot");
	n = AddStr2Array(&sFrFamilies, n, "Gautier,Gay,Gayrard,Geffroy,Gene,Genevie,Geney,Gerome,Gervex,Gery");
	n = AddStr2Array(&sFrFamilies, n, "Ghil,Gilbert,Gill,Gillard,Gillet,Giner");
	n = AddStr2Array(&sFrFamilies, n, "Giot,Giradou,Giraud,Gireaud,Giron,Giroux,Gleyre,Gobert,Gobinet,Godard,Goddard,Goddat,Godet");
	n = AddStr2Array(&sFrFamilies, n, "Godin,Goffin,Gogny,Golmard,Gonse,Gossett,Goubert,Gougot");
	n = AddStr2Array(&sFrFamilies, n, "Goulet,Goupil,Gouron,Goyette,Grand,Grandet,Grandin");
	n = AddStr2Array(&sFrFamilies, n, "Grandon,Granet,Gratien,Grava,Gravel,Gravier,Grebaut,Grelot,Grignon,Grillon");
	n = AddStr2Array(&sFrFamilies, n, "Grony,Gros,Groulx,Gruson,Guenier,Guepy,Guerard");
	n = AddStr2Array(&sFrFamilies, n, "Guerin,Guerin.,Guesdon,Guidry,Guihard");
	n = AddStr2Array(&sFrFamilies, n, "Guillon,Guillot,Guims,Guines,Guiomar,Guiraud,Guisset,Guitry,Guizet,Guizot,Gumy");
	n = AddStr2Array(&sFrFamilies, n, "Guys,Habig,Halard,Ham,Hanotel,Harend,Hasse");
	n = AddStr2Array(&sFrFamilies, n, "Hebert,Heinis,Helleu,Herbaut,Herbaux,Hermant,Herment,Herve,Heumont,Hilaire");
	n = AddStr2Array(&sFrFamilies, n, "Homo,Hormel,Houdain,Houssin,Hout,Hubert,Huet,Hugo,Huillet");
	n = AddStr2Array(&sFrFamilies, n, "Huont,Huriet,Hurtis,Hyeres,Ibelin,Ingres,Iserbyt,Issorat");
	n = AddStr2Array(&sFrFamilies, n, "Jacquet,Jadin,Jadot,Jambart,Janin,Janquin,Jarnet,Jarre,Jarry,Javert");
	n = AddStr2Array(&sFrFamilies, n, "Jeannot,Jenlain,Jeune,Jeunet,Jobert,Joffre,Jogues");
	n = AddStr2Array(&sFrFamilies, n, "Jolivet,Jolves,Jondet,Jospin,Joubert,Jouy,Juillet,Julia,Kampe");
	n = AddStr2Array(&sFrFamilies, n, "Kert,Kiffer,Killy,Labande,Labaye,Labbe,Labit");
	n = AddStr2Array(&sFrFamilies, n, "Laboure,Labre,Laclau,Lacombe,Laconi,Lacroix");
	n = AddStr2Array(&sFrFamilies, n, "Lafitte,Laforet,Laigle,Lalande");
	n = AddStr2Array(&sFrFamilies, n, "Lalanne,Lama,Lamache,Lamarre,Lambert,Lamiel,Lamine,Lamy,Lanctot,Landas,Landre");
	n = AddStr2Array(&sFrFamilies, n, "Landry,Lang,Langey,Laporte,Lapotre,Laprade");
	n = AddStr2Array(&sFrFamilies, n, "laRoche,Larue,Laskine,Lassucq,Lastex,Latour");
	n = AddStr2Array(&sFrFamilies, n, "Lauga,Laune,Laurent,Laurier,Lavagne");
	n = AddStr2Array(&sFrFamilies, n, "Lavicq,Lavigne,Lavoie,Layard,Lazaro,Le Braz");
	n = AddStr2Array(&sFrFamilies, n, "Le Nain,Lebel,Leboeuf,Lebouc,Lecadre,Leccia");
	n = AddStr2Array(&sFrFamilies, n, "Leconte,Lecouve,Lecroix,Lefebre,Lefevre,Leflon,leForez,Lefou,Lefranc,leFrene");
	n = AddStr2Array(&sFrFamilies, n, "Leger,Legout,Legros,Lejosne,Lelong,Lelouch,Lelu,Lemaire,Lemer,Lemerre,leMez");
	n = AddStr2Array(&sFrFamilies, n, "Lemorne,Leonard,Leotard,Lepercq,Leplat,Lesache");
	n = AddStr2Array(&sFrFamilies, n, "Lesbros,Lesein,Letice,Letoute,Leveaux,Levet,Levicq");
	n = AddStr2Array(&sFrFamilies, n, "Leydier,Lezine,Ligier,Liotard,Lise,Lit");
	n = AddStr2Array(&sFrFamilies, n, "Loit,Lomont,Lonard,Longin,Longuet,Lorcy,Loret,Lorgnon,Loria");
	n = AddStr2Array(&sFrFamilies, n, "Lorrain,Lortie,Louagie,Loubens,Louet,Loupey,Louppe,Luart,Lubin,Lucay,Lucre,Lumet,Luquet");
	n = AddStr2Array(&sFrFamilies, n, "Mably,Maccaux,Madalle,Magne,Magre,Mailly");
	n = AddStr2Array(&sFrFamilies, n, "Malcher,Malecot,Mallen,Mallet,Malmert,Malraux,Maminot");
	n = AddStr2Array(&sFrFamilies, n, "Manet,Manoury,Marais,Marat,Marceau,Marches,Marck");
	n = AddStr2Array(&sFrFamilies, n, "Marguin,Marin,Marion,Marly,Marnet,Marot,Marrone,Marrot");
	n = AddStr2Array(&sFrFamilies, n, "Marrou,Martel,Martin,Maspero");
	n = AddStr2Array(&sFrFamilies, n, "Massoni,Matagne,Mateau,Mathou,Mathy,Matisse,Mattier,Matton,Maurois,Maxse,Mazan");
	n = AddStr2Array(&sFrFamilies, n, "Mazarin,Mazas,Mazin,Meillet,Meley,Mello,Menard,Mendes,Mendy");
	n = AddStr2Array(&sFrFamilies, n, "Menjou,Menou,Menuel,Mercie,Mercier,Merivel,Merle,Merle,Merleau");
	n = AddStr2Array(&sFrFamilies, n, "Merrien,Mesmin,Mesnard,Mesnier,Metman,Metraux,Meunier,Meurent,Meurice");
	n = AddStr2Array(&sFrFamilies, n, "Meyer,Micaux,Michon,Miere,Mignard,Millin,Millot,Mingeon,Minie,Mionnet");
	n = AddStr2Array(&sFrFamilies, n, "Mirbeau,Modeste,Moinard,Moirin,Mollais,Mollat,Mollet,Monami,Moncel");
	n = AddStr2Array(&sFrFamilies, n, "Moncey,Monet,Mons,Monson,Montand,Montet,Monteux");
	n = AddStr2Array(&sFrFamilies, n, "Moreau");
	n = AddStr2Array(&sFrFamilies, n, "Moreuil,Morier,Morin,Morisot,Mosse,Mothron,Mouffe,Moulu,Mouly,Mourge");
	n = AddStr2Array(&sFrFamilies, n, "Mousson,Muche,Murat,Muscat,Musset,Mymeri,Nadeau,Nangis");
	n = AddStr2Array(&sFrFamilies, n, "Nanton,Narcy,Nattier,Nautin,Navarre,Navarre,Naveau,Naville,Nazon,Negret");
	n = AddStr2Array(&sFrFamilies, n, "Nelaton,Nemours,Nerciat,Nesles,Neuilly,Nevers,Niquet,Nivard,Nivel,Nivelon");
	n = AddStr2Array(&sFrFamilies, n, "Nizan,Nogent,Noiret,Nordin,Noriac,Noyon,Nule,Nully,Olleris,Oreille,Oresme,Othon");
	n = AddStr2Array(&sFrFamilies, n, "Oudant,Oudet,Oudinot,Ougier,Ouvier,Pacaut,Pacome,Pagnol,Pain,Paix");
	n = AddStr2Array(&sFrFamilies, n, "Panis,Papon,Paradis,Paris,Pastor");
	n = AddStr2Array(&sFrFamilies, n, "Paton,Paty,Pauli,Paulot,Pelchat,Pelous");
	n = AddStr2Array(&sFrFamilies, n, "Peloux,Penaud,Pepin,Perec,Perie,Perreau,Perrer,Perrey,Perrier,Perrin,Perrot,Perroy,Perteau");
	n = AddStr2Array(&sFrFamilies, n, "Peslier,Pesmes,Petiot,Petit,Petrou,Pettit,Peyrot");
	n = AddStr2Array(&sFrFamilies, n, "Picard,Pichois,Pichot,Picotin,Piedalu,Pigorel,Pilar,Pilon,Pinard");
	n = AddStr2Array(&sFrFamilies, n, "Pinette,Pingaud,Pinon,Pinot,Pinte,Pioline,Pires,Piroth,Planche");
	n = AddStr2Array(&sFrFamilies, n, "Plasait,Plat,Plaziat,Pluchet");
	n = AddStr2Array(&sFrFamilies, n, "Poiret,Poiters,Poitier,Pomares,Pons,Ponty,Poret");
	n = AddStr2Array(&sFrFamilies, n, "Pouchet,Pouget,Poujade,Poulet,Pouzade,Prat,Preaux");
	n = AddStr2Array(&sFrFamilies, n, "Presle,Prevot,Priaulx,Primeau,Prins,Privat,Prolat,Proriol,Prost,Proust,Provins,Provins,Puget");
	n = AddStr2Array(&sFrFamilies, n, "Pulle,Queneau,Quentin,Quesnel,Rabbi,Rambert,Rameau,Ramelle,Ramet");
	n = AddStr2Array(&sFrFamilies, n, "Rampal,Ran÷on,Raoux,Ratel,Rault,Rault,Ravel");
	n = AddStr2Array(&sFrFamilies, n, "Ravon,Reaume,Remesey,Remesy,Remi,Remond,Remusat,Renan,Renaud,Renault,Renier");
	n = AddStr2Array(&sFrFamilies, n, "Renoir,Renouf,Retel,Revel,Revol,Rey,Reynel,Rheims,Ribot,Richard");
	n = AddStr2Array(&sFrFamilies, n, "Richert,Richir,Rieux,Rimbaud,Rimbert,Rimeaux,Riu,Rivette,Riviere,Robert");
	n = AddStr2Array(&sFrFamilies, n, "Roblou,Rochant,Roche,Rochon,Rodin,Roger,Roig,Rollin");
	n = AddStr2Array(&sFrFamilies, n, "Romary,Ronet,Ronnay,Ronsoi,Roty,Rouaix,Rouard,Rouart,Roubel,Rouget,Rouille");
	n = AddStr2Array(&sFrFamilies, n, "Rouleau,Roumet,Roussel,Rousset,Roux,Ruel,Rufin,Ruinart,Saby,Saglier");
	n = AddStr2Array(&sFrFamilies, n, "Sains,Saisset");
	n = AddStr2Array(&sFrFamilies, n, "Salerou,Salles,Samois,Sangier,Sartain,Sartre,Sastre,Saunier,Saurine,Saury");
	n = AddStr2Array(&sFrFamilies, n, "Seguro,Seigner,Seigre,Sene,Sennec,Senue,Serrou");
	n = AddStr2Array(&sFrFamilies, n, "Seydoux,Sidot,Simenon,Simond,Simonet");
	n = AddStr2Array(&sFrFamilies, n, "Siries,Siverey,Slima,Soisi,Soisson,Soisson,Solari,Soleil,Soleuze,Solves,Sonnes,Sorbon,Sorel");
	n = AddStr2Array(&sFrFamilies, n, "Soula,Soulary,Soulice,Soulie,Soulis,Spagnol,Suchet,Sulis,Surin,Syvret");
	n = AddStr2Array(&sFrFamilies, n, "Tabarie,Tahon,Tailbot,Taillez,Taillon,Tanlay,Tarnaud,Tarrou,Tauziat");
	n = AddStr2Array(&sFrFamilies, n, "Tellier,Temay,Temry,Teppe,Terhune,Termes,Ternien,Terrier");
	n = AddStr2Array(&sFrFamilies, n, "Terrot,Tessier,Testud,Teza,Theriot,Theron,Theroux,Thibaut");
	n = AddStr2Array(&sFrFamilies, n, "Thiers,Thillot,Thiry,Thonon,Thuram,Tihon,Tiolier,Tissot");
	n = AddStr2Array(&sFrFamilies, n, "Tobel,Toche,Tombes,Toucy,Tourret");
	n = AddStr2Array(&sFrFamilies, n, "Toutain,Toye,Traore,Trebert,Trenet,Trentin");
	n = AddStr2Array(&sFrFamilies, n, "Tribes,Triep,Trit,Troubal,Troyes,Turgeon,Turquet,Urboise,Vachon");
	n = AddStr2Array(&sFrFamilies, n, "Valadon,Valenod,Valery,Vallet,Valois,Vanel,Varlet,Vasseur,Velines");
	n = AddStr2Array(&sFrFamilies, n, "Venard,Vendele,Veniard,Verbist,Verdier,Verdoux,Verdun,Verguet,Verlet,Vernon,Veron,Verret");
	n = AddStr2Array(&sFrFamilies, n, "Versey,Versin,Versois,Vertus,Veyron,Vial,Vianney,Viars,Vibert");
	n = AddStr2Array(&sFrFamilies, n, "Vidal,Vidler,Vien,Vigne,Vignory,Villars");
	n = AddStr2Array(&sFrFamilies, n, "Vinet,Vinoy,Violet,Vion,Virieux,Virsin,Visse,Vittoz,Vivant,Voisin");
	n = AddStr2Array(&sFrFamilies, n, "Vollard,Voysey,Vuitton,Walleme,Wanou");
	n = AddStr2Array(&sFrFamilies, n, "Watteau,Wavelet,Wilmart,Xavier,Yerres,Zabelle");

// Spain
// man names
	n = 0;
	n = AddStr2Array(&sSpManNames, n, "Abaiub,Abdias,Abeyza,Abolus,Abozam,Abril");
	n = AddStr2Array(&sSpManNames, n, "Adaiuti,Adica,Adolfo,Adulfus,Agane,Agilo,Aiaz,Ailare,Alario,Alberto,Albeto");
	n = AddStr2Array(&sSpManNames, n, "Albinus,Alfonso,Alfonso,Alfonso,Alfredo,Alonso");
	n = AddStr2Array(&sSpManNames, n, "Altulfo,Aluin,Alvaro,Alvaro,Alvaro,Alvaro,Amar,Ambrino,Ambroz,Andemio,Andreas");
	n = AddStr2Array(&sSpManNames, n, "Andreas,Andres,Annaia,Ansuri,Antolin,Antolin,Antonio,Antonio,Antonio,Antuan,Apidius");
	n = AddStr2Array(&sSpManNames, n, "Argiso,Arias,Arias,Arimir,Armando");
	n = AddStr2Array(&sSpManNames, n, "Arnaldo,Artemio,Arturo,Arvidio,Assur,Assur");
	n = AddStr2Array(&sSpManNames, n, "Ato,Avigdor,Azrec,Balla");
	n = AddStr2Array(&sSpManNames, n, "Barros,Beatus,Bellito,Beltran,Benatus,Beneyto,Benito,Bera");
	n = AddStr2Array(&sSpManNames, n, "Berto,Blas,Bonon,Braolio");
	n = AddStr2Array(&sSpManNames, n, "Carlo,Carlos,Cereial,Cesario,Chago,Chencho,Chico,Cililia");
	n = AddStr2Array(&sSpManNames, n, "Ciro,Cisila,Citi,Claudio,Coram,Cosme");
	n = AddStr2Array(&sSpManNames, n, "Daniel,Daniel,Dante,Dario,David,Deodato,Deodavi,Diaco,Diago,Diago,Diaz,Diego,Domingo");
	n = AddStr2Array(&sSpManNames, n, "Don,Donato,Donino,Donnel,Donno,Durante,Ecta,Edmundo,Eduardo,Eduardo,Egas,Egica,Egila,Eiza");
	n = AddStr2Array(&sSpManNames, n, "Eizac,Elca,Eldo,Eloy,Emellio,Enrique,Enrique,Ermildi,Ernesto");
	n = AddStr2Array(&sSpManNames, n, "Esidero,Esteban,Esteuan,Eugenio,Evare,Eyague,Facundo,Fafila,Fagund,Felipe,Felipe");
	n = AddStr2Array(&sSpManNames, n, "Felipe,Felipe,Felix,Felix,Felzano,Ferro,Filoria,Flazino");
	n = AddStr2Array(&sSpManNames, n, "Fortes,Fortum,Framila,Franco");
	n = AddStr2Array(&sSpManNames, n, "Froila,Froila,Frutos,Gabriel,Galeno,Galindo,Garci,Garcia,Garcia,Garsea");
	n = AddStr2Array(&sSpManNames, n, "Gaspar,Gemel,Geraldo,Gil,Gines,Giraldo");
	n = AddStr2Array(&sSpManNames, n, "Gitano,Gomez,Gomiz,Gontino,Gonzalo,Gonzalo,Gotinus");
	n = AddStr2Array(&sSpManNames, n, "Goto,Gualit,Guido,Guillen");
	n = AddStr2Array(&sSpManNames, n, "Guiral,Gusbert,Gutier,Guttier,Hazan,Hazzeb,Hector,Hernan");
	n = AddStr2Array(&sSpManNames, n, "Hugo,Iaceo,Iaia,Ienello,Imila,Inigo,Inigo");
	n = AddStr2Array(&sSpManNames, n, "Iosuae,Isciame,Iscipio,Isidro,Isidro,Iubla,Iuliano,Iuliano,Iulius");
	n = AddStr2Array(&sSpManNames, n, "Iustus,Jacinto,Jaime,Jaime,Jaime,Jaoquin,Javier,Jerico,Joaquin,Jorge,Jose,Jose,Jose,Juan");
	n = AddStr2Array(&sSpManNames, n, "Juan,Juan,Juan,Jusepe,Keia,Lando,Lazaro,Lencho,Liberio");
	n = AddStr2Array(&sSpManNames, n, "Lope,Lope,Lorenzo,Lorenzo,Lorenzo,Lubla,Lucas,Luis,Lunes,Lupi,Magino,Magito,Mairaus");
	n = AddStr2Array(&sSpManNames, n, "Manco,Mango,Manuel,Marco,Marcos,Marquez,Martin,Marto,Mateho,Materno,Mathias,Matias");
	n = AddStr2Array(&sSpManNames, n, "Matteus,Maurane,Maurban,Maximus,Maxitus,Melchor,Meliki");
	n = AddStr2Array(&sSpManNames, n, "Memi,Mentius,Micael,Miguel,Minel,Monioni,Monnio,Monnio,Mosen,Muza");
	n = AddStr2Array(&sSpManNames, n, "Napier,Natan,Navarro,Neper,Nevada,Nicabar,Nicolas,Nina,Nunno,Nunnus,Oalo,Obecco,Oranius");
	n = AddStr2Array(&sSpManNames, n, "Orbanus,Ordonio,Orlo,Oscar,Osmundo,Osorio,Pablo,Pancho,Pastor,Pater,Paulo");
	n = AddStr2Array(&sSpManNames, n, "Pay,Paz,Pedro,Pedro,Pedro,Pepe,Pepi,Pepi,Pepillo,Pepino,Peralta,Petro,Petro");
	n = AddStr2Array(&sSpManNames, n, "Petrus,Pilotti,Piniolo,Placido,Ponce,Probus,Pruenze,Quenta,Quirico,Rafael");
	n = AddStr2Array(&sSpManNames, n, "Ramiro,Ramon,Rattero,Raul");
	n = AddStr2Array(&sSpManNames, n, "Renaldo,Rexindo,Ricardo,Ricardo,Rico,Roberto,Rocco,Rodolfo,Rodrico,Rodrigo,Rolon,Romanus");
	n = AddStr2Array(&sSpManNames, n, "Rosario,Ruy,Sabiano,Sanchez,Sancho,Sando,Sanson");
	n = AddStr2Array(&sSpManNames, n, "Santo,Sanzo,Senda,Sendino,Sendino,Senon");
	n = AddStr2Array(&sSpManNames, n, "Sereno,Serge,Sescuto,Sesmiro,Severo,Sidonio,Silvino,Simon");
	n = AddStr2Array(&sSpManNames, n, "Simon,Sonna,Suario,Suarius,Tagel,Taion,Tel,Tello,Tello");
	n = AddStr2Array(&sSpManNames, n, "Teodoro,Teton,Tiago,Ticho,Tomas,Tomas,Truylos,Uasco,Uasco,Uela");
	n = AddStr2Array(&sSpManNames, n, "Uelasco,Uelasco,Uermudo,Uidal,Uidal,Uita,Uitalez,Uiui,Valdeo,Valerio,Vermudo");
	n = AddStr2Array(&sSpManNames, n, "Vicente,Vicente,Vigila,Vistia,Vito,Xabe,Xain,Xame");
	n = AddStr2Array(&sSpManNames, n, "Xavier,Xemeno,Zaid,Zaite,Zaiton,Zalama,Zanitu,Zarinus,Zezzon,Zonius");

// women names
	n = 0;
	n = AddStr2Array(&sSpWomenNames, n, "Abril,Adelita,Adoncia,Aletea,Alicia,Alma,Almeda,Amada,Amata,Ana,Ana,Angela,Anica");
	n = AddStr2Array(&sSpWomenNames, n, "Anita,Argilo,Auria,Auro,Aurora,Beatriz,Bebe,Belen,Belicia,Belinda,Belita");
	n = AddStr2Array(&sSpWomenNames, n, "Benicia,Berta,Bertina,Blanca,Bona,Bonita,Branca,Brigida,Brisa,Cailida,Carina,Carissa");
	n = AddStr2Array(&sSpWomenNames, n, "Carmen,Carmine,Cecilia,Charo,Claudia,Columba,Corazon");
	n = AddStr2Array(&sSpWomenNames, n, "Damita,Dela,Diana,Dolores,Domenga,Doncia,Dorinda,Drina,Duena,Eilo,Eita");
	n = AddStr2Array(&sSpWomenNames, n, "Eldonza,Eldora,Elena,Elisa,Eloisa,Elsa,Elvira,Elvira,Emilia,Erica");
	n = AddStr2Array(&sSpWomenNames, n, "Eufemia,Eva,Felicia");
	n = AddStr2Array(&sSpWomenNames, n, "Gelvira,Gelvira,Gema,Gidita,Gitana,Gloria,Godina,Gontina,Gota,Gotecia");
	n = AddStr2Array(&sSpWomenNames, n, "Ines,Inez,Isabel,Iuana,Iuliana,Jacinta,Jade,Jaira,Javiera");
	n = AddStr2Array(&sSpWomenNames, n, "Jesusa,Juana,Juanita,Julia,Julia,Lali,Lareina,Laura,Laura,Laura,Laura,Lela,Letitia");
	n = AddStr2Array(&sSpWomenNames, n, "Leya,Licha,Linda,Lola,Lolita,Loretta,Lota,Lucia,Lucinda,Lucita,Luisa,Luisa,Luna,Luz");
	n = AddStr2Array(&sSpWomenNames, n, "Maria,Maria,Maria,Maria,Maria,Mariana,Mariana,Marina,Marta,Matre,Mega,Melia,Melosa");
	n = AddStr2Array(&sSpWomenNames, n, "Missol,Monnia,Mora,Morisak,Mēnica,Nana,Necha,Nelia,Nesho,Neva,Nevada,Nina,Nita,Paloma,Pamela");
	n = AddStr2Array(&sSpWomenNames, n, "Patia,Paula,Paz,Pepita,Pilar,Placia,Queta,Rafaela,Ramona,Raquel,Ria,Rima,Risa,Rita");
	n = AddStr2Array(&sSpWomenNames, n, "Rosa,Rosa,Rosana,Rosanna,Rosita,Sancha,Sancia,Sandra,Scemena,Scemena,Sendina,Sesildi");
	n = AddStr2Array(&sSpWomenNames, n, "Silvia,Sita,Sol,Sol,Sonia,Suela,Susana,Taresa,Tasia,Teoda,Teresa,Trisa,Uita,Urraca");
	n = AddStr2Array(&sSpWomenNames, n, "Vida,Violeta,Xandra,Ynes,Yolanda,Zita");

// families
	n = 0;
	n = AddStr2Array(&sSpFamilies, n, "Abarca,Acarons,Acosto,Adega,Agassiz,Agia,Aguero,Aguila,Aguilar,Aguirre,Aicega,Alameda,Alas");
	n = AddStr2Array(&sSpFamilies, n, "Albano,Albo,Aldama,Alday,Alegria");
	n = AddStr2Array(&sSpFamilies, n, "Alemany,Alemao,Alkorta,Allende,Allende,Almagro,Almeyda,Alonso,Alvarez,Alvaro");
	n = AddStr2Array(&sSpFamilies, n, "Alvear,Amor,Anaya,Andres,Angeloz,Angulo,Antuma,Aranda,Arbizu");
	n = AddStr2Array(&sSpFamilies, n, "Aristia,Armas,Armesto,Arnal,Arrese,Arria");
	n = AddStr2Array(&sSpFamilies, n, "Arruti,Arrutti,Arteaga,Arzu,Aspe,Ayala,Azaria,Aznar,Badillo,Bajtera,Balbi");
	n = AddStr2Array(&sSpFamilies, n, "Balbo,Balboa,Baradez,Baraona,Barba,Bardem");
	n = AddStr2Array(&sSpFamilies, n, "Barjuan,Barrigo,Barrio,Basadre,Batiz,Batran,Bauza,Bazan");
	n = AddStr2Array(&sSpFamilies, n, "Bea,Becerra,Bello,Beloki,Belsue,Benet,Benitez,Benitez");
	n = AddStr2Array(&sSpFamilies, n, "Bergasa,Bermejo,Bernabe,Bernal,Beto,Blanco,Boedo,Bolano,Bolea,Borges,Borrego");
	n = AddStr2Array(&sSpFamilies, n, "Bote,Braga,Bravo,Brizeno,Brugera,Bueno,Buey,Bugeja,Bunuel,Burillo,Busques");
	n = AddStr2Array(&sSpFamilies, n, "Bustos,Cabello,Cabral,Cabrero,Cacares,Cacho,Cachon,Cadena,Cadero,Cafu,Caio,Caldern");
	n = AddStr2Array(&sSpFamilies, n, "Calero,Calvo,Camacho,Camillo,Campo,Campos,Canal,Canans,Canas");
	n = AddStr2Array(&sSpFamilies, n, "Canesa,Canete,Cano,Canseco,Canura,Carmona");
	n = AddStr2Array(&sSpFamilies, n, "Carreno,Carrera,Carrion");
	n = AddStr2Array(&sSpFamilies, n, "Casas,Cascos,Casero,Caso,Castro,Castulo");
	n = AddStr2Array(&sSpFamilies, n, "Catalan,Catano,Cea,Celades,Cerezo,Ceron,Cervano,Cervera,Chamot,Chapado");
	n = AddStr2Array(&sSpFamilies, n, "Chaves,Checa,Chico,Cieza,Clavet");
	n = AddStr2Array(&sSpFamilies, n, "Clopes,Cobo,Coceres,Coelho,Cois");
	n = AddStr2Array(&sSpFamilies, n, "Cordero,Cordona,Cordova,Cornejo,Coronel,Corral,Correa,Cortez,Cortina");
	n = AddStr2Array(&sSpFamilies, n, "Coya,Cresaco,Crespo,Criado,Cruz,Cubrero,Cuellar,Cuello,Cuenca,Cuervo,Cuesta");
	n = AddStr2Array(&sSpFamilies, n, "Dabino,Damian,Davila,Davilo,Davino");
	n = AddStr2Array(&sSpFamilies, n, "De Mena");
	n = AddStr2Array(&sSpFamilies, n, "Deferr,Delgado,Diago,Diaz,Diego,Diez,Disegni,Duany");
	n = AddStr2Array(&sSpFamilies, n, "Duavis,Duce,Dunga,Duran,Echave,Edinho,Edo,Elcano,Enciso,Enrique,Erosa");
	n = AddStr2Array(&sSpFamilies, n, "Escriba,Escriva,Escuda,Espejo,Estay,Estete,Estrada,Fabrega");
	n = AddStr2Array(&sSpFamilies, n, "Fajardo,Falcon,Falla,Fanez,Farfan,Feijoo,Fejos,Felipe,Feliu,Feo,Ferrado,Ferrer,Figo");
	n = AddStr2Array(&sSpFamilies, n, "Filho,Fiz,Flores,Foa,Fonseca,Fonseca,Fraga,Francia,Franco,Frois");
	n = AddStr2Array(&sSpFamilies, n, "Fuente,Fuentes,Funes,Gaite,Galindo,Gallego,Gama,Gamarra,Gamboa");
	n = AddStr2Array(&sSpFamilies, n, "Gamez,Garcia,Garcia,Garibay,Garrido,Garza,Gasco,Gaspar,Gastelu");
	n = AddStr2Array(&sSpFamilies, n, "Gats,Gavilan,Giberau,Giron,Gomez,Gomiz,Gonzaga,Gorriz");
	n = AddStr2Array(&sSpFamilies, n, "Grande,Guaman,Guerra,Guerro,Guevara,Guillen");
	n = AddStr2Array(&sSpFamilies, n, "Gumy,Guzman,Henarez,Henchoz,Heras,Herrera,Hidalgo,Hierro,Hoero,Holguin");
	n = AddStr2Array(&sSpFamilies, n, "Hoyos,Huerta,Huertas,Hurtado,Ibanez,Icaza,Idalia,Iglesia,Iguaran,Illan,Imaz,Iniguez,Insulza");
	n = AddStr2Array(&sSpFamilies, n, "Isasi,Ivarra,Jara,Jimenez,Juarez,Jura,Jurada,Juradu,Keiva,Kiko,La,Lamela,Lanos,Lapenti,Lara");
	n = AddStr2Array(&sSpFamilies, n, "Laredo,Lastres,Lazaro,Ledesma,Len,Leon,Leona,Lerma,Lianos,Lima,Lisson,Lizaur,Llano");
	n = AddStr2Array(&sSpFamilies, n, "Llosa,Lopez,Lora,Lorca,Loredo,Lorente,Lorenzo,Losada,Lozada,Lozana,Lozano,Lucero,Luenga,Luna,Lurdes");
	n = AddStr2Array(&sSpFamilies, n, "Madero,Mamita,Manzo,Marcari,Marcelo");
	n = AddStr2Array(&sSpFamilies, n, "Margas,Maria,Marin,Marquez,Marquez,Martel");
	n = AddStr2Array(&sSpFamilies, n, "Masolta,Massana,Mattez,Matutes,Mauri,Mayo,Mayor,Mayoral,Mazinho,Medina,Meira,Mejia");
	n = AddStr2Array(&sSpFamilies, n, "Mena,Menchu,Mendez,Menem,Meolans,Merino,Merlo");
	n = AddStr2Array(&sSpFamilies, n, "Merry,Mery,Messia,Methol,Mezo,Miguez,Milian,Minguet,Minoza,Miranda,Molina");
	n = AddStr2Array(&sSpFamilies, n, "Monreal,Montana,Montano,Monte,Montejo,Montero,Montez");
	n = AddStr2Array(&sSpFamilies, n, "Montoro,Montoya,Montt,Mora,Moraga,Morales,Moran,Morayta,Morel,Moreno,Moretta");
	n = AddStr2Array(&sSpFamilies, n, "Moscoso,Moya,Muniz,Munoz,Murillo,Muro,Nabarro,Naca,Nadal,Nadol,Naharro,Narvaez");
	n = AddStr2Array(&sSpFamilies, n, "Navaez,Navarro,Nino,Noboa,Nolasco,Noseda,Nunez,Obregon,Ocacio,Ocampo,Ochoa");
	n = AddStr2Array(&sSpFamilies, n, "Ogarrio,Olano,Oliva,Olmedo,Olmos,Oneta,Oraglio,Ordonez,Orgonez");
	n = AddStr2Array(&sSpFamilies, n, "Orizaga,Orozco,Orrego,Ortega,Ortiz,Osario,Osorio,Otero,Pacheco,Padilla,Paez");
	n = AddStr2Array(&sSpFamilies, n, "Pando,Panfilo,Pardo,Paredes,Pareds,Parilla,Parra,Parrado,Parrera");
	n = AddStr2Array(&sSpFamilies, n, "Pascual,Patino,Pedroso,Pelaez,Perahia,Perez,Perez,Periate,Pessoa,Peyrera");
	n = AddStr2Array(&sSpFamilies, n, "Pineda,Pinedo,Pinelo,Pinero,Pinilla,Pinto,Pinzon,Pinzon,Pires,Pita");
	n = AddStr2Array(&sSpFamilies, n, "Piza,Pizarro,Pizzi,Platas,Plazas,Poblano,Polanco,Polo,Porcel,Porras,Portas,Posados");
	n = AddStr2Array(&sSpFamilies, n, "Prado,Pretel,Prieto,Prieto,Puente,Puerta,Pueyo,Puig,Pulido,Purez");
	n = AddStr2Array(&sSpFamilies, n, "Puron,Quehlas,Queiro,Querido,Quesada,Quesado,Questi,Quevedo,Quirot,Rabal,Radondo");
	n = AddStr2Array(&sSpFamilies, n, "Ramiez,Ramirez,Ramos,Ramos,Rangel,Rascon,Recio,Regal,Rengifo,Reto,Rey,Reyes,Riba");
	n = AddStr2Array(&sSpFamilies, n, "Riberol,Rimoldi,Rincon,Rionda,Rivas,Rivera,Rivero,Roa,Robaina,Robano,Robledo");
	n = AddStr2Array(&sSpFamilies, n, "Roca,Rocha,Rodas,Roig,Rojas,Rojo,Rollero,Roma,Roman,Romero,Romo,Rosas,Rosauro");
	n = AddStr2Array(&sSpFamilies, n, "Ruano,Rubiera,Rubio,Rubios,Rucina,Rudas,Rufo,Ruiz,Saenz,Saer");
	n = AddStr2Array(&sSpFamilies, n, "Sagredo,Sahagun,Sala,Salarza,Salas,Salgada,Salinas,Salto,Samarez,Samper,Sanches");
	n = AddStr2Array(&sSpFamilies, n, "Sanchez,Sanchis,Sanin,Sanroma,Santa,Santa,Santana,Santoro,Santos,Santoyo");
	n = AddStr2Array(&sSpFamilies, n, "Sanz,Sarabia,Sarsola,Seabra,Sebrian,Seda,Sedeno,Segarra,Sergi");
	n = AddStr2Array(&sSpFamilies, n, "Serna,Serpa,Serra,Serrano,Sert,Servia,Siculo,Sieres,Sierra,Siliceo,Soitino,Solana,Solano");
	n = AddStr2Array(&sSpFamilies, n, "Soldan,Sortani,Sosa,Sota,Sotelo,Spano,Suarez,Suarez,Tabuyo,Tadena");
	n = AddStr2Array(&sSpFamilies, n, "Tapia,Tarrega,Tavares,Tejada,Tello,Teofilo,Texidor");
	n = AddStr2Array(&sSpFamilies, n, "Toldeo,Toledo,Tomas,Toriano,Toribio,Torrens,Torres,Tortosa,Tovar");
	n = AddStr2Array(&sSpFamilies, n, "Tuero,Ubidia,Ugarte,Ulloa,Unzue,Urrutia,Urteaga,Ussica,Vaime");
	n = AddStr2Array(&sSpFamilies, n, "Valente,Valero,Vales,Valle,Vallejo,Vaquero,Varela,Vargas,Vargos,Vasques");
	n = AddStr2Array(&sSpFamilies, n, "Vazquez,Vega,Vegaso,Vegros,Velasco,Velez,Velloso,Vennera,Vera,Verdugo,Verme,Veron,Viana,Vicario");
	n = AddStr2Array(&sSpFamilies, n, "Vila,Villa,Villar,Viloca,Vingade,Viola,Vivas");
	n = AddStr2Array(&sSpFamilies, n, "Volonte,Vrais,Woriega,Xerez,Ximenez,Xovi,Xuarez,Yanez,Yegros,Yuste");
	n = AddStr2Array(&sSpFamilies, n, "Zaga,Zapata,Zerbino,Zhili,Zorita,Zuaza,Zubero,Zuidema,Zuluaga");

	Trace("");
}