Path: ...!news.mixmin.net!news.neodome.net!rocksolid2!i2pn2.org!.POSTED!not-for-mail
From: melahi_ahmed@yahoo.fr (Ahmed)
Newsgroups: comp.lang.forth
Subject: Re: exercise in double number arithmetic
Date: Sun, 7 Jul 2024 05:48:47 +0000
Organization: novaBBS
Message-ID: <5027ddf17f1061435c0ef1df0c5a2061@www.novabbs.com>
References: <v6c8v0$3usoe$1@dont-email.me> <9c8e8993d3413e65caf355ecc6ceea31@www.novabbs.com> <v6cl84$obt$2@dont-email.me>
MIME-Version: 1.0
Content-Type: text/plain; charset=utf-8; format=flowed
Content-Transfer-Encoding: 8bit
Injection-Info: i2pn2.org;
	logging-data="2429510"; mail-complaints-to="usenet@i2pn2.org";
	posting-account="hogn68ACS2mVV0PcPkBzD/3kIXL71Lu5zlxJ/QczJJE";
User-Agent: Rocksolid Light
X-Rslight-Site: $2y$10$GMUvjdvB.OxnnAptc1FcO.UoUWahn6l4Gn.45d8yq3LOqMq4Em11K
X-Spam-Checker-Version: SpamAssassin 4.0.0
X-Rslight-Posting-User: cdd77cd46f5cefdf617b921703a970831cf47f35
Bytes: 1365
Lines: 17

On Sat, 6 Jul 2024 23:50:28 (UTC), Krishna Myneni wrote:

> On 7/6/24 16:59, Ahmed wrote:
....
> : solution ( -- d)
>      1 s>d 43 22 do i 1 m*/ loop d>f
>      21 dup s>d rot 2 do I 1 m*/ loop d>f
>      f/ fround f>d ;
>
....
> Krishna


You have not to use fround. (42!/21!) is an integer and is multiple of
21!.
in other words 42! is multiple of (21!)^2.

Ahmed