File: dlapll

package info (click to toggle)
ruby-lapack 1.8.2-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, sid, trixie
  • size: 28,572 kB
  • sloc: ansic: 191,612; ruby: 3,937; makefile: 6
file content (69 lines) | stat: -rw-r--r-- 2,001 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
--- 
:name: dlapll
:md5sum: 08eb4ce7bfd3ce4c24db7b847d4d9b50
:category: :subroutine
:arguments: 
- n: 
    :type: integer
    :intent: input
- x: 
    :type: doublereal
    :intent: input/output
    :dims: 
    - 1+(n-1)*incx
- incx: 
    :type: integer
    :intent: input
- y: 
    :type: doublereal
    :intent: input/output
    :dims: 
    - 1+(n-1)*incy
- incy: 
    :type: integer
    :intent: input
- ssmin: 
    :type: doublereal
    :intent: output
:substitutions: {}

:fortran_help: "      SUBROUTINE DLAPLL( N, X, INCX, Y, INCY, SSMIN )\n\n\
  *  Purpose\n\
  *  =======\n\
  *\n\
  *  Given two column vectors X and Y, let\n\
  *\n\
  *                       A = ( X Y ).\n\
  *\n\
  *  The subroutine first computes the QR factorization of A = Q*R,\n\
  *  and then computes the SVD of the 2-by-2 upper triangular matrix R.\n\
  *  The smaller singular value of R is returned in SSMIN, which is used\n\
  *  as the measurement of the linear dependency of the vectors X and Y.\n\
  *\n\n\
  *  Arguments\n\
  *  =========\n\
  *\n\
  *  N       (input) INTEGER\n\
  *          The length of the vectors X and Y.\n\
  *\n\
  *  X       (input/output) DOUBLE PRECISION array,\n\
  *                         dimension (1+(N-1)*INCX)\n\
  *          On entry, X contains the N-vector X.\n\
  *          On exit, X is overwritten.\n\
  *\n\
  *  INCX    (input) INTEGER\n\
  *          The increment between successive elements of X. INCX > 0.\n\
  *\n\
  *  Y       (input/output) DOUBLE PRECISION array,\n\
  *                         dimension (1+(N-1)*INCY)\n\
  *          On entry, Y contains the N-vector Y.\n\
  *          On exit, Y is overwritten.\n\
  *\n\
  *  INCY    (input) INTEGER\n\
  *          The increment between successive elements of Y. INCY > 0.\n\
  *\n\
  *  SSMIN   (output) DOUBLE PRECISION\n\
  *          The smallest singular value of the N-by-2 matrix A = ( X Y ).\n\
  *\n\n\
  *  =====================================================================\n\
  *\n"