소스 검색

* CurveKappa, CurveKappaInv

Michaël Van Canneyt 1 년 전
부모
커밋
b61a0fab97
1개의 변경된 파일3개의 추가작업 그리고 1개의 파일을 삭제
  1. 3 1
      rtl/objpas/types.pp

+ 3 - 1
rtl/objpas/types.pp

@@ -38,7 +38,9 @@ const
 Const
   Epsilon: Single = 1E-40;
   Epsilon2: Single = 1E-30;
-
+  
+  CurveKappa = 0.5522847498; 
+  CurveKappaInv = 1 - CurveKappa;
 
 type
   TEndian =  Objpas.TEndian;