Searched refs:WorkMatrix (Results 1 – 3 of 3) sorted by relevance
3264 TYPE(Matrix_t), POINTER :: WorkMatrix=>NULL() local3390 IF(ASSOCIATED(WorkMatrix)) THEN3399 CALL AllocateVector( WorkMatrix % RHS, WorkMatrix % NumberOfRows )3400 WorkMatrix % RHS = 0.0_dp3401 WorkMatrix % RHS_im => NULL()3403 ALLOCATE(WorkMatrix % Force(WorkMatrix % NumberOfRows, WorkSolver % TimeOrder+1))3404 WorkMatrix % Force = 0.0_dp3423 CALL AllocateVector( WorkMatrix % MassValues, SIZE(WorkMatrix % Values) )3424 WorkMatrix % MassValues = 0.0d03452 WorkSolver % Matrix => WorkMatrix[all …]
380 static MatrixRmn WorkMatrix; // Temporary work matrix variable381 static MatrixRmn &GetWorkMatrix() { return WorkMatrix; } in GetWorkMatrix()383 WorkMatrix.SetSize(numRows, numCols); in GetWorkMatrix()384 return WorkMatrix; in GetWorkMatrix()
52 MatrixRmn MatrixRmn::WorkMatrix; // Temporary work matrix member in MatrixRmn