| /dports/math/mumps/mumps-5.1.2/src/ |
| H A D | dlr_core.F | 257 DOUBLE PRECISION, ALLOCATABLE, DIMENSION(:,:) :: XY_YZ local
549 allocate(XY_YZ(M_X,K_YZ),stat=allocok)
555 & X(1,1), LDX, Y(1,1), LDY, ZERO, XY_YZ(1,1), M_X)
558 & XY_YZ(1,1), M_X, Z(1,1), LDZ, BETA, A(POSELTT),
563 deallocate(XY_YZ)
565 allocate(XY_YZ(K_XY,N_Z),stat=allocok)
571 & Y(1,1), LDY, Z(1,1), LDZ, ZERO, XY_YZ(1,1), K_XY)
574 & X(1,1), LDX, XY_YZ(1,1), K_XY, BETA, A(POSELTT),
579 deallocate(XY_YZ)
|
| H A D | slr_core.F | 257 REAL, ALLOCATABLE, DIMENSION(:,:) :: XY_YZ local
549 allocate(XY_YZ(M_X,K_YZ),stat=allocok)
555 & X(1,1), LDX, Y(1,1), LDY, ZERO, XY_YZ(1,1), M_X)
558 & XY_YZ(1,1), M_X, Z(1,1), LDZ, BETA, A(POSELTT),
563 deallocate(XY_YZ)
565 allocate(XY_YZ(K_XY,N_Z),stat=allocok)
571 & Y(1,1), LDY, Z(1,1), LDZ, ZERO, XY_YZ(1,1), K_XY)
574 & X(1,1), LDX, XY_YZ(1,1), K_XY, BETA, A(POSELTT),
579 deallocate(XY_YZ)
|
| H A D | zlr_core.F | 257 COMPLEX(kind=8), ALLOCATABLE, DIMENSION(:,:) :: XY_YZ local
549 allocate(XY_YZ(M_X,K_YZ),stat=allocok)
555 & X(1,1), LDX, Y(1,1), LDY, ZERO, XY_YZ(1,1), M_X)
558 & XY_YZ(1,1), M_X, Z(1,1), LDZ, BETA, A(POSELTT),
563 deallocate(XY_YZ)
565 allocate(XY_YZ(K_XY,N_Z),stat=allocok)
571 & Y(1,1), LDY, Z(1,1), LDZ, ZERO, XY_YZ(1,1), K_XY)
574 & X(1,1), LDX, XY_YZ(1,1), K_XY, BETA, A(POSELTT),
579 deallocate(XY_YZ)
|
| H A D | clr_core.F | 257 COMPLEX, ALLOCATABLE, DIMENSION(:,:) :: XY_YZ local
549 allocate(XY_YZ(M_X,K_YZ),stat=allocok)
555 & X(1,1), LDX, Y(1,1), LDY, ZERO, XY_YZ(1,1), M_X)
558 & XY_YZ(1,1), M_X, Z(1,1), LDZ, BETA, A(POSELTT),
563 deallocate(XY_YZ)
565 allocate(XY_YZ(K_XY,N_Z),stat=allocok)
571 & Y(1,1), LDY, Z(1,1), LDZ, ZERO, XY_YZ(1,1), K_XY)
574 & X(1,1), LDX, XY_YZ(1,1), K_XY, BETA, A(POSELTT),
579 deallocate(XY_YZ)
|