swapm.c

a software code for computing selected eigenvalues of large sparse symmetric matrices

#include <ilupack.h>

#include <ilupackmacros.h>


void SWAPM(REALS v[], integer i, integer j)
{
   REALS temp;

   temp = v[i];
   v[i] = v[j];
   v[j] = temp;
}