Searched refs:wavg (Results 1 - 1 of 1) sorted by relevance
/haiku-buildtools/gcc/gcc/testsuite/gfortran.fortran-torture/compile/ |
H A D | pr57517.f90 | 1 SUBROUTINE cal_helicity (uh, ph, phb, wavg, ims, ime, its, ite) 3 REAL, DIMENSION( ims:ime), INTENT( IN ) :: ph, phb, wavg local in subroutine:cal_helicity 9 IF (wavg(i) .GT. 0) THEN
|
Completed in 35 milliseconds