1/* Higher-level interface to the rate function. -*- mfl -*- 2 Copyright (C) 2009-2021 Sergey Poznyakoff 3 4 This program is free software; you can redistribute it and/or modify 5 it under the terms of the GNU General Public License as published by 6 the Free Software Foundation; either version 3, or (at your option) 7 any later version. 8 9 This program is distributed in the hope that it will be useful, 10 but WITHOUT ANY WARRANTY; without even the implied warranty of 11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12 GNU General Public License for more details. 13 14 You should have received a copy of the GNU General Public License 15 along with this program. If not, see <http://www.gnu.org/licenses/>. */ 16 17module 'rateok'. 18 19func rateok(string key, number timespan, number threshold; number mincnt) 20 returns number 21do 22 if not defined(mincnt) 23 set mincnt 4 24 fi 25 return rate(key, timespan, mincnt, threshold) <= threshold 26done 27