f::lcm (public)

 f::lcm x y

Defined in packages/acs-tcl/tcl/ad-functional-procs.tcl

returns the least common multiple of x and y

Parameters:
x
y

Partial Call Graph (max 5 caller/called nodes):
%3 f::/ f::/ f::abs f::abs (public) f::gcd f::gcd (public) f::lcm f::lcm f::lcm->f::/ f::lcm->f::abs f::lcm->f::gcd

Testcases:
No testcase defined.
Source code:
    if { $x==0} { return 0 }
    if { $y==0} { return 0 }
    abs [expr {$x/[gcd $x $y]*$y}]
XQL Not present:
Generic, PostgreSQL, Oracle
[ hide source ] | [ make this the default ]
Show another procedure: