377 mult2 = strrep (mult,  'xarg', '`$2''') ;  variable
378 mult2 = strrep (mult2, 'yarg', '`$3''') ;  variable
379 fprintf (f, 'define(`GB_multiply'', `$1 = %s'')\n', mult2) ;
438         ztype, mult2, add2) ;
454 mult2 = strrep (mult,  'xarg', 'ax') ;  variable
455 mult2 = strrep (mult2, 'yarg', 'bx') ;  variable
461     mult2 = sprintf ('((%s) (%s))', ztype, mult2) ;  variable
463     mult2 = sprintf ('(%s)', mult2) ;  variable
473             s = sprintf ('if (exists && !cb) { cx = %s ; }', mult2) ;
479         s = sprintf ('cx |= exists & %s', mult2) ;
483         s = sprintf ('cx &= ~exists | %s', mult2) ;
490             s = sprintf ('cx ^= exists & %s', mult2) ;
500                     mult2, mult2) ;
504                     ztype, mult2) ;
511                 mult2, mult2, mult2) ;
514                 ztype, mult2) ;
517                 ztype, mult2) ;
528                 mult2, mult2) ;
531                 ztype, mult2) ;
538                 mult2, mult2, mult2) ;
542                 ztype, mult2) ;
546                 ztype, mult2) ;
572                     s = sprintf ('cx += (%s) (%s * X [exists])', ztype, mult2) ;
574                     s = sprintf ('cx += %s * X [exists]', mult2) ;
586         s = sprintf ('cx |= X [exists] & %s', mult2) ;
591         s = sprintf ('cx &= X [exists] | %s', mult2) ;
596         s = sprintf ('cx ^= X [exists] & %s', mult2) ;