Searched refs:flesDot1 (Results 1 – 4 of 4) sorted by relevance
84 #define flesDot1 FortranCInterface_GLOBAL_(flesdot1,FLESDOT1) macro150 double flesDot1( double* a,
227 real*8 function flesDot1 ( a, m, n ) function233 flesDot1 = 0236 flesDot1 = flesDot1 + a(i,j) * a(i,j)
428 tmpp = flesDot1( srcpnt, in lesDot1()
380 mres_n=sqrt(flesDot1(myV,amg_nshg(cl),1))