Searched refs:PARDDF (Results 1 - 1 of 1) sorted by relevance
| /haiku-buildtools/gcc/gcc/testsuite/gfortran.dg/g77/ |
| H A D | 20010519-1.f | 5 1 PARDDV,DDV,DDM,PARDDF,DDF,PARDDE,DDEV,DD1BLK,
671 REAL(KIND=8) DDF(*),PARDDF(*),DDEV(*),PARDDE(*) local in subroutine:NMDIMB
822 PARDDF(J)=CNVFRQ*SQRT(ABS(PARDDE(J)))
823 IF(PARDDE(J) .LT. 0.0) PARDDF(J)=-PARDDF(J)
828 PARDDF(J)=CNVFRQ*SQRT(ABS(PARDDE(J)))
829 IF(PARDDE(J) .LT. 0.0) PARDDF(J)=-PARDDF(J)
835 WRITE(OUTU,516) (J,PARDDF(J),J=1,NFRE)
|
Completed in 44 milliseconds