blob: 4184679b249837ff1450a8662f2b462535d8b07b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
|
$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;
|