#define i_swap(A,B) double temp = A; A = B; B = temp;