use of nars.task.NALTask in project narchy by automenta.
the class DynTruth method eval.
/**
* TODO make Task truth dithering optional
*/
public Truthed eval(@NotNull Term superterm, @Deprecated BiFunction<DynTruth, NAR, Truth> truthModel, boolean taskOrJustTruth, boolean beliefOrGoal, float freqRes, float confRes, float eviMin, NAR nar) {
Truth t = truthModel.apply(this, nar);
if (t == null)
return null;
float evi = t.evi();
if (evi < eviMin)
return null;
// this may have already been done in truth calculation
// //TODO compute max valid overlap to terminate the zip early
ObjectFloatPair<long[]> ss = Stamp.zip((List) this, Param.STAMP_CAPACITY);
// evi = evi * Param.overlapFactor(ss.getTwo());
// if (evi < eviMin)
// return null;
float freq = t.freq();
float f;
long start, end;
if (taskOrJustTruth) {
if (size() > 1) {
if (superterm.op() == CONJ) {
long min = TIMELESS;
long maxRange = 0;
boolean eternals = false;
for (int i = 0, thisSize = size(); i < thisSize; i++) {
LongInterval ii = get(i);
long iis = ii.start();
if (iis != ETERNAL) {
min = Math.min(min, iis);
maxRange = Math.max(maxRange, ii.end() - iis);
} else {
eternals = true;
}
}
if (eternals && min == TIMELESS) {
start = end = ETERNAL;
} else {
assert (min != TIMELESS);
// if (min == Long.MAX_VALUE)
// start = end = ETERNAL; //all eternal
// else {
start = min;
end = (min + maxRange);
}
// }
} else {
// dilute the evidence in proportion to temporal sparseness for non-temporal results
EviDensity se = new EviDensity(this);
evi *= se.factor();
if (evi != evi || evi < eviMin)
return null;
start = se.unionStart;
end = se.unionEnd;
}
} else {
// only one task
LongInterval only = get(0);
start = only.start();
end = only.end();
}
if (superterm.op() == NEG) {
// unneg if constructing a task, but dont if just returning the truth
superterm = superterm.unneg();
f = 1f - freq;
} else {
f = freq;
}
} else {
// not used
start = end = XTERNAL;
f = freq;
}
if (!taskOrJustTruth)
return Truth.theDithered(f, freqRes, evi, confRes, w2cSafe(eviMin));
// undithered until final step for max precision
PreciseTruth tr = new PreciseTruth(f, evi, false);
// then if the term is valid, see if it is valid for a task
Term content = truthModel instanceof DynamicTruthModel ? ((DynamicTruthModel) truthModel).construct(superterm, this) : superterm;
@Nullable ObjectBooleanPair<Term> r = Task.tryContent(// otherwise consider the superterm argument as the task content
content, beliefOrGoal ? BELIEF : GOAL, !Param.DEBUG_EXTRA);
if (r == null)
return null;
NALTask dyn = new DynamicTruthTask(r.getOne(), beliefOrGoal, tr.negIf(r.getTwo()).dither(freqRes, confRes, w2cSafe(eviMin)), nar, start, end, ss.getOne());
// if (ss.getTwo() > 0) dyn.setCyclic(true);
dyn.cause = cause();
dyn.priSet(pri());
if (Param.DEBUG_EXTRA)
dyn.log("Dynamic");
return dyn;
}
use of nars.task.NALTask in project narchy by automenta.
the class ConjClustering method conjoinCentroid.
// /**
// * produces a parallel conjunction term consisting of all the task's terms
// */
// public Stream<List<Task>> chunk(Stream<Task> input, int maxComponentsPerTerm, int maxVolume) {
// final int[] group = {0};
// final int[] subterms = {0};
// final int[] currentVolume = {0};
// final float[] currentConf = {1};
// return input.filter(x -> !x.isDeleted())
// .collect(Collectors.groupingBy(x -> {
//
// int v = x.volume();
// float c = x.conf();
//
// if ((subterms[0] >= maxComponentsPerTerm) || (currentVolume[0] + v >= maxVolume) || (currentConf[0] * c < confMin)) {
// //next group
// group[0]++;
// subterms[0] = 1;
// currentVolume[0] = v;
// currentConf[0] = c;
// } else {
// subterms[0]++;
// currentVolume[0] += v;
// currentConf[0] *= c;
// }
//
// return group[0];
// }))
// .entrySet().stream()
// .map(c -> {
// List<Task> v = c.getValue();
// return c.getKey() >= 0 && //only batches of >1
// v.size() > 1 ? v : null; //ignore the -1 discard group
// })
// .filter(Objects::nonNull);
//
// }
// static final BiFunction<Task, Task, Task> termPointMerger = (prevZ, newZ) -> ((prevZ == null) || (newZ.conf() >= prevZ.conf())) ?
// newZ : prevZ;
private List<Task> conjoinCentroid(Stream<VLink<Task>> group, Pair<NAR, List<Task>> narAndTarget) {
NAR nar = narAndTarget.getOne();
// get only the maximum confidence task for each term at its given starting time
// in.input(
// chunk(group.filter(Objects::nonNull).takeWhile(kontinue)
// .map(x -> x.id), maxConjSize, volMax).takeWhile(kontinue).map(tasks -> {
Iterator<VLink<Task>> gg = group.filter(x -> x != null && !x.isDeleted()).iterator();
// Iterators.peekingIterator();
Map<LongObjectPair<Term>, Task> vv = new HashMap<>();
FasterList<Task> actualTasks = new FasterList();
int centroidGen = 0;
List<Task> gen = narAndTarget.getTwo();
main: while (gg.hasNext() && centroidGen < taskLimitPerCentroid) {
vv.clear();
actualTasks.clear();
long end = Long.MIN_VALUE;
long start = Long.MAX_VALUE;
int dur = nar.dur();
float freq = 1f;
float conf = 1f;
float priMax = Float.NEGATIVE_INFINITY, priMin = Float.POSITIVE_INFINITY;
int vol = 0;
int maxVolume = 0;
do {
if (!gg.hasNext())
break;
Task t = gg.next().id;
// gg.peek().id;
Term xt = t.term();
long zs = Tense.dither(t.start(), ditherTime);
long ze = Tense.dither(t.end(), ditherTime);
// assert (end >= start);
Truth tx = t.truth();
Term xtn = xt.neg();
if (tx.isNegative()) {
xt = xtn;
}
int xtv = xt.volume();
maxVolume = Math.max(maxVolume, xt.volume());
if (vol + xtv + 1 >= volMax || conf * tx.conf() < confMin) {
// cant go any further with this task
continue;
}
boolean involved = false;
LongObjectPair<Term> ps = pair(zs, xt);
Term xtNeg = xt.neg();
if (!vv.containsKey(pair(zs, xtNeg)) && null == vv.putIfAbsent(ps, t)) {
vol += xtv;
if (start > zs)
start = zs;
if (end < zs)
end = zs;
involved = true;
}
if (ze - zs >= dur) {
// endpoint
if (vol + xtv + 1 < volMax) {
LongObjectPair<Term> pe = pair(ze, xt);
if (!vv.containsKey(pair(ze, xtNeg)) && null == vv.putIfAbsent(pe, t)) {
// end point, if different from start
vol += xtv;
if (end < ze)
end = ze;
involved = true;
}
}
}
if (involved) {
actualTasks.add(t);
conf *= tx.conf();
float tf = tx.freq();
// since it will appear as a negated subterm
freq *= tx.isNegative() ? (1f - tf) : tf;
float p = t.priElseZero();
if (p < priMin)
priMin = p;
if (p > priMax)
priMax = p;
}
} while (vol < volMax - 1 && conf > confMin);
int vs = actualTasks.size();
if (vs < 2)
continue;
// the tasks which are actually involved
Task[] uu = actualTasks.toArrayRecycled(Task[]::new);
// TODO discount based on evidential overlap? needs N-way overlapFraction function
ObjectFloatPair<long[]> evidence = Stamp.zip(actualTasks, Param.STAMP_CAPACITY);
float overlap = evidence.getTwo();
float e = c2w(conf) * Param.overlapFactor(overlap);
if (e > 0) {
final Truth t = Truth.theDithered(freq, e, nar);
if (t != null) {
Term cj = Conj.conj(vv.keySet());
if (cj != null) {
cj = cj.normalize();
if (Math.abs(cj.dtRange() - (end - start)) < ditherTime) {
// test if merge collapse occurred and occurrence time needs recalculated
ObjectBooleanPair<Term> cp = Task.tryContent(cj, punc, true);
if (cp != null) {
// TODO use a truth calculated specific to this fixed-size batch, not all the tasks combined
NALTask m = new STMClusterTask(cp, t, start, start, evidence.getOne(), punc, now);
// if (evidence.getTwo() > 0) m.setCyclic(true);
m.cause = Cause.sample(Param.causeCapacity.intValue(), uu);
float p = // priMax;
priMin;
// (priMin + priMax) / 2f;
// complexity deduction
// how much more complex the conjunction is than the most complex of its ingredients
int v = cp.getOne().volume();
float cmplFactor = ((float) v) / (v + maxVolume);
m.priSet(Priority.fund(p * cmplFactor, true, uu));
gen.add(m);
centroidGen++;
}
} else {
// System.out.println("merge collapse, recalcu");
}
}
}
}
}
return gen.isEmpty() ? null : gen;
}
use of nars.task.NALTask in project narchy by automenta.
the class Implier method taskify.
private void taskify(Map<LongObjectPair<Term>, TruthAccumulator> truths, byte punc, List<Task> gen) {
float freqRes = nar.freqResolution.floatValue();
float confRes = nar.confResolution.floatValue();
float strength = this.strength.floatValue();
float confMin = nar.confMin.floatValue();
truths.forEach((tw, a) -> {
Term t = tw.getTwo();
long w = tw.getOne();
long wEnd = w + dur;
@Nullable Truth uu = a.commitSum().dither(freqRes, confRes, confMin, strength);
long stamp = nar.time.nextStamp();
NALTask y;
if (uu != null && uu.conf() >= confMin) {
y = new SignalTask(t, punc, uu, now, w, wEnd, stamp);
} else {
y = new SignalTask(t, punc == GOAL ? QUEST : QUESTION, null, now, w, wEnd, stamp);
}
y.pri(nar.priDefault(y.punc));
// if (Param.DEBUG)
// y.log("")
// System.out.println("\t" + y);
gen.add(y);
});
}
use of nars.task.NALTask in project narchy by automenta.
the class EternalTable method setCapacity.
public void setCapacity(int c) {
int wasCapacity = this.capacity();
if (wasCapacity != c) {
List<Task> trash = null;
synchronized (this) {
// just to be sure
wasCapacity = capacity();
int s = size;
if (s > c) {
// TODO can be accelerated by batch/range remove operation
trash = new FasterList(s - c);
while (c < s--) {
trash.add(removeLast());
}
}
if (wasCapacity != c)
resize(c);
}
// do this outside of the synch
if (trash != null) {
// Task s = strongest();
// if (s!=null) {
// TaskLink.GeneralTaskLink sl = new TaskLink.GeneralTaskLink(s, 0);
// trash.forEach(t -> ((NALTask)t).delete(sl));
// } else {
trash.forEach(Task::delete);
// }
}
}
}
use of nars.task.NALTask in project narchy by automenta.
the class BeliefTable method answer.
/**
* projects a match
*/
@Nullable
default Task answer(long start, long end, int dur, @Nullable Task question, Term template, NAR nar, Consumer<Task> withNovel) {
if (isEmpty())
return null;
Task answer = match(start, end, template, nar);
if (answer == null || answer.isDeleted())
return null;
// (answer instanceof AnswerTask); //includes: answers, revision, or dynamic
boolean novel = false;
// project if different occurrence
boolean relevantTime = start == ETERNAL || answer.intersects(start, end);
if (/*!answer.isEternal() && */
!relevantTime) {
long t = answer.nearestPointExternal(start, end);
Truth aProj = answer.truth(t, dur, nar);
if (aProj != null) {
final Task aa = answer;
Task a = Task.tryTask(answer.term(), answer.punc(), aProj, (content, truth) -> new NALTask(content, aa.punc(), truth, nar.time(), t, t, aa.stamp()));
// Stamp.zip(aa.stamp(), question.stamp(), 0.5f) : aa.stamp()));
if (a == null)
return null;
float confFrac = Util.unitize(aProj.evi() / answer.evi());
a.priSet(answer.priElseZero() * confFrac);
if (question != null)
((NALTask) a).cause = Cause.sample(Param.causeCapacity.intValue(), question, answer);
// if (Param.DEBUG)
// a.log("Answer Projected");
// because it was projected
novel = true;
// relevantTime = true;
answer = a;
}
}
if (novel && question != null && question.isQuestOrQuestion()) {
withNovel.accept(answer);
}
return answer;
}
Aggregations