50     Long *Q1fill, *Degree, *Qrows, *W, *Winv, *ATp, *ATj, *R1p, *P1inv, *Yp,  in spqr_1colamd()  local
161     ATp = (Long *) AT->p ;  in spqr_1colamd()
182         if (row == EMPTY || ATp [row] < 0)  in spqr_1colamd()
202             p = ATp [row] ;  in spqr_1colamd()
203             ATp [row] = FLIP (p) ;          // flag the singleton row  in spqr_1colamd()
204             pend = UNFLIP (ATp [row+1]) ;  in spqr_1colamd()
235                         if (ATp [i] >= 0 && spqr_abs (Ax [p2], cc) > tol)  in spqr_1colamd()
280         if (ATp [i] >= 0) k++ ;     // i is not a row of a col singleton  in spqr_1colamd()
286         ASSERT (IMPLIES (row != EMPTY, ATp [row] < 0)) ;  in spqr_1colamd()
340                 ASSERT (ATp [i] < 0) ;  in spqr_1colamd()
344                 R1p [kk] = UNFLIP (ATp [i+1]) - UNFLIP (ATp [i]) ;  in spqr_1colamd()
351             if (ATp [i] >= 0)  in spqr_1colamd()
460                 p = ATp [i] ;  in spqr_1colamd()
464                     ATp [n2rows++] = nz2 ;  in spqr_1colamd()
465                     pend = UNFLIP (ATp [i+1]) ;  in spqr_1colamd()
466                     for (p = ATp [i] ; p < pend ; p++)  in spqr_1colamd()
474             ATp [n2rows] = nz2 ;  in spqr_1colamd()