Home
last modified time | relevance | path

Searched refs:MEM_SUBTREE (Results 1 – 25 of 92) sorted by relevance

1234

/dports/math/mumps/mumps-5.1.2/src/
H A Ddend_driver.F294 IF (associated(id%MEM_SUBTREE)) THEN
295 DEALLOCATE(id%MEM_SUBTREE)
296 NULLIFY(id%MEM_SUBTREE)
H A Dzend_driver.F294 IF (associated(id%MEM_SUBTREE)) THEN
295 DEALLOCATE(id%MEM_SUBTREE)
296 NULLIFY(id%MEM_SUBTREE)
H A Dcend_driver.F294 IF (associated(id%MEM_SUBTREE)) THEN
295 DEALLOCATE(id%MEM_SUBTREE)
296 NULLIFY(id%MEM_SUBTREE)
H A Dsend_driver.F294 IF (associated(id%MEM_SUBTREE)) THEN
295 DEALLOCATE(id%MEM_SUBTREE)
296 NULLIFY(id%MEM_SUBTREE)
H A Dzini_driver.F161 NULLIFY(id%MEM_SUBTREE)
162 NULLIFY(id%MEM_SUBTREE)
H A Ddini_driver.F161 NULLIFY(id%MEM_SUBTREE)
162 NULLIFY(id%MEM_SUBTREE)
H A Dsini_driver.F161 NULLIFY(id%MEM_SUBTREE)
162 NULLIFY(id%MEM_SUBTREE)
H A Dcini_driver.F161 NULLIFY(id%MEM_SUBTREE)
162 NULLIFY(id%MEM_SUBTREE)
H A Dcana_reordertree.F732 & PROCNODE,MEM_SUBTREE,SLAVEF, SIZE_MEM_SBTR, PEAK argument
746 DOUBLE PRECISION, intent(out) :: MEM_SUBTREE(SIZE_MEM_SBTR,SLAVEF) local
807 MEM_SUBTREE(x,I)=-1.0D0
1044 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1047 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1057 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1060 MEM_SUBTREE(INDICE(ID+1),ID+1)=
H A Dsana_reordertree.F732 & PROCNODE,MEM_SUBTREE,SLAVEF, SIZE_MEM_SBTR, PEAK argument
746 DOUBLE PRECISION, intent(out) :: MEM_SUBTREE(SIZE_MEM_SBTR,SLAVEF) local
807 MEM_SUBTREE(x,I)=-1.0D0
1044 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1047 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1057 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1060 MEM_SUBTREE(INDICE(ID+1),ID+1)=
H A Dzana_reordertree.F732 & PROCNODE,MEM_SUBTREE,SLAVEF, SIZE_MEM_SBTR, PEAK argument
746 DOUBLE PRECISION, intent(out) :: MEM_SUBTREE(SIZE_MEM_SBTR,SLAVEF) local
807 MEM_SUBTREE(x,I)=-1.0D0
1044 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1047 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1057 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1060 MEM_SUBTREE(INDICE(ID+1),ID+1)=
H A Ddana_reordertree.F732 & PROCNODE,MEM_SUBTREE,SLAVEF, SIZE_MEM_SBTR, PEAK argument
746 DOUBLE PRECISION, intent(out) :: MEM_SUBTREE(SIZE_MEM_SBTR,SLAVEF) local
807 MEM_SUBTREE(x,I)=-1.0D0
1044 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1047 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1057 MEM_SUBTREE(INDICE(ID+1),ID+1)=
1060 MEM_SUBTREE(INDICE(ID+1),ID+1)=
H A Dcana_driver.F1539 IF(associated(id%MEM_SUBTREE))
1540 & deallocate(id%MEM_SUBTREE)
1541 allocate(id%MEM_SUBTREE(J),stat=allocok)
1551 id%MEM_SUBTREE(1:J)=TEMP_MEM(1:J,1)
1593 IF(associated(id%MEM_SUBTREE))
1594 & deallocate(id%MEM_SUBTREE)
1595 allocate(id%MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
1637 CALL MPI_RECV(id%MEM_SUBTREE(1),id%NBSA_LOCAL,
1652 IF(associated(id%MEM_SUBTREE))
1653 & deallocate(id%MEM_SUBTREE)
[all …]
H A Ddana_driver.F1539 IF(associated(id%MEM_SUBTREE))
1540 & deallocate(id%MEM_SUBTREE)
1541 allocate(id%MEM_SUBTREE(J),stat=allocok)
1551 id%MEM_SUBTREE(1:J)=TEMP_MEM(1:J,1)
1593 IF(associated(id%MEM_SUBTREE))
1594 & deallocate(id%MEM_SUBTREE)
1595 allocate(id%MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
1637 CALL MPI_RECV(id%MEM_SUBTREE(1),id%NBSA_LOCAL,
1652 IF(associated(id%MEM_SUBTREE))
1653 & deallocate(id%MEM_SUBTREE)
[all …]
H A Dzana_driver.F1539 IF(associated(id%MEM_SUBTREE))
1540 & deallocate(id%MEM_SUBTREE)
1541 allocate(id%MEM_SUBTREE(J),stat=allocok)
1551 id%MEM_SUBTREE(1:J)=TEMP_MEM(1:J,1)
1593 IF(associated(id%MEM_SUBTREE))
1594 & deallocate(id%MEM_SUBTREE)
1595 allocate(id%MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
1637 CALL MPI_RECV(id%MEM_SUBTREE(1),id%NBSA_LOCAL,
1652 IF(associated(id%MEM_SUBTREE))
1653 & deallocate(id%MEM_SUBTREE)
[all …]
H A Dsana_driver.F1539 IF(associated(id%MEM_SUBTREE))
1540 & deallocate(id%MEM_SUBTREE)
1541 allocate(id%MEM_SUBTREE(J),stat=allocok)
1551 id%MEM_SUBTREE(1:J)=TEMP_MEM(1:J,1)
1593 IF(associated(id%MEM_SUBTREE))
1594 & deallocate(id%MEM_SUBTREE)
1595 allocate(id%MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
1637 CALL MPI_RECV(id%MEM_SUBTREE(1),id%NBSA_LOCAL,
1652 IF(associated(id%MEM_SUBTREE))
1653 & deallocate(id%MEM_SUBTREE)
[all …]
H A Dcmumps_restart.F825 IF(associated(id%MEM_SUBTREE)) THEN
826 write(OUT) size(id%MEM_SUBTREE,1)
827 write(OUT) id%MEM_SUBTREE
2148 nullify(id%MEM_SUBTREE)
2153 allocate(id%MEM_SUBTREE(size_array1))
2154 read(IN) id%MEM_SUBTREE
H A Dsmumps_restart.F825 IF(associated(id%MEM_SUBTREE)) THEN
826 write(OUT) size(id%MEM_SUBTREE,1)
827 write(OUT) id%MEM_SUBTREE
2148 nullify(id%MEM_SUBTREE)
2153 allocate(id%MEM_SUBTREE(size_array1))
2154 read(IN) id%MEM_SUBTREE
H A Ddmumps_restart.F825 IF(associated(id%MEM_SUBTREE)) THEN
826 write(OUT) size(id%MEM_SUBTREE,1)
827 write(OUT) id%MEM_SUBTREE
2148 nullify(id%MEM_SUBTREE)
2153 allocate(id%MEM_SUBTREE(size_array1))
2154 read(IN) id%MEM_SUBTREE
H A Dzmumps_restart.F825 IF(associated(id%MEM_SUBTREE)) THEN
826 write(OUT) size(id%MEM_SUBTREE,1)
827 write(OUT) id%MEM_SUBTREE
2148 nullify(id%MEM_SUBTREE)
2153 allocate(id%MEM_SUBTREE(size_array1))
2154 read(IN) id%MEM_SUBTREE
/dports/math/ipopt/Ipopt-3.12.13/ThirdParty/Mumps/MUMPS/src/
H A Dcmumps_load.F128 DOUBLE PRECISION, DIMENSION(:), ALLOCATABLE, SAVE ::MEM_SUBTREE
132 PUBLIC :: NB_SUBTREES,MEM_SUBTREE,INSIDE_SUBTREE,NIV1_FLAG
635 IF (allocated(MEM_SUBTREE)) DEALLOCATE(MEM_SUBTREE)
636 ALLOCATE(MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
638 MEM_SUBTREE(i)=id%MEM_SUBTREE(i)
772 MAX_SBTR=max(id%MEM_SUBTREE(i),MAX_SBTR)
1233 DEALLOCATE(MEM_SUBTREE)
2070 SBTR_PEAK_ARRAY(INDICE_SBTR_ARRAY)=MEM_SUBTREE(INDICE_SBTR)
2074 IF(dble(MEM_SUBTREE(INDICE_SBTR)).GE.DM_THRES_MEM)THEN
2093 & dble(MEM_SUBTREE(INDICE_SBTR))
[all …]
H A Dzmumps_load.F128 DOUBLE PRECISION, DIMENSION(:), ALLOCATABLE, SAVE ::MEM_SUBTREE
132 PUBLIC :: NB_SUBTREES,MEM_SUBTREE,INSIDE_SUBTREE,NIV1_FLAG
635 IF (allocated(MEM_SUBTREE)) DEALLOCATE(MEM_SUBTREE)
636 ALLOCATE(MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
638 MEM_SUBTREE(i)=id%MEM_SUBTREE(i)
772 MAX_SBTR=max(id%MEM_SUBTREE(i),MAX_SBTR)
1233 DEALLOCATE(MEM_SUBTREE)
2070 SBTR_PEAK_ARRAY(INDICE_SBTR_ARRAY)=MEM_SUBTREE(INDICE_SBTR)
2074 IF(dble(MEM_SUBTREE(INDICE_SBTR)).GE.DM_THRES_MEM)THEN
2093 & dble(MEM_SUBTREE(INDICE_SBTR))
[all …]
H A Ddmumps_load.F128 DOUBLE PRECISION, DIMENSION(:), ALLOCATABLE, SAVE ::MEM_SUBTREE
132 PUBLIC :: NB_SUBTREES,MEM_SUBTREE,INSIDE_SUBTREE,NIV1_FLAG
635 IF (allocated(MEM_SUBTREE)) DEALLOCATE(MEM_SUBTREE)
636 ALLOCATE(MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
638 MEM_SUBTREE(i)=id%MEM_SUBTREE(i)
772 MAX_SBTR=max(id%MEM_SUBTREE(i),MAX_SBTR)
1233 DEALLOCATE(MEM_SUBTREE)
2070 SBTR_PEAK_ARRAY(INDICE_SBTR_ARRAY)=MEM_SUBTREE(INDICE_SBTR)
2074 IF(dble(MEM_SUBTREE(INDICE_SBTR)).GE.DM_THRES_MEM)THEN
2093 & dble(MEM_SUBTREE(INDICE_SBTR))
[all …]
H A Dsmumps_load.F128 DOUBLE PRECISION, DIMENSION(:), ALLOCATABLE, SAVE ::MEM_SUBTREE
132 PUBLIC :: NB_SUBTREES,MEM_SUBTREE,INSIDE_SUBTREE,NIV1_FLAG
635 IF (allocated(MEM_SUBTREE)) DEALLOCATE(MEM_SUBTREE)
636 ALLOCATE(MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
638 MEM_SUBTREE(i)=id%MEM_SUBTREE(i)
772 MAX_SBTR=max(id%MEM_SUBTREE(i),MAX_SBTR)
1233 DEALLOCATE(MEM_SUBTREE)
2070 SBTR_PEAK_ARRAY(INDICE_SBTR_ARRAY)=MEM_SUBTREE(INDICE_SBTR)
2074 IF(dble(MEM_SUBTREE(INDICE_SBTR)).GE.DM_THRES_MEM)THEN
2093 & dble(MEM_SUBTREE(INDICE_SBTR))
[all …]
/dports/math/coinmumps/MUMPS_4.10.0/src/
H A Dzmumps_load.F128 DOUBLE PRECISION, DIMENSION(:), ALLOCATABLE, SAVE ::MEM_SUBTREE
132 PUBLIC :: NB_SUBTREES,MEM_SUBTREE,INSIDE_SUBTREE,NIV1_FLAG
635 IF (allocated(MEM_SUBTREE)) DEALLOCATE(MEM_SUBTREE)
636 ALLOCATE(MEM_SUBTREE(id%NBSA_LOCAL),stat=allocok)
638 MEM_SUBTREE(i)=id%MEM_SUBTREE(i)
772 MAX_SBTR=max(id%MEM_SUBTREE(i),MAX_SBTR)
1233 DEALLOCATE(MEM_SUBTREE)
2070 SBTR_PEAK_ARRAY(INDICE_SBTR_ARRAY)=MEM_SUBTREE(INDICE_SBTR)
2074 IF(dble(MEM_SUBTREE(INDICE_SBTR)).GE.DM_THRES_MEM)THEN
2093 & dble(MEM_SUBTREE(INDICE_SBTR))
[all …]

1234