Adding new f_lcm() inbuilt function to the yuqk fork.

#include "functions.inc"

#debug "\n"
#debug concat("f_lcm      2 ",str(f_lcm(2,3,5,7,11,13,1),7,0)," \n")
#debug concat("f_lcm      6 ",str(f_lcm(2,3,5,7,11,13,2),7,0)," \n")
#debug concat("f_lcm     30 ",str(f_lcm(2,3,5,7,11,13,3),7,0)," \n")
#debug concat("f_lcm    210 ",str(f_lcm(2,3,5,7,11,13,4),7,0)," \n")
#debug concat("f_lcm   2310 ",str(f_lcm(2,3,5,7,11,13,5),7,0)," \n")
#debug concat("f_lcm  30030 ",str(f_lcm(2,3,5,7,11,13,6),7,0)," \n")
#debug concat("f_lcm     24 ",str(f_lcm(2,3,4,6, 8,12,6),7,0)," \n")
#debug concat("f_lcm     24 ",str(f_lcm(2,3,4,6, 8,12,5),7,0)," \n")
#debug concat("f_lcm     12 ",str(f_lcm(2,3,4,6, 8,12,4),7,0)," \n")
#debug concat("f_lcm     12 ",str(f_lcm(2,3,4,6, 8,12,3),7,0)," \n")
#debug "\n"

#error "Not error, stopping early"

Bill P.

Post a reply to this message