Searched refs:dbcsr_col (Results 1 – 4 of 4) sorted by relevance
208 IF (.NOT. ALLOCATED(copy%dbcsr_col)) THEN211 IF (SIZE(copy%dbcsr_col) .NE. SIZE(original%dbcsr_col)) THEN212 DEALLOCATE (copy%dbcsr_col)239 copy%dbcsr_col(icol) = original%dbcsr_col(icol)412 IF (ALLOCATED(subm%dbcsr_col)) THEN413 DEALLOCATE (subm%dbcsr_col)499 IF (ALLOCATED(C%dbcsr_col)) THEN500 DEALLOCATE (C%dbcsr_col)502 ALLOCATE (C%dbcsr_col(C%nbcols))517 C%dbcsr_row(irow) = A%dbcsr_col(irow)[all …]
37 INTEGER, DIMENSION(:), ALLOCATABLE :: dbcsr_col component