SPRCN4(3)

📦

version 3.12.1 · 2 versions

3.12.1 · arch rolling (latest)
3.12.0 · centos-stream 10, fedora 43, fedora 44

okay bestie, this is the CBLAS/testing/c_sblat3.f(3) page from the LAPACK Library Functions Manual 💖 It’s the full function/subroutine roster, and we’re keeping every signature, every arg, every line number, and every bit of the source exactly as it is. No cap. 🫶

💖 NAME 💖

CBLAS/testing/c_sblat3.f — that’s the name, and yes, this whole page is the manual entry for that file. 💅

✨ SYNOPSIS ✨

🧚 Functions/Subroutines

The cast list is literally:

       program sblat3
       subroutine schk1 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, nbet, bet, nmax, a, aa, as, b, bb, bs, c,
           cc, cs, ct, g, iorder)
       subroutine sprcn1 (nout, nc, sname, iorder, transa, transb, m, n, k,
           alpha, lda, ldb, beta, ldc)
       subroutine schk2 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, nbet, bet, nmax, a, aa, as, b, bb, bs, c,
           cc, cs, ct, g, iorder)
       subroutine sprcn2 (nout, nc, sname, iorder, side, uplo, m, n, alpha,
           lda, ldb, beta, ldc)
       subroutine schk3 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, nmax, a, aa, as, b, bb, bs, ct, g, c,
           iorder)
       subroutine sprcn3 (nout, nc, sname, iorder, side, uplo, transa, diag, m,
           n, alpha, lda, ldb)
       subroutine schk4 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, nbet, bet, nmax, a, aa, as, b, bb, bs, c,
           cc, cs, ct, g, iorder)
       subroutine sprcn4 (nout, nc, sname, iorder, uplo, transa, n, k, alpha,
           lda, beta, ldc)
       subroutine schk5 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, nbet, bet, nmax, ab, aa, as, bb, bs, c, cc,
           cs, ct, g, w, iorder)
       subroutine sprcn5 (nout, nc, sname, iorder, uplo, transa, n, k, alpha,
           lda, ldb, beta, ldc)
       subroutine smake (type, uplo, diag, m, n, a, nmax, aa, lda, reset,
           transl)
       subroutine smmch (transa, transb, m, n, kk, alpha, a, lda, b, ldb, beta,
           c, ldc, ct, g, cc, ldcc, eps, err, fatal, nout, mv)
       logical function lse (ri, rj, lr)
       logical function lseres (type, uplo, m, n, aa, as, lda)
       real function sbeg (reset)
       real function sdiff (x, y)
       subroutine schk6 (sname, eps, thresh, nout, ntra, trace, rewi, fatal,
           nidim, idim, nalf, alf, nbet, bet, nmax, a, aa, as, b, bb, bs, c,
           cc, cs, ct, g, iorder)
       subroutine sprcn8 (nout, nc, sname, iorder, uplo, transa, transb, n, k,
           alpha, lda, ldb, beta, ldc)
       subroutine smmtch (uplo, transa, transb, n, kk, alpha, a, lda, b, ldb,
           beta, c, ldc, ct, g, cc, ldcc, eps, err, fatal, nout, mv)

🌈 Function/Subroutine Documentation 🌈

Here’s every documented entry, same order as the original, with exact signatures and exact Definition at line ... notes. No skips, no “fixing,” no invented extras. 🫶

🦋 `lse`

   logical function lse (real, dimension( * ) ri, real, dimension( * ) rj,
       integer lr)

Definition at line 2340 of file c_sblat3.f.

🦋 `lseres`

   logical function lseres (character*2 type, character*1 uplo, integer m,
       integer n, real, dimension( lda, * ) aa, real, dimension( lda, * ) as,
       integer lda)

Definition at line 2372 of file c_sblat3.f.

🦋 `sbeg`

   real function sbeg (logical reset)

Definition at line 2434 of file c_sblat3.f.

🦋 `sblat3`

   program sblat3

Definition at line 1 of file c_sblat3.f.

🦋 `schk1`

   subroutine schk1 (character*13 sname, real eps, real thresh, integer nout,
       integer ntra, logical trace, logical rewi, logical fatal, integer nidim,
       integer, dimension( nidim ) idim, integer nalf, real, dimension( nalf )
       alf, integer nbet, real, dimension( nbet ) bet, integer nmax, real,
       dimension( nmax, nmax ) a, real, dimension( nmax*nmax ) aa, real,
       dimension( nmax*nmax ) as, real, dimension( nmax, nmax ) b, real,
       dimension( nmax*nmax ) bb, real, dimension( nmax*nmax ) bs, real,
       dimension( nmax, nmax ) c, real, dimension( nmax*nmax ) cc, real,
       dimension( nmax*nmax ) cs, real, dimension( nmax ) ct, real, dimension(
       nmax ) g, integer iorder)

