Searched refs:UPQuad25 (Results 1 – 1 of 1) sorted by relevance
439 REAL(KIND=dp), DIMENSION(25), PRIVATE :: UPQuad25 = & variable1728 p % u(1:np) = UPQuad25(1:np)