---
name: "sckgqr.f"
section: "3"
platform: "linux"
package: "lapack-doc"
version: "3.12.1-2"
release: "Arch Linux 2026-11-01"
platforms: ["linux"]
url: "https://new.carta.tech/sckgqr.f"
---

# sckgqr.f(3)

## NAME

TESTING/EIG/sckgqr.f

## SYNOPSIS

### Functions/Subroutines

subroutine **sckgqr** (nm, mval, np, pval, nn, nval, nmats, iseed, thresh, nmax, a, af, aq, ar, taua, b, bf, bz, bt, bwk, taub, work, rwork, nin, nout, info)\
 **SCKGQR**

## Function/Subroutine Documentation

### subroutine sckgqr (integer nm, integer, dimension( \* ) mval, integer np, integer, dimension( \* ) pval, integer nn, integer, dimension( \* ) nval, integer nmats, integer, dimension( 4 ) iseed, real thresh, integer nmax, real, dimension( \* ) a, real, dimension( \* ) af, real, dimension( \* ) aq, real, dimension( \* ) ar, real, dimension( \* ) taua, real, dimension( \* ) b, real, dimension( \* ) bf, real, dimension( \* ) bz, real, dimension( \* ) bt, real, dimension( \* ) bwk, real, dimension( \* ) taub, real, dimension( \* ) work, real, dimension( \* ) rwork, integer nin, integer nout, integer info)

**SCKGQR**

**Purpose:**

```
!>
!> SCKGQR tests
!> SGGQRF: GQR factorization for N-by-M matrix A and N-by-P matrix B,
!> SGGRQF: GRQ factorization for M-by-N matrix A and P-by-N matrix B.
!>
```

**Parameters**

*NM*

```
!>          NM is INTEGER
!>          The number of values of M contained in the vector MVAL.
!>
```

*MVAL*

```
!>          MVAL is INTEGER array, dimension (NM)
!>          The values of the matrix row(column) dimension M.
!>
```

*NP*

```
!>          NP is INTEGER
!>          The number of values of P contained in the vector PVAL.
!>
```

*PVAL*

```
!>          PVAL is INTEGER array, dimension (NP)
!>          The values of the matrix row(column) dimension P.
!>
```

*NN*

```
!>          NN is INTEGER
!>          The number of values of N contained in the vector NVAL.
!>
```

*NVAL*

```
!>          NVAL is INTEGER array, dimension (NN)
!>          The values of the matrix column(row) dimension N.
!>
```

*NMATS*

```
!>          NMATS is INTEGER
!>          The number of matrix types to be tested for each combination
!>          of matrix dimensions.  If NMATS >= NTYPES (the maximum
!>          number of matrix types), then all the different types are
!>          generated for testing.  If NMATS < NTYPES, another input line
!>          is read to get the numbers of the matrix types to be used.
!>
```

*ISEED*

```
!>          ISEED is INTEGER array, dimension (4)
!>          On entry, the seed of the random number generator.  The array
!>          elements should be between 0 and 4095, otherwise they will be
!>          reduced mod 4096, and ISEED(4) must be odd.
!>          On exit, the next seed in the random number sequence after
!>          all the test matrices have been generated.
!>
```

*THRESH*

```
!>          THRESH is REAL
!>          The threshold value for the test ratios.  A result is
!>          included in the output file if RESULT >= THRESH.  To have
!>          every test ratio printed, use THRESH = 0.
!>
```

*NMAX*

```
!>          NMAX is INTEGER
!>          The maximum value permitted for M or N, used in dimensioning
!>          the work arrays.
!>
```

*A*

```
!>          A is REAL array, dimension (NMAX*NMAX)
!>
```

*AF*

```
!>          AF is REAL array, dimension (NMAX*NMAX)
!>
```

*AQ*

```
!>          AQ is REAL array, dimension (NMAX*NMAX)
!>
```

*AR*

```
!>          AR is REAL array, dimension (NMAX*NMAX)
!>
```

*TAUA*

```
!>          TAUA is REAL array, dimension (NMAX)
!>
```

*B*

```
!>          B is REAL array, dimension (NMAX*NMAX)
!>
```

*BF*

```
!>          BF is REAL array, dimension (NMAX*NMAX)
!>
```

*BZ*

```
!>          BZ is REAL array, dimension (NMAX*NMAX)
!>
```

*BT*

```
!>          BT is REAL array, dimension (NMAX*NMAX)
!>
```

*BWK*

```
!>          BWK is REAL array, dimension (NMAX*NMAX)
!>
```

*TAUB*

```
!>          TAUB is REAL array, dimension (NMAX)
!>
```

*WORK*

```
!>          WORK is REAL array, dimension (NMAX*NMAX)
!>
```

*RWORK*

```
!>          RWORK is REAL array, dimension (NMAX)
!>
```

*NIN*

```
!>          NIN is INTEGER
!>          The unit number for input.
!>
```

*NOUT*

```
!>          NOUT is INTEGER
!>          The unit number for output.
!>
```

*INFO*

```
!>          INFO is INTEGER
!>          = 0 :  successful exit
!>          > 0 :  If SLATMS returns an error code, the absolute value
!>                 of it is returned.
!>
```

**Author**

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line **207** of file **sckgqr.f**.

## Author

Generated automatically by Doxygen for LAPACK from the source code.