Function OPS_ParallelRCM

SRC/interpreter/OpenSeesCommands.cpp:3617–3639

}

void* OPS_ParallelRCM() {

#ifdef _PARALLEL_INTERPRETERS
    ParallelNumberer *theParallelNumberer = 0;
    if (cmds == 0) return theParallelNumberer;

    MachineBroker* machine = cmds->getMachineBroker();
    Channel** channels = cmds->getChannels();
    int numChannels = cmds->getNumChannels();

    int rank = machine->getPID();

    RCM *theRCM = new RCM(false);
    theParallelNumberer = new ParallelNumberer(*theRCM);
    theParallelNumberer->setProcessID(rank);
    theParallelNumberer->setChannels(numChannels, channels);

    return theParallelNumberer;
#else
    return 0;
#endif

}

void* OPS_ParallelNumberer() {