79 lines
1.2 KiB
Text
79 lines
1.2 KiB
Text
$NetBSD: patch-ao,v 1.1 2005/10/07 12:31:25 rillig Exp $
|
|
|
|
The patches patch-al upto patch-aq add the physical constants k, q, e0,
|
|
mu0, and c.
|
|
|
|
--- funcs.c.orig Thu Apr 4 05:46:11 2002
|
|
+++ funcs.c Fri Oct 7 14:24:25 2005
|
|
@@ -95,6 +95,71 @@ void PushStack(){
|
|
|
|
}
|
|
|
|
+void BoltzmannStack(){
|
|
+ Number *n1;
|
|
+
|
|
+ finishEditor();
|
|
+
|
|
+ SaveStackState(0);
|
|
+
|
|
+ n1 = setNumberReal(newNumber(), realBoltzmann);
|
|
+ Push(n1);
|
|
+
|
|
+ UndoStackState(1);
|
|
+}
|
|
+
|
|
+void ChargeStack(){
|
|
+ Number *n1;
|
|
+
|
|
+ finishEditor();
|
|
+
|
|
+ SaveStackState(0);
|
|
+
|
|
+ n1 = setNumberReal(newNumber(), realCharge);
|
|
+ Push(n1);
|
|
+
|
|
+ UndoStackState(1);
|
|
+}
|
|
+
|
|
+void E0Stack(){
|
|
+ Number *n1;
|
|
+
|
|
+ finishEditor();
|
|
+
|
|
+ SaveStackState(0);
|
|
+
|
|
+ n1 = setNumberReal(newNumber(), realE0);
|
|
+ Push(n1);
|
|
+
|
|
+ UndoStackState(1);
|
|
+}
|
|
+
|
|
+void Mu0Stack(){
|
|
+ Number *n1;
|
|
+
|
|
+ finishEditor();
|
|
+
|
|
+ SaveStackState(0);
|
|
+
|
|
+ n1 = setNumberReal(newNumber(), realMu0);
|
|
+ Push(n1);
|
|
+
|
|
+ UndoStackState(1);
|
|
+}
|
|
+
|
|
+void LightSpeedStack(){
|
|
+ Number *n1;
|
|
+
|
|
+ finishEditor();
|
|
+
|
|
+ SaveStackState(0);
|
|
+
|
|
+ n1 = setNumberReal(newNumber(), realLightSpeed);
|
|
+ Push(n1);
|
|
+
|
|
+ UndoStackState(1);
|
|
+}
|
|
+
|
|
void PiStack(){
|
|
Number *n1;
|
|
|