91      $                   YS( NMAX*INCMAX ), YT( NMAX ),  variable
319      $                  X, XX, XS, Y, YY, YS, YT, G, 0 )
325      $                  X, XX, XS, Y, YY, YS, YT, G, 1 )
333      $                  X, XX, XS, Y, YY, YS, YT, G, 0 )
339      $                  X, XX, XS, Y, YY, YS, YT, G, 1 )
347      $                  NMAX, INCMAX, A, AA, AS, Y, YY, YS, YT, G, Z,
353      $                  NMAX, INCMAX, A, AA, AS, Y, YY, YS, YT, G, Z,
361      $                  NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
367      $                  NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
375      $                  NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
381      $                  NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
389      $                  NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
395      $                  NMAX, INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS,
459      $                  XS, Y, YY, YS, YT, G, IORDER )  argument
483      $                   YS( NMAX*INCMAX ), YT( NMAX ),  local
640                                  YS( I ) = YY( I )
689                                     ISAME( 10 ) = LSE( YS, YY, LY )
692      $                                            ML, YS, YY,
706                                     ISAME( 12 ) = LSE( YS, YY, LY )
709      $                                            ML, YS, YY,
819      $                  XS, Y, YY, YS, YT, G, IORDER )  argument
843      $                   YS( NMAX*INCMAX ), YT( NMAX ),  local
984                               YS( I ) = YY( I )
1038                                  ISAME( 9 ) = LSE( YS, YY, LY )
1041      $                                        YS, YY, ABS( INCY ) )
1053                                  ISAME( 10 ) = LSE( YS, YY, LY )
1056      $                                         YS, YY, ABS( INCY ) )
1066                                  ISAME( 8 ) = LSE( YS, YY, LY )
1069      $                                        YS, YY, ABS( INCY ) )
1565      $                  INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,  argument
1589      $                   Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),  local
1694                         YS( I ) = YY( I )
1723                      ISAME( 6 ) = LSE( YS, YY, LY )
1837      $                  INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,  argument
1861      $                   Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),  local
2133      $                  INCMAX, A, AA, AS, X, XX, XS, Y, YY, YS, YT, G,  argument
2157      $                   Y( NMAX ), YS( NMAX*INCMAX ), YT( NMAX ),  local
2279                         YS( I ) = YY( I )
2318                      ISAME( 6 ) = LSE( YS, YY, LY )