From e16657f56099e968ad0f2d51da2756d42e28dfc9 Mon Sep 17 00:00:00 2001
From: Dario Sassi <dario.sassi@egalware.com>
Date: Sat, 25 Oct 2025 10:30:11 +0200
Subject: [PATCH] EgtExchange 2.7j2 : - in import BTL corretta lunghezza
 eventuale tasca per mortase a coda di rondine.

---
 BtlGeomCoStru.h |   1 -
 BtlGeomProc.cpp |   8 ++++----
 EgtExchange.rc  | Bin 11678 -> 11678 bytes
 3 files changed, 4 insertions(+), 5 deletions(-)

diff --git a/BtlGeomCoStru.h b/BtlGeomCoStru.h
index 57ed6e5..5743f79 100644
--- a/BtlGeomCoStru.h
+++ b/BtlGeomCoStru.h
@@ -166,7 +166,6 @@ const double DOVETAIL_DEF_ANG = 15.0 ;
 const double DTMORT_EXTRA_LEN = 10.0 ;
 // minima e massima dimensione tasca per mortasa a coda di rondine
 const double MIN_DTMORT_POCKET = 70.0 ;
-const double MAX_DTMORT_POCKET = 200.0 ;
 const double MIN_DTMORT_AREA = 100.0 ;
 // tolleranza fuoriuscita curve di tasche di code di rondine
 const double DTMORT_OUT_CRV_TOL = 30.0 ;
diff --git a/BtlGeomProc.cpp b/BtlGeomProc.cpp
index 2fb42a3..af43af4 100644
--- a/BtlGeomProc.cpp
+++ b/BtlGeomProc.cpp
@@ -4311,9 +4311,9 @@ BtlGeom::AddDovetailMortise( int nGroup, int nProc, int nSide, const string& sDe
       dY4 = dExtraLen ;
    }
    else {
-      dExtraLen = MAX_DTMORT_POCKET ;
+      dExtraLen = dMortL ;
       if ( dMortA > EPS_ANG_SMALL)
-         dExtraLen = Clamp( 0.6225 * dOffs / sin( dMortA * DEGTORAD), MIN_DTMORT_POCKET, MAX_DTMORT_POCKET) ;
+         dExtraLen = Clamp( dOffs / sin( dMortA * DEGTORAD), MIN_DTMORT_POCKET, dMortL) ;
       dX4 = dX3 ;
       dY4 = dExtraLen ;
    }
@@ -4568,9 +4568,9 @@ BtlGeom::AddDtMortiseFront( int nGroup, int nProc, int nSide, const string& sDes
       dY4 = dExtraLen ;
    }
    else {
-      dExtraLen = MAX_DTMORT_POCKET ;
+      dExtraLen = dMortL ;
       if ( dMortA > EPS_ANG_SMALL)
-         dExtraLen = min( 0.6225 * dOffs / sin( dMortA * DEGTORAD), MAX_DTMORT_POCKET) ;
+         dExtraLen = Clamp( dOffs / sin( dMortA * DEGTORAD), MIN_DTMORT_POCKET, dMortL) ;
       dX4 = dX3 ;
       dY4 = dExtraLen ;
    }
diff --git a/EgtExchange.rc b/EgtExchange.rc
index d561afa460f154288d9f5255d413558341556363..ac74c2fc5517f1e991c074ba61c19505aca5bc9a 100644
GIT binary patch
delta 102
zcmbOiJuiC0A2vp#%@6qwGELscnZsx_c_X*(W(Of3#?4E(ZJ5DQhCm7`+`)oFae*|Z
MVn4>sQOYh{05%>WQ~&?~

delta 102
zcmbOiJuiC0A2vqA%@6qwGELscnZsx}c_X*(W(Of3#?4E(ZJ5DQhCm7`+`)oFae*|Z
MVn4>sQOYh{05ozTOaK4?