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

# zblat1.f(3)

## NAME

BLAS/TESTING/zblat1.f

## SYNOPSIS

### Functions/Subroutines

program **zblat1**\
 **ZBLAT1**  subroutine **header**\
 subroutine **check1** (sfac)\
 subroutine **check2** (sfac)\
 subroutine **stest** (len, scomp, strue, ssize, sfac)\
 subroutine **stest1** (scomp1, strue1, ssize, sfac)\
 double precision function **sdiff** (sa, sb)\
 subroutine **ctest** (len, ccomp, ctrue, csize, sfac)\
 subroutine **itest1** (icomp, itrue)\
 subroutine **zb1nrm2** (n, incx, thresh)\

## Function/Subroutine Documentation

### subroutine check1 (double precision sfac)

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

### subroutine check2 (double precision sfac)

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

### subroutine ctest (integer len, complex\*16, dimension(len) ccomp, complex\*16, dimension(len) ctrue, complex\*16, dimension(len) csize, double precision sfac)

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

### subroutine header

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

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

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

### double precision function sdiff (double precision sa, double precision sb)

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

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

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

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

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

### subroutine zb1nrm2 (integer n, integer incx, double precision thresh)

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

### program zblat1

**ZBLAT1**

**Purpose:**

```
!>
!>    Test program for the COMPLEX*16 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 **zblat1.f**.

## Author

Generated automatically by Doxygen for LAPACK from the source code.