| 1 |
francois |
1158 |
//####//------------------------------------------------------------ |
| 2 |
|
|
//####//------------------------------------------------------------ |
| 3 |
|
|
//####// MAGiC |
| 4 |
|
|
//####// Jean Christophe Cuilliere et Vincent FRANCOIS |
| 5 |
|
|
//####// Departement de Genie Mecanique - UQTR |
| 6 |
|
|
//####//------------------------------------------------------------ |
| 7 |
|
|
//####// MAGIC est un projet de recherche de l equipe ERICCA |
| 8 |
|
|
//####// du departement de genie mecanique de l Universite du Quebec a Trois Rivieres |
| 9 |
|
|
//####// http://www.uqtr.ca/ericca |
| 10 |
|
|
//####// http://www.uqtr.ca/ |
| 11 |
|
|
//####//------------------------------------------------------------ |
| 12 |
|
|
//####//------------------------------------------------------------ |
| 13 |
|
|
//####// |
| 14 |
|
|
//####// CAD4FE_Criteria.cpp |
| 15 |
|
|
//####// |
| 16 |
|
|
//####//------------------------------------------------------------ |
| 17 |
|
|
//####//------------------------------------------------------------ |
| 18 |
|
|
//####// COPYRIGHT 2000-2024 |
| 19 |
|
|
//####// jeu 13 jun 2024 11:58:56 EDT |
| 20 |
|
|
//####//------------------------------------------------------------ |
| 21 |
|
|
//####//------------------------------------------------------------ |
| 22 |
foucault |
27 |
|
| 23 |
|
|
|
| 24 |
|
|
#include <math.h>
|
| 25 |
|
|
#include <stdlib.h>
|
| 26 |
|
|
|
| 27 |
|
|
#pragma hdrstop
|
| 28 |
|
|
|
| 29 |
foucault |
176 |
#include "gestionversion.h"
|
| 30 |
foucault |
27 |
#include "CAD4FE_Criteria.h"
|
| 31 |
|
|
|
| 32 |
|
|
using namespace CAD4FE;
|
| 33 |
|
|
|
| 34 |
|
|
|
| 35 |
|
|
double Criteria::PlanarCurve_EpsilonH(double __h)
|
| 36 |
|
|
{
|
| 37 |
|
|
return
|
| 38 |
|
|
1/__h*
|
| 39 |
|
|
(
|
| 40 |
|
|
1 -
|
| 41 |
|
|
sqrt (1 - .25*pow(__h,2) )
|
| 42 |
|
|
);
|
| 43 |
|
|
}
|
| 44 |
|
|
|
| 45 |
|
|
double Criteria::PlanarCurve_EpsilonBeta(double __beta)
|
| 46 |
|
|
{ // return __beta*.125;
|
| 47 |
|
|
return
|
| 48 |
|
|
(
|
| 49 |
|
|
1 - sqrt (1 - pow( sin(.5*__beta) , 2) )
|
| 50 |
|
|
)
|
| 51 |
|
|
/
|
| 52 |
|
|
(
|
| 53 |
|
|
2*sin(.5*__beta)
|
| 54 |
|
|
);
|
| 55 |
|
|
}
|
| 56 |
|
|
|
| 57 |
|
|
double Criteria::PlanarCurve_BetaEpsilon(double __epsilon)
|
| 58 |
|
|
{
|
| 59 |
|
|
return 2*asin(__epsilon/(pow(__epsilon,2)+.25));
|
| 60 |
|
|
}
|
| 61 |
|
|
|
| 62 |
|
|
#pragma package(smart_init)
|
| 63 |
|
|
|
