#NEXUS
begin data;
  dimensions ntax=23 nchar=57;
  format datatype=standard gap=- missing=? Interleave=no SYMBOLS= "0123456789";
  matrix 
    Nemertean         1010?10?0900000000000000000000000000009009009000009000090
    Aphroditacea      1111111109111?010111111111111?100000009009009000009000090
    Eunicida          111111110911110101111110111010100000009009009000009000090
    Canalipalpata     111111110911100101111000000010000000009009009000009000090
    Chrysopetalidae   111111110911111101111111111110100000009009009000009000090
    Scolecida         11111111091111010111?000000010000000009009009000009000090
    Helicoradomenia   1110111111?0000000000000000000011100010100009000009000?90
    Chaetoderma       1110111111?0000000000000000000011110010100009000009000190
    Lepidochitona     111001111110000000000000000000012210010110010000002010111
    Neopilina         ?1???11?100?000000000010000000012210009009010000000000190
    Terebratulina     100000000911000000000000000000000001109009011001001000020
    Lingula           100000000911000000000000000000000001109009012101001000020
    Plumulites        ??????????1?????011??????????????000009009011000103301010
    Turrilepas        ????????????????1?1?????????????????009009011000103301010
    Lepidocoleus      ????????????????1?1?????????????????009009011000113301010
    Canadia           ??????????1??01?011?1010000000000000009009009000009000090
    Echinochiton      ??????????????0?000?000?000000?????00101?11100000020?0?1?
    Polysacos         ??????????????0?000?000?000000?????00101?1110000102210111
    Acaenoplax        ??????????????0?000?000?000000???110010100010000002000100
    Halkieria         ??????????????0?000?000?000000?????001011101??000010?000?
    Wiwaxia           ??????????1???0?000?000?000000010??0011?1?009000009000090
    Orthrozanclus     ??????????????0?000?000?000000?????001??1101???000000000?
    Odontogriphus     ??????????????0?000?0000000000010210009009009000009000090
  ;
end;
BEGIN PAUP;
set errorstop=no;
set maxtrees=500 increase=auto autoInc=500;
set outroot=monophyl;
outgroup Nemertean;
hsearch addseq=random nreps=100 rearrlimit=5000000 limitperrep=yes;
roottrees;
savetrees /file=Vinther2008.tre replace;
q;

END;