--- 
:name: dlacpy
:md5sum: 10366fbf2a10d962bba69e321b7c3c7b
:category: :subroutine
:arguments: 
- uplo: 
    :type: char
    :intent: input
- m: 
    :type: integer
    :intent: input
- n: 
    :type: integer
    :intent: input
- a: 
    :type: doublereal
    :intent: input
    :dims: 
    - lda
    - n
- lda: 
    :type: integer
    :intent: input
- b: 
    :type: doublereal
    :intent: output
    :dims: 
    - ldb
    - n
- ldb: 
    :type: integer
    :intent: input
:substitutions: 
  ldb: MAX(1,m)
:fortran_help: "      SUBROUTINE DLACPY( UPLO, M, N, A, LDA, B, LDB )\n\n\
  *  Purpose\n\
  *  =======\n\
  *\n\
  *  DLACPY copies all or part of a two-dimensional matrix A to another\n\
  *  matrix B.\n\
  *\n\n\
  *  Arguments\n\
  *  =========\n\
  *\n\
  *  UPLO    (input) CHARACTER*1\n\
  *          Specifies the part of the matrix A to be copied to B.\n\
  *          = 'U':      Upper triangular part\n\
  *          = 'L':      Lower triangular part\n\
  *          Otherwise:  All of the matrix A\n\
  *\n\
  *  M       (input) INTEGER\n\
  *          The number of rows of the matrix A.  M >= 0.\n\
  *\n\
  *  N       (input) INTEGER\n\
  *          The number of columns of the matrix A.  N >= 0.\n\
  *\n\
  *  A       (input) DOUBLE PRECISION array, dimension (LDA,N)\n\
  *          The m by n matrix A.  If UPLO = 'U', only the upper triangle\n\
  *          or trapezoid is accessed; if UPLO = 'L', only the lower\n\
  *          triangle or trapezoid is accessed.\n\
  *\n\
  *  LDA     (input) INTEGER\n\
  *          The leading dimension of the array A.  LDA >= max(1,M).\n\
  *\n\
  *  B       (output) DOUBLE PRECISION array, dimension (LDB,N)\n\
  *          On exit, B = A in the locations specified by UPLO.\n\
  *\n\
  *  LDB     (input) INTEGER\n\
  *          The leading dimension of the array B.  LDB >= max(1,M).\n\
  *\n\n\
  *  =====================================================================\n\
  *\n\
  *     .. Local Scalars ..\n      INTEGER            I, J\n\
  *     ..\n\
  *     .. External Functions ..\n      LOGICAL            LSAME\n      EXTERNAL           LSAME\n\
  *     ..\n\
  *     .. Intrinsic Functions ..\n      INTRINSIC          MIN\n\
  *     ..\n"
