From aef9ef7deb664065ed35a185a02782f27c3134a1 Mon Sep 17 00:00:00 2001
From: crc <>
Date: Fri, 7 Jul 2023 13:32:43 +0000
Subject: [PATCH] floats: f:tan and f:cos were swapped; this is now fixed
 (thanks to Doug Bell for spotting this!)

FossilOrigin-Name: 985eb1551cf80d65c60a3ccfc65c38b19f4ec656ea49c174f1f9b5383748d3d9
---
 interface/floatingpoint.retro | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/interface/floatingpoint.retro b/interface/floatingpoint.retro
index abc506f..bfbdb9c 100644
--- a/interface/floatingpoint.retro
+++ b/interface/floatingpoint.retro
@@ -40,8 +40,8 @@ maps closely to C and `libm`.
 :f:log   (f:ab-c)   #19 float:operation ;
 :f:power (f:ab-c)   #20 float:operation ;
 :f:sin   (f:f-f)    #21 float:operation ;
-:f:cos   (f:f-f)    #22 float:operation ;
-:f:tan   (f:f-f)    #23 float:operation ;
+:f:tan   (f:f-f)    #22 float:operation ;
+:f:cos   (f:f-f)    #23 float:operation ;
 :f:asin  (f:f-f)    #24 float:operation ;
 :f:acos  (f:f-f)    #25 float:operation ;
 :f:atan  (f:f-f)    #26 float:operation ;