primarydef a mult b = a * b enddef;