Changeset 25228

Timestamp:

07/07/20 21:42:44 (5 years ago)

Author:

Mathieu Morlighem

Message:

CHG: removing TripleMultiply from Hydro DC

File:

• issm/trunk-jpl/src/c/analyses/L2ProjectionEPLAnalysis.cpp (modified) (1 diff)

issm/trunk-jpl/src/c/analyses/L2ProjectionEPLAnalysis.cpp

@@ -138 +138 @@
                 basalelement->NodalFunctions(basis,gauss);
                 D=gauss->weight*Jdet;
-
-                TripleMultiply(basis,1,numnodes,1,
-                                        &D,1,1,0,
-                                        basis,1,numnodes,0,
-                                        &Ke->values[0],1);
+                for(int i=0;i<numnodes;i++) for(int j=0;j<numnodes;j++) Ke->values[i*numnodes+j] += D*basis[j]*basis[i];
         }