From c5c484477c1383c1ac37eb7d36776ffc6c16304a Mon Sep 17 00:00:00 2001
From: tavo-wasd <gustavo@gustavocalvo.xyz>
Date: Wed, 23 Aug 2023 17:39:51 -0600
Subject: [PATCH] trigonometric functions

---
 groff/math    | 34 +++++++++++++++++++++++++++-------
 groff/spanish |  7 +++++++
 2 files changed, 34 insertions(+), 7 deletions(-)

diff --git a/groff/math b/groff/math
index 73d3c77..2f5b6f1 100644
--- a/groff/math
+++ b/groff/math
@@ -6,18 +6,38 @@
 
 .EQ
 delim $$
+define / 'over'
+define grad '\[gr]'
 define . '~ \[md] ~'
 define * '~ \[mu] ~'
 define +- '~ \[+-] ~'
 define -+ '~ + bar ~'
 define and '~ \[AN] ~'
 define div '~ \[di] ~'
-define grad '\[gr]'
 
-define vec %
-"$1" sup fwd -70 up 40 size 5.5 \[->] ""
-%
-define circumflex %
-size 8 "$1" sup fwd -29 up 5 size 6 \[ha]
-%
+define sen 'roman "sen"'
+define tan 'roman "tan"'
+define sec 'roman "sec"'
+define cos 'roman "cos"'
+define cot 'roman "cot"'
+define csc 'roman "csc"'
+define sinh 'roman "sinh"'
+define tanh 'roman "tanh"'
+define sech 'roman "sech"'
+define cosh 'roman "cosh"'
+define coth 'roman "coth"'
+define csch 'roman "csch"'
+define arcsin 'roman "arcsin"'
+define arctan 'roman "arctan"'
+define arcsec 'roman "arcsec"'
+define arccos 'roman "arccos"'
+define arccot 'roman "arccot"'
+define arccsc 'roman "arccsc"'
+define arcsinh 'roman "arcsinh"'
+define arctanh 'roman "arctanh"'
+define arcsech 'roman "arcsech"'
+define arccosh 'roman "arccosh"'
+define arccoth 'roman "arccoth"'
+define arccsch 'roman "arccsch"'
+
 .EN
diff --git a/groff/spanish b/groff/spanish
index 4bf6bc0..5cd9ce2 100644
--- a/groff/spanish
+++ b/groff/spanish
@@ -21,3 +21,10 @@
 .ds MONTH12 diciembre
 
 .ds REFERENCES Referencias
+
+.EQ
+define sen 'roman "sen"'
+define arcsen 'roman "arcsen"'
+define senh 'roman "senh"'
+define arcsenh 'roman "arcsenh"'
+.EN