---
name: "cblat1.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/cblat1.f"
---

# cblat1.f(3)

## NAME

BLAS/TESTING/cblat1.f

## SYNOPSIS

### Functions/Subroutines

program **cblat1**\
 **CBLAT1**  subroutine **header**\
 subroutine **check1** (sfac)\
 subroutine **check2** (sfac)\
 subroutine **stest** (len, scomp, strue, ssize, sfac)\
 subroutine **stest1** (scomp1, strue1, ssize, sfac)\
 real function **sdiff** (sa, sb)\
 subroutine **ctest** (len, ccomp, ctrue, csize, sfac)\
 subroutine **itest1** (icomp, itrue)\
 subroutine **cb1nrm2** (n, incx, thresh)\

## Function/Subroutine Documentation

### subroutine cb1nrm2 (integer n, integer incx, real thresh)

Definition at line **790** of file **cblat1.f**.

### program cblat1

**CBLAT1**

**Purpose:**

```
!>
!>    Test program for the COMPLEX Level 1 BLAS.
!>    Based upon the original BLAS test routine together with:
!>
!>    F06GAF Example Program Text
!>
```

**Author**

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.

Definition at line **36** of file **cblat1.f**.

### subroutine check1 (real sfac)

Definition at line **121** of file **cblat1.f**.

### subroutine check2 (real sfac)

Definition at line **347** of file **cblat1.f**.

### subroutine ctest (integer len, complex, dimension(len) ccomp, complex, dimension(len) ctrue, complex, dimension(len) csize, real sfac)

Definition at line **713** of file **cblat1.f**.

### subroutine header

Definition at line **90** of file **cblat1.f**.

### subroutine itest1 (integer icomp, integer itrue)

Definition at line **747** of file **cblat1.f**.

### real function sdiff (real sa, real sb)

Definition at line **700** of file **cblat1.f**.

### subroutine stest (integer len, real, dimension(len) scomp, real, dimension(len) strue, real, dimension(len) ssize, real sfac)

Definition at line **613** of file **cblat1.f**.

### subroutine stest1 (real scomp1, real strue1, real, dimension(\*) ssize, real sfac)

Definition at line **672** of file **cblat1.f**.

## Author

Generated automatically by Doxygen for LAPACK from the source code.
