// (C) Uri Wilensky. https://github.com/NetLogo/NetLogo
package org.nlogo.prim;
import org.nlogo.agent.AgentSet;
import org.nlogo.agent.Patch;
import org.nlogo.agent.Turtle;
import org.nlogo.api.Dump;
import org.nlogo.api.I18N;
import org.nlogo.api.LogoException;
import org.nlogo.api.Syntax;
import org.nlogo.api.TypeNames;
import org.nlogo.nvm.Context;
import org.nlogo.nvm.EngineException;
import org.nlogo.nvm.Reporter;
public final strictfp class _nsum4 extends Reporter {
public int vn;
@Override
public Syntax syntax() {
return Syntax.reporterSyntax
(new int[]{Syntax.ReferenceType()},
Syntax.NumberType(), "-TP-");
}
@Override
public String toString() {
if (world == null) {
return super.toString() + ":" + vn;
}
return super.toString() + ":" + world.patchesOwnNameAt(vn);
}
@Override
public Object report(Context context) throws LogoException {
return report_1(context);
}
public double report_1(final Context context) throws LogoException {
Patch patch;
if (context.agent instanceof Turtle) {
patch = ((Turtle) context.agent).getPatchHere();
} else {
patch = (Patch) context.agent;
}
double sum = 0;
for (AgentSet.Iterator it = patch.getNeighbors4().iterator(); it.hasNext();) {
Object value = ((Patch) it.next()).getPatchVariable(vn);
if (!(value instanceof Double)) {
throw new EngineException(context, this,
I18N.errorsJ().getN("org.nlogo.prim.$common.noSumOfListWithNonNumbers",
Dump.logoObject(value).toString(), TypeNames.name(value)));
}
sum += ((Double) value).doubleValue();
}
return validDouble(sum);
}
}