source: git/kernel/p_Neg__T.cc @ 599326

spielwiese
Last change on this file since 599326 was 341696, checked in by Hans Schönemann <hannes@…>, 14 years ago
Adding Id property to all files git-svn-id: file:///usr/local/Singular/svn/trunk@12231 2c84dea3-7e68-4137-9b89-c4e89433aadc
  • Property mode set to 100644
File size: 730 bytes
Line 
1/****************************************
2*  Computer Algebra System SINGULAR     *
3****************************************/
4/***************************************************************
5 *  File:    p_Neg__Template.cc
6 *  Purpose: template for p_Neg
7 *  Author:  obachman (Olaf Bachmann)
8 *  Created: 8/00
9 *  Version: $Id$
10 *******************************************************************/
11
12/***************************************************************
13 *
14 *   Returns:  -p
15 *   Destroys: p
16 *
17 ***************************************************************/
18LINKAGE poly p_Neg(poly p, const ring r)
19{
20  poly q = p;
21  while (p != NULL)
22  {
23    pSetCoeff0(p, n_Neg(pGetCoeff(p), r));
24    pIter(p);
25  }
26  return q;
27}
28
29
Note: See TracBrowser for help on using the repository browser.