(*Sensitivity Analysis*)

read("9.fas")
set(root:"t1")
store("original_data")
transform(tcm:"s1t1.mat")
build(100)
swap(timeout:3600)
select()
report("9_11.tre",trees:(total),"9_11cs.tre",consensus,"9_11cs.pdf",graphconsensus)
load("original_data")
transform(tcm:"s1t2.mat")
build(100)
swap(timeout:3600)
select()
report("9_12.tre",trees:(total),"9_12cs.tre",consensus,"9_12cs.pdf",graphconsensus)
exit()