Function explain_cond_list

Core/SoarKernel/src/explain.cpp:549–592

 **************************************************************************/

void explain_cond_list(agent* thisAgent, char* chunk_name)
{

    explain_chunk_str* chunk;
    condition* cond, *ground;
    int i;
    
    chunk = find_chunk(thisAgent, thisAgent->explain_chunk_list, chunk_name);
    /* AGR 564  In previous statement, current_agent(...) was added.  2-May-94 */
    
    if (chunk == NULL)
    {
        return;
    }
    
    /* First print out the production in "normal" form */
    
    print(thisAgent, "(sp %s\n  ", chunk->name);
    print_condition_list(thisAgent, chunk->conds, 2, false);
    print(thisAgent, "\n-->\n   ");
    print_action_list(thisAgent, chunk->actions, 3, false);
    print(thisAgent, ")\n\n");
    
    /* Then list each condition and the associated "ground" WME */
    
    i = 0;
    ground = chunk->all_grounds;
    
    for (cond = chunk->conds; cond != NIL; cond = cond->next)
    {
        i++;
        print(thisAgent, " %2d : ", i);
        print_condition(thisAgent, cond);
        while (get_printer_output_column(thisAgent) < COLUMNS_PER_LINE - 40)
        {
            print(thisAgent, " ");
        }
        
        print(thisAgent, " Ground :");
        print_condition(thisAgent, ground);
        print(thisAgent, "\n");
        ground = ground->next;
    }
}


/***************************************************************************