@@ -380,7 +380,7 @@ static doublereal c_b43 = 1.;
380380 static integer i__ ;
381381 extern /* Subroutine */ int ctest_ (integer * , doublecomplex * , doublecomplex * , doublecomplex * , doublereal * );
382382 static doublecomplex mwpcs [5 ], mwpct [5 ];
383- extern /* Subroutine */ int zscaltest_ (integer * , doublereal * , doublecomplex * , integer * ), itest1_ (integer * , integer * ), stest1_ (doublereal * , doublereal * , doublereal * , doublereal * );
383+ extern /* Subroutine */ int zscaltest_ (integer * , doublecomplex * , doublecomplex * , integer * ), itest1_ (integer * , integer * ), stest1_ (doublereal * , doublereal * , doublereal * , doublereal * );
384384 static doublecomplex cx [8 ];
385385 extern doublereal dznrm2test_ (integer * , doublecomplex * , integer * );
386386 static integer np1 ;
@@ -595,7 +595,7 @@ static doublereal c_b43 = 1.;
595595 static integer ki ;
596596 extern /* Subroutine */ int zdotutest_ (integer * , doublecomplex * , integer * , doublecomplex * , integer * , doublecomplex * ), zswaptest_ (integer * , doublecomplex * , integer * , doublecomplex * , integer * );
597597 static integer kn ;
598- extern /* Subroutine */ int zaxpytest_ (integer * , doublereal * , doublecomplex * , integer * , doublecomplex * , integer * );
598+ extern /* Subroutine */ int zaxpytest_ (integer * , doublecomplex * , doublecomplex * , integer * , doublecomplex * , integer * );
599599 static doublecomplex cx [7 ], cy [7 ];
600600 static integer mx , my ;
601601
0 commit comments