Lines Matching defs:SGGES3

281       SUBROUTINE SGGES3( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B,  subroutine
291       CHARACTER          JOBVSL, JOBVSR, SORT
292       INTEGER            INFO, LDA, LDB, LDVSL, LDVSR, LWORK, N, SDIM
295       LOGICAL            BWORK( * )
296       REAL               A( LDA, * ), ALPHAI( * ), ALPHAR( * ),
297      $                   B( LDB, * ), BETA( * ), VSL( LDVSL, * ),
298      $                   VSR( LDVSR, * ), WORK( * )
301       LOGICAL            SELCTG
308       REAL               ZERO, ONE
312       LOGICAL            CURSL, ILASCL, ILBSCL, ILVSL, ILVSR, LASTSL,
313      $                   LQUERY, LST2SL, WANTST
314       INTEGER            I, ICOLS, IERR, IHI, IJOBVL, IJOBVR, ILEFT,
315      $                   ILO, IP, IRIGHT, IROWS, ITAU, IWRK, LWKOPT
316       REAL               ANRM, ANRMTO, BIGNUM, BNRM, BNRMTO, EPS, PVSL,
317      $                   PVSR, SAFMAX, SAFMIN, SMLNUM
320       INTEGER            IDUM( 1 )
321       REAL               DIF( 2 )
329       LOGICAL            LSAME
330       REAL               SLAMCH, SLANGE
550    10    CONTINUE
592    50    CONTINUE
606    60    CONTINUE
669 *     End of SGGES3  argument