EukPhylo/PTL2/Scripts-DEV/guidance.v2.02/libs/phylogeny/fromCountTableComponentToDistance2Codon.cpp
Katzlab dd76ab1d12 Added PTL2 Scripts
These are PTL2 files from Auden 2/9
2023-02-14 11:20:52 -05:00

23 lines
771 B
C++

// $Id: fromCountTableComponentToDistance2Codon.cpp 950 2006-10-19 12:12:34Z eyalprivman $
#include "fromCountTableComponentToDistance2Codon.h"
#include "likeDist2Codon.h"
#include "likeDist.h"
#include <cassert>
fromCountTableComponentToDistance2Codon::fromCountTableComponentToDistance2Codon(
const countTableComponentGam& ctc,
const vector<stochasticProcess> &spVec,
const MDOUBLE toll,
const MDOUBLE brLenIntialGuess ) : _spVec(spVec), _ctc(ctc) {
_distance =brLenIntialGuess ;//0.03;
_toll = toll;
}
void fromCountTableComponentToDistance2Codon::computeDistance() {
likeDist2Codon likeDist1(_spVec,_toll);
MDOUBLE initGuess = _distance;
_distance = likeDist1.giveDistance(_ctc,_likeDistance,initGuess);
assert(_distance>=0);
}