Home
last modified time | relevance | path

Searched refs:NB_CMPLX (Results 1 – 25 of 32) sorted by relevance

12

/dports/math/mumps/mumps-5.1.2/src/
H A Dctools.F682 NB_CMPLX = 0_8
794 & NB_CMPLX=NB_CMPLX+size(id%root%RHS_CNTR_MASTER_ROOT)
796 & NB_CMPLX=NB_CMPLX+size(id%root%SCHUR_POINTER)
798 & NB_CMPLX=NB_CMPLX+size(id%root%QR_TAU)
800 & NB_CMPLX=NB_CMPLX+size(id%root%RHS_ROOT)
802 & NB_CMPLX=NB_CMPLX+size(id%root%SVD_U)
804 & NB_CMPLX=NB_CMPLX+size(id%root%SVD_VT)
807 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
808 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
809 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
[all …]
H A Ddtools.F682 NB_CMPLX = 0_8
794 & NB_CMPLX=NB_CMPLX+size(id%root%RHS_CNTR_MASTER_ROOT)
796 & NB_CMPLX=NB_CMPLX+size(id%root%SCHUR_POINTER)
798 & NB_CMPLX=NB_CMPLX+size(id%root%QR_TAU)
800 & NB_CMPLX=NB_CMPLX+size(id%root%RHS_ROOT)
802 & NB_CMPLX=NB_CMPLX+size(id%root%SVD_U)
804 & NB_CMPLX=NB_CMPLX+size(id%root%SVD_VT)
807 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
808 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
809 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
[all …]
H A Dstools.F682 NB_CMPLX = 0_8
794 & NB_CMPLX=NB_CMPLX+size(id%root%RHS_CNTR_MASTER_ROOT)
796 & NB_CMPLX=NB_CMPLX+size(id%root%SCHUR_POINTER)
798 & NB_CMPLX=NB_CMPLX+size(id%root%QR_TAU)
800 & NB_CMPLX=NB_CMPLX+size(id%root%RHS_ROOT)
802 & NB_CMPLX=NB_CMPLX+size(id%root%SVD_U)
804 & NB_CMPLX=NB_CMPLX+size(id%root%SVD_VT)
807 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
808 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
809 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
[all …]
H A Dztools.F682 NB_CMPLX = 0_8
794 & NB_CMPLX=NB_CMPLX+size(id%root%RHS_CNTR_MASTER_ROOT)
796 & NB_CMPLX=NB_CMPLX+size(id%root%SCHUR_POINTER)
798 & NB_CMPLX=NB_CMPLX+size(id%root%QR_TAU)
800 & NB_CMPLX=NB_CMPLX+size(id%root%RHS_ROOT)
802 & NB_CMPLX=NB_CMPLX+size(id%root%SVD_U)
804 & NB_CMPLX=NB_CMPLX+size(id%root%SVD_VT)
807 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
808 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
809 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
[all …]
H A Dzsol_driver.F34 SUBROUTINE ZMUMPS_SIZE_IN_STRUCT( id, NB_INT,NB_CMPLX,NB_CHAR )
37 INTEGER(8) :: NB_INT,NB_CMPLX,NB_CHAR local
266 INTEGER(8) NB_INT, NB_CMPLX, NB_CHAR, K34_8, K35_8 local
362 CALL ZMUMPS_SIZE_IN_STRUCT (id, NB_INT,NB_CMPLX,NB_CHAR)
363 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8 + NB_CHAR
H A Dcsol_driver.F34 SUBROUTINE CMUMPS_SIZE_IN_STRUCT( id, NB_INT,NB_CMPLX,NB_CHAR )
37 INTEGER(8) :: NB_INT,NB_CMPLX,NB_CHAR local
266 INTEGER(8) NB_INT, NB_CMPLX, NB_CHAR, K34_8, K35_8 local
362 CALL CMUMPS_SIZE_IN_STRUCT (id, NB_INT,NB_CMPLX,NB_CHAR)
363 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8 + NB_CHAR
H A Ddsol_driver.F34 SUBROUTINE DMUMPS_SIZE_IN_STRUCT( id, NB_INT,NB_CMPLX,NB_CHAR )
37 INTEGER(8) :: NB_INT,NB_CMPLX,NB_CHAR local
266 INTEGER(8) NB_INT, NB_CMPLX, NB_CHAR, K34_8, K35_8 local
362 CALL DMUMPS_SIZE_IN_STRUCT (id, NB_INT,NB_CMPLX,NB_CHAR)
363 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8 + NB_CHAR
H A Dssol_driver.F34 SUBROUTINE SMUMPS_SIZE_IN_STRUCT( id, NB_INT,NB_CMPLX,NB_CHAR )
37 INTEGER(8) :: NB_INT,NB_CMPLX,NB_CHAR local
266 INTEGER(8) NB_INT, NB_CMPLX, NB_CHAR, K34_8, K35_8 local
362 CALL SMUMPS_SIZE_IN_STRUCT (id, NB_INT,NB_CMPLX,NB_CHAR)
363 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8 + NB_CHAR
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/
H A Dsmumps_part3.F1698 SUBROUTINE SMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL
H A Ddmumps_part3.F1698 SUBROUTINE DMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL
H A Dcmumps_part3.F1698 SUBROUTINE CMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL/2_8
H A Dzmumps_part3.F1698 SUBROUTINE ZMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL/2_8
H A Dzmumps_part8.F56 SUBROUTINE ZMUMPS_710( id, NB_INT,NB_CMPLX )
59 INTEGER(8) :: NB_INT,NB_CMPLX local
167 INTEGER(8) NB_INT, NB_CMPLX, K34_8, K35_8, NB_BYTES_ON_ENTRY
228 CALL ZMUMPS_710 (id, NB_INT,NB_CMPLX )
229 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8
H A Dcmumps_part8.F56 SUBROUTINE CMUMPS_710( id, NB_INT,NB_CMPLX )
59 INTEGER(8) :: NB_INT,NB_CMPLX local
167 INTEGER(8) NB_INT, NB_CMPLX, K34_8, K35_8, NB_BYTES_ON_ENTRY
228 CALL CMUMPS_710 (id, NB_INT,NB_CMPLX )
229 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8
H A Dsmumps_part8.F56 SUBROUTINE SMUMPS_710( id, NB_INT,NB_CMPLX )
59 INTEGER(8) :: NB_INT,NB_CMPLX local
167 INTEGER(8) NB_INT, NB_CMPLX, K34_8, K35_8, NB_BYTES_ON_ENTRY
228 CALL SMUMPS_710 (id, NB_INT,NB_CMPLX )
229 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8
H A Ddmumps_part8.F56 SUBROUTINE DMUMPS_710( id, NB_INT,NB_CMPLX )
59 INTEGER(8) :: NB_INT,NB_CMPLX local
167 INTEGER(8) NB_INT, NB_CMPLX, K34_8, K35_8, NB_BYTES_ON_ENTRY
228 CALL DMUMPS_710 (id, NB_INT,NB_CMPLX )
229 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8
/dports/math/coinmumps/MUMPS_4.10.0/src/
H A Dcmumps_part3.F1698 SUBROUTINE CMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL/2_8
H A Dsmumps_part3.F1698 SUBROUTINE SMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL
H A Dzmumps_part3.F1698 SUBROUTINE ZMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL/2_8
H A Ddmumps_part3.F1698 SUBROUTINE DMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL
H A Dcmumps_part8.F56 SUBROUTINE CMUMPS_710( id, NB_INT,NB_CMPLX )
59 INTEGER(8) :: NB_INT,NB_CMPLX local
167 INTEGER(8) NB_INT, NB_CMPLX, K34_8, K35_8, NB_BYTES_ON_ENTRY
228 CALL CMUMPS_710 (id, NB_INT,NB_CMPLX )
229 NB_BYTES = NB_BYTES + NB_INT * K34_8 + NB_CMPLX * K35_8
/dports/math/mumps4/MUMPS_4.10.0/src/
H A Dcmumps_part3.F1698 SUBROUTINE CMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL/2_8
H A Ddmumps_part3.F1698 SUBROUTINE DMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL
H A Dsmumps_part3.F1698 SUBROUTINE SMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL
H A Dzmumps_part3.F1698 SUBROUTINE ZMUMPS_710 (id, NB_INT,NB_CMPLX ) argument
1702 INTEGER(8) NB_INT, NB_CMPLX local
1705 NB_CMPLX = 0_8
1774 IF (associated(id%DBLARR)) NB_CMPLX=NB_CMPLX+size(id%DBLARR)
1775 IF (associated(id%RHSCOMP)) NB_CMPLX=NB_CMPLX+size(id%RHSCOMP)
1776 IF (associated(id%S)) NB_CMPLX=NB_CMPLX+id%KEEP8(23)
1783 NB_CMPLX = NB_CMPLX + NB_REAL/2_8

12