3 files changed, 152 insertions, 0 deletions
diff --git a/P b/P
new file mode 100644
index 0000000..1f7c66a
--- /dev/null
+++ b/P
@@ -0,0 +1,90 @@
+LBL P
+XEQ S001
+105.110
+STO J
+R⬇
+x<>y
+XEQ P061
+R⬇
+XEQ P061
+100.102
+STO I
+106
+110
+XEQ P079
+x
+109
+107
+XEQ P079
+x
+-
+[1,0,0]
+x
+STO (I)
+ISG I
+107
+108
+XEQ P079
+x
+110
+105
+XEQ P079
+x
+-
+[0,1,0]
+x
+STO (I)
+ISG I
+105
+109
+XEQ P079
+x
+108
+106
+XEQ P079
+x
+-
+[0,0,1]
+x
+100.101
+STO I
+R⬇
+RCL (I)
+ISG I
+GTO P052
++
++
+STO I
+XEQ S011
+RCL I
+RTN
+STO I
+[1,0,0]
+x
+STO (J)
+ISG J
+CLx
+RCL I
+[0,1,0]
+x
+STO (J)
+ISG J
+CLx
+RCL I
+[0,0,1]
+x
+STO (J)
+ISG J
+RTN
+STO J
+CLx
+RCL (J)
+x<>y
+STO J
+CLx
+RCL (J)
+x<>y
+RTN
+
+LN=360
+CK=4FDF
diff --git a/Q b/Q
new file mode 100644
index 0000000..1ff2a0d
--- /dev/null
+++ b/Q
@@ -0,0 +1,43 @@
+LBL Q
+4
+x
+R⬆
+x
++/-
+x<>y
+ENTER
++/-
+R⬇
+x²
++
+XEQ Q032
+x<>y
+2
+x
+ENTER
+R⬇
+÷
+R⬇
+x<>y
+÷
+ENTER
+R⬆
+ENTER
+R⬇
+-
+x<>y
+R⬆
++
+RTN
+x<0?
+GTO Q036
+√x
+RTN
++/-
+√x
+0i1
+x
+RTN
+
+LN=125
+CK=8694
diff --git a/S b/S
new file mode 100644
index 0000000..f95e442
--- /dev/null
+++ b/S
@@ -0,0 +1,19 @@
+LBL S
+STO J
+CLx
+010.013
+x<> J
+STO (J)
+R⬇
+ISG J
+GTO S006
+RTN
+013.009
+STO J
+RCL (J)
+DSE J
+GTO S013
+RTN
+
+LN=62
+CK=7B96