RosettaCodeData/Task/Greatest-common-divisor/Order/greatest-common-divisor.order
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

6 lines
206 B
Text

#include <order/interpreter.h>
#define ORDER_PP_DEF_8gcd ORDER_PP_FN( \
8fn(8U, 8V, \
8if(8isnt_0(8V), 8gcd(8V, 8remainder(8U, 8V)), 8U)))
// No support for negative numbers