Skip to content
Snippets Groups Projects
Commit d1684c6c authored by Emmanuel Christophe's avatar Emmanuel Christophe
Browse files

ENH: remove useless methods

parent 5fdd8c23
No related branches found
No related tags found
No related merge requests found
......@@ -37,77 +37,7 @@ namespace ossimplugins
return (x >= 0.0) ? (double)((long)(x + 0.5)) : (double)((long)(x - 0.5));
}
/*-------------------------------------------------------------------------*/
/* Greatest Common Divisor */
/*-------------------------------------------------------------------------*/
long pgcd ( long n , long p )
{
long k ;
long n1 , p1 ;
long m0 , m1 , m ;
n1 = labs(n) ;
p1 = labs(p) ;
if (n1 > p1)
{
m0 = n1 ;
m1 = p1 ;
}
else
{
m0 = p1 ;
m1 = n1 ;
}
if (m1 != 0)
{
while (m1 != 0)
{
m = m0 - (m0/m1) * m1 ;
m0 = m1 ;
m1 = m ;
}
k = m0 ;
}
else k = 1 ;
return k ;
}
/*-------------------------------------------------------------------------*/
/* Least Common Multiple */
/*-------------------------------------------------------------------------*/
long ppcm ( long n , long p )
{
long k ;
long n1 , p1 ;
long m0 , m1 , m ;
n1 = labs(n) ;
p1 = labs(p) ;
if (n1>p1)
{
m0 = n1 ;
m1 = p1 ;
}
else
{
m0 = p1 ;
m1 = n1 ;
}
if (m1 != 0)
{
m = m0 ;
while ((m % m1) != 0) m += m0 ;
k = m ;
}
else k = 0 ;
return k ;
}
} // End: namespace ossimplugins
#endif
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment