Initial implementation (hopefully) done

2024-12-08 09:41:05 -08:00
parent 5d2249e1fa
commit 5adc755be4
6 changed files with 200 additions and 120 deletions
@@ -48,7 +48,20 @@

 (defpackage :cl-quantum/state
  (:use :cl :cl-quantum/math)
-  (:export #:normal-state-p
+  (:export #:+unset-projector+
+           #:+set-projector+
+           #:+identity-2x2+
+           #:+pauli-x-gate+
+           #:+pauli-y-gate+
+           #:+pauli-z-gate+
+           #:+hadamard-gate+
+           #:+phase-gate+
+           #:+pi/8-gate+
+           #:+cnot-gate+
+           #:+cz-gate+
+           #:+swap-gate+
+           #:+ccnot-gate+
+           #:normal-state-p
           #:normalize-state
           #:nnormalize-state
           #:state-bits
@@ -59,26 +72,27 @@
           #:bit-probability
           #:nmeasure
           #:measure
+           #:ncollapse
+           #:collapse
           #:make-operator
           #:make-controlled-operator
           #:apply-operator
           #:napply-operator
           #:apply-controlled-operator
-           #:napply-controlled-operator
-           #:unset-projector
-           #:set-projector
-           #:identity-2x2
-           #:pauli-x-gate
-           #:pauli-y-gate
-           #:pauli-z-gate
-           #:hadamard-gate
-           #:phase-gate
-           #:pi/8-gate
-           #:cnot-gate
-           #:cz-gate
-           #:swap-gate
-           #:ccnot-gate))
+           #:napply-controlled-operator))

 (defpackage :cl-quantum/circuit
  (:use :cl :cl-quantum/math :cl-quantum/state)
-  (:export))
+  (:export #:*circuit-measure-places*
+           #:*circuit-operators*
+           #:make-circuit
+           #:add-to-circuit
+           #:with-build-circuit
+           #:run-circuit))
+
+(defpackage :cl-quantum/pprint
+  (:use :cl :cl-quantum/math :cl-quantum/state)
+  (:export #:pprint-complex
+           #:pprint-format-bits
+           #:pprint-format-linear
+           #:pprint-state))