From 0209d29a4960f0abe844a3c9bdf98ba85f02c585 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?John=20Ankarstr=C3=B6m?= <john@ankarstrom.se>
Date: Thu, 24 Jun 2021 14:17:38 +0200
Subject: Use floating-point division to set c point size, if available

---
 g.tmac | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/g.tmac b/g.tmac
index b61b8ba..098c010 100644
--- a/g.tmac
+++ b/g.tmac
@@ -255,12 +255,14 @@ ___________________
 .
 \&\$3\c
 . ft \*[_fl]
-. ps +(\n[_sl]-\n[_s0])u
 . ss 7
+. ie d nrf .nrf _s (\n(.s*(\n[_sl]/(\n[_s0])))
+. el .nr _s \n(.s+(\n[_sl]-\n[_s0])
+. ps \n(_sp
 \&\$1\c
 . ft
-. ps
 . ss \n[_ss]
+. ps
 \&\$2
 ..
 .
-- 
cgit v1.2.3