Exemplos de NXTVAL_ em C++ (Cpp)

Exemplo n.º 1

Arquivo: misc.c Projeto: dmlb2000/nwchem-cml

/**
 * shut down message-passing library
 */ 
void FATR PEND_()
{
#ifdef NXTVAL_SERVER
    Integer zero=0;
    if( SR_parallel ) {
        (void) NXTVAL_(&zero);
    }
    MPI_Barrier(MPI_COMM_WORLD);
#endif
    finalize_nxtval();
    MPI_Finalize();
    exit(0);
}

Exemplo n.º 2

Arquivo: capi.c Projeto: jeffhammond/ga

long tcg_nxtval(long mproc)
{
    long amproc = mproc;

    return NXTVAL_(&amproc);
}

Exemplo n.º 3

Arquivo: capi.c Projeto: dmlb2000/nwchem-cml

long tcg_nxtval(long mproc)
{
    Integer amproc = mproc;

    return NXTVAL_(&amproc);
}