fix: sub should re-adj to 0
This commit is contained in:
parent
b2c852eabe
commit
0332d175fd
1 changed files with 6 additions and 0 deletions
|
@ -347,6 +347,9 @@ if (argnumber<=5)
|
|||
sub 5; hold +5000; bbreak=fill;
|
||||
sub 7; hold +7000; bbreak=fill;
|
||||
|
||||
/*adjust to zero following Goloboff*/
|
||||
sub 0;
|
||||
|
||||
/*get the consensus tree number*/
|
||||
var: nsubpars;
|
||||
set nsubpars ntrees;
|
||||
|
@ -383,6 +386,9 @@ else
|
|||
sub 5; hold +5000; bbreak=fill;
|
||||
sub 7; hold +7000; bbreak=fill;
|
||||
|
||||
/*adjust to zero following Goloboff*/
|
||||
sub 0;
|
||||
|
||||
/*get the consensus tree number*/
|
||||
var: nsubpars;
|
||||
set nsubpars ntrees;
|
||||
|
|
Loading…
Reference in a new issue