taxname=; mxram 4096; taxname +27; nstates num 32; xread 'File downloaded from graemetlloyd.com' 10 31 & [numeric] Discocyathus 0000000000 Areopsarmmia 1000?1000? Palaeopsarmmia [13]00000001? Balanophyllia_Balanophyllia 3001100111 Balanophyllia_Eupsammia 3000100111 Lamellophyllia 300001012? Heteropsammia 200041011[12] Wadeopsammia 300021013? Calostylopsis 300001021? Bathypsammia 3001400011 Pourtalopsammia 3001300041 Trochopsammia 3001000041 Endopsammia 3001001011 Leptopsammia 3001101011 Thecopsammia 3001300161 Endopachys 4002110111 Notophyllia 4002100011 Eguchipsammia 5410101111 Rhizopsammia 5111000111 Cladopsammia 5211001101 Paleoastroides 551140116? Astroides 5511101011 Tubastraea 5511011011 Turbinaria 5511411012 Dendrophyllia 53111111[01]1 Enallopsammia 5311110001 Duncanopsammia 5311410152 Dichopsammia 5321011172 Lobopsammia 532100017? Stichopsammia 562101017? Reussopsammia 562101004? ; ccode -[/1 0 -[/1 1 -[/1 2 -[/1 3 -[/1 4 -[/1 5 -[/1 6 -[/1 7 -[/1 8 -[/1 9 ; smatrix = 0 (step_A) 0>0 0 0>1 1 0>2 2 0>3 1 0>4 1 0>5 2 0>6 1 1>0 1 1>1 0 1>2 1 1>3 2 1>4 2 1>5 1 1>6 2 2>0 2 2>1 1 2>2 0 2>3 3 2>4 3 2>5 2 2>6 3 3>0 1 3>1 2 3>2 3 3>3 0 3>4 2 3>5 3 3>6 2 4>0 1 4>1 2 4>2 3 4>3 2 4>4 0 4>5 3 4>6 2 5>0 2 5>1 1 5>2 2 5>3 3 5>4 3 5>5 0 5>6 3 6>0 1 6>1 2 6>2 3 6>3 2 6>4 2 6>5 3 6>6 0 ; smatrix + step_A 1; ccode ( 1; proc/;