NR.c

<c> // Moves "this" to node's focus if exists then rotates loop and executes/reduces the focus item void nodeReduce() { if (this = nodeLoopRotate(parent = this)) { // Move "this" to the focus in the node's loop and rotate nodeSetValue(this,nodePARENT,parent); // Update the parent association if (code = *nodeState(this,nodeCODE)) code(); // nodeCODE value is a pointer-index, execute as function-reference if non-zero } } </c>