fix warnings in normal.lib

[jakobkroeker]

add a test if you like:

LIB("normal.lib");

// test wrapped in a routine tu suppress output.
proc testRedefineInNormalP()
{
 ring rng = (3),(xx,yy,zz),(dp(2),dp(1),C);
 ideal J = xx^2*yy*zz-yy^2*zz^2;
 intvec v=1,1,1;
 ideal component = xx^2-yy*zz;
 def L1 = normalP(component,"withRing");
 intvec w = norTest(component, L1);
 ASSUME(0, v == norTest(component, L1) );
}

testRedefineInNormalP();