Definition at line 434 of file c_sblat3.f.

🦋 `schk2`

   subroutine schk2 (character*13 sname, real eps, real thresh, integer nout,
       integer ntra, logical trace, logical rewi, logical fatal, integer nidim,
       integer, dimension( nidim ) idim, integer nalf, real, dimension( nalf )
       alf, integer nbet, real, dimension( nbet ) bet, integer nmax, real,
       dimension( nmax, nmax ) a, real, dimension( nmax*nmax ) aa, real,
       dimension( nmax*nmax ) as, real, dimension( nmax, nmax ) b, real,
       dimension( nmax*nmax ) bb, real, dimension( nmax*nmax ) bs, real,
       dimension( nmax, nmax ) c, real, dimension( nmax*nmax ) cc, real,
       dimension( nmax*nmax ) cs, real, dimension( nmax ) ct, real, dimension(
       nmax ) g, integer iorder)

Definition at line 762 of file c_sblat3.f.

🦋 `schk3`

   subroutine schk3 (character*13 sname, real eps, real thresh, integer nout,
       integer ntra, logical trace, logical rewi, logical fatal, integer nidim,
       integer, dimension( nidim ) idim, integer nalf, real, dimension( nalf )
       alf, integer nmax, real, dimension( nmax, nmax ) a, real, dimension(
       nmax*nmax ) aa, real, dimension( nmax*nmax ) as, real, dimension( nmax,
       nmax ) b, real, dimension( nmax*nmax ) bb, real, dimension( nmax*nmax )
       bs, real, dimension( nmax ) ct, real, dimension( nmax ) g, real,
       dimension( nmax, nmax ) c, integer iorder)

Definition at line 1073 of file c_sblat3.f.

🦋 `schk4`

   subroutine schk4 (character*13 sname, real eps, real thresh, integer nout,
       integer ntra, logical trace, logical rewi, logical fatal, integer nidim,
       integer, dimension( nidim ) idim, integer nalf, real, dimension( nalf )
       alf, integer nbet, real, dimension( nbet ) bet, integer nmax, real,
       dimension( nmax, nmax ) a, real, dimension( nmax*nmax ) aa, real,
       dimension( nmax*nmax ) as, real, dimension( nmax, nmax ) b, real,
       dimension( nmax*nmax ) bb, real, dimension( nmax*nmax ) bs, real,
       dimension( nmax, nmax ) c, real, dimension( nmax*nmax ) cc, real,
       dimension( nmax*nmax ) cs, real, dimension( nmax ) ct, real, dimension(
       nmax ) g, integer iorder)

Definition at line 1432 of file c_sblat3.f.

🦋 `schk5`

   subroutine schk5 (character*13 sname, real eps, real thresh, integer nout,
       integer ntra, logical trace, logical rewi, logical fatal, integer nidim,
       integer, dimension( nidim ) idim, integer nalf, real, dimension( nalf )
       alf, integer nbet, real, dimension( nbet ) bet, integer nmax, real,
       dimension( 2*nmax*nmax ) ab, real, dimension( nmax*nmax ) aa, real,
       dimension( nmax*nmax ) as, real, dimension( nmax*nmax ) bb, real,
       dimension( nmax*nmax ) bs, real, dimension( nmax, nmax ) c, real,
       dimension( nmax*nmax ) cc, real, dimension( nmax*nmax ) cs, real,
       dimension( nmax ) ct, real, dimension( nmax ) g, real, dimension( 2*nmax
       ) w, integer iorder)

Definition at line 1749 of file c_sblat3.f.

🦋 `schk6`

   subroutine schk6 (character*13 sname, real eps, real thresh, integer nout,
       integer ntra, logical trace, logical rewi, logical fatal, integer nidim,
       integer, dimension( nidim ) idim, integer nalf, real, dimension( nalf )
       alf, integer nbet, real, dimension( nbet ) bet, integer nmax, real,
       dimension( nmax, nmax ) a, real, dimension( nmax*nmax ) aa, real,
       dimension( nmax*nmax ) as, real, dimension( nmax, nmax ) b, real,
       dimension( nmax*nmax ) bb, real, dimension( nmax*nmax ) bs, real,
       dimension( nmax, nmax ) c, real, dimension( nmax*nmax ) cc, real,
       dimension( nmax*nmax ) cs, real, dimension( nmax ) ct, real, dimension(
       nmax ) g, integer iorder)

Definition at line 2501 of file c_sblat3.f.

🦋 `sdiff`

   real function sdiff (real x, real y)

Definition at line 2480 of file c_sblat3.f.

🦋 `smake`

   subroutine smake (character*2 type, character*1 uplo, character*1 diag,
       integer m, integer n, real, dimension( nmax, * ) a, integer nmax, real,
       dimension( * ) aa, integer lda, logical reset, real transl)

Definition at line 2105 of file c_sblat3.f.

🦋 `smmch`

   subroutine smmch (character*1 transa, character*1 transb, integer m, integer
       n, integer kk, real alpha, real, dimension( lda, * ) a, integer lda,
       real, dimension( ldb, * ) b, integer ldb, real beta, real, dimension(
       ldc, * ) c, integer ldc, real, dimension( * ) ct, real, dimension( * )
       g, real, dimension( ldcc, * ) cc, integer ldcc, real eps, real err,
       logical fatal, integer nout, logical mv)

Definition at line 2218 of file c_sblat3.f.

🦋 `smmtch`

   subroutine smmtch (character*1 uplo, character*1 transa, character*1 transb,
       integer n, integer kk, real alpha, real, dimension( lda, * ) a, integer
       lda, real, dimension( ldb, * ) b, integer ldb, real beta, real,
       dimension( ldc, * ) c, integer ldc, real, dimension( * ) ct, real,
       dimension( * ) g, real, dimension( ldcc, * ) cc, integer ldcc, real eps,
       real err, logical fatal, integer nout, logical mv)

Definition at line 2839 of file c_sblat3.f.

🦋 `sprcn1`

   subroutine sprcn1 (integer nout, integer nc, character*13 sname, integer
       iorder, character*1 transa, character*1 transb, integer m, integer n,
       integer k, real alpha, integer lda, integer ldb, real beta, integer ldc)

Definition at line 727 of file c_sblat3.f.

🦋 `sprcn2`

   subroutine sprcn2 (integer nout, integer nc, character*13 sname, integer
       iorder, character*1 side, character*1 uplo, integer m, integer n, real
       alpha, integer lda, integer ldb, real beta, integer ldc)

Definition at line 1042 of file c_sblat3.f.

🦋 `sprcn3`

   subroutine sprcn3 (integer nout, integer nc, character*13 sname, integer
       iorder, character*1 side, character*1 uplo, character*1 transa,
       character*1 diag, integer m, integer n, real alpha, integer lda, integer
       ldb)

Definition at line 1389 of file c_sblat3.f.

🦋 `sprcn4`

   subroutine sprcn4 (integer nout, integer nc, character*13 sname, integer
       iorder, character*1 uplo, character*1 transa, integer n, integer k, real
       alpha, integer lda, real beta, integer ldc)

Definition at line 1716 of file c_sblat3.f.

🦋 `sprcn5`

   subroutine sprcn5 (integer nout, integer nc, character*13 sname, integer
       iorder, character*1 uplo, character*1 transa, integer n, integer k, real
       alpha, integer lda, integer ldb, real beta, integer ldc)

Definition at line 2072 of file c_sblat3.f.

🦋 `sprcn8`

   subroutine sprcn8 (integer nout, integer nc, character*13 sname, integer
       iorder, character*1 uplo, character*1 transa, character*1 transb,
       integer n, integer k, real alpha, integer lda, integer ldb, real beta,
       integer ldc)

Definition at line 2797 of file c_sblat3.f.

👑 Author 👑

Generated automatically by Doxygen for LAPACK from the source code.

Cute sign-off time 💋: the footer tags this as LAPACK, Version 3.12.0, and CBLAS/testing/c_sblat3.f(3). The original footer doesn’t show a separate date, so no invented date, bestie — we keep it factual and cute. Mwah. 🎀

📦 where this page comes from

arch rolling: lapack-doc 3.12.1-2 · custom
💖 girlified by deepseek-ai/DeepSeek-V4.1-Flash-1017 on 2026-11-04: a language model's rewrite of the original, under its terms

SPRCN4(3)

💖 NAME 💖

✨ SYNOPSIS ✨

🧚 Functions/Subroutines

🌈 Function/Subroutine Documentation 🌈

🦋 lse

🦋 lseres

🦋 sbeg

🦋 sblat3

🦋 schk1

🦋 schk2

🦋 schk3

🦋 schk4

🦋 schk5

🦋 schk6

🦋 sdiff

🦋 smake

🦋 smmch

🦋 smmtch

🦋 sprcn1

🦋 sprcn2

🦋 sprcn3

🦋 sprcn4

🦋 sprcn5

🦋 sprcn8