/* Calculate ratio of two numbers * Copyright 2008 Sami Farin * Released to Public Domain */ config("resource_debug", 0),; /* Do not print "gcdratio() defined" */ define gcdratio() { local argc; /* number of args given */ local mygcd; argc = param(0); if (argc != 2) { quit "usage: gcdratio(v1, v2)"; } mygcd = gcd(param(1), param(2)); printf("%d/%d\n", param(1)/mygcd, param(2)/mygcd); }