Searched defs:pw_scale (Results 1 – 2 of 2) sorted by relevance
329 SUBROUTINE pw_scale(pw, a) subroutine334 CHARACTER(len=*), PARAMETER :: routineN = 'pw_scale', routineP = moduleN//':'//routineN argument336 INTEGER :: handle, ns337 REAL(KIND=dp) :: flop
305 SUBROUTINE pw_scale(pw, a) subroutine310 CHARACTER(len=*), PARAMETER :: routineN = 'pw_scale', routineP = moduleN//':'//routineN argument312 INTEGER :: handle, ns313 REAL(KIND=dp) :: flop