diff --git a/top/install_printers.org b/top/install_printers.org
index 756bfa9..c259aca 100644
--- a/top/install_printers.org
+++ b/top/install_printers.org
@@ -21,17 +21,17 @@
   
   #+NAME: raw_printers
   #+begin_src sh :results output raw :exports none
-grep "val pp " ../*/*.org \
-    | grep -v docs \
+grep "val pp " ../*/lib/*.mli \
     | cut -d ":" -f 1 \
     | sed 's|^../||' \
-    | sed 's|.org||' \
-    | sed 's|/| |' \
+    | sed 's|.mli||' \
+    | sed 's|/lib/| |' \
     | sed 's/[^ ]*/\u&/g' \
     | sed 's| |.|' \
     | grep -v Top.Install_printers
   #+end_src
 
+
   #+NAME: printers
   #+begin_src python :results output raw :var p=raw_printers :exports none
 result = []
diff --git a/top/lib/install_printers.ml b/top/lib/install_printers.ml
index ff95c4a..cae5ff5 100644
--- a/top/lib/install_printers.ml
+++ b/top/lib/install_printers.ml
@@ -1,7 +1,30 @@
 (* [[file:~/QCaml/top/install_printers.org::*Intall printers][Intall printers:3]] *)
 let printers =
   [
+    "Ao.Basis.pp" ;
+    "Ao.Basis_gaussian.pp" ;
+    "Common.Angular_momentum.pp" ;
+    "Common.Bitstring.pp" ;
+    "Common.Charge.pp" ;
+    "Common.Coordinate.pp" ;
+    "Common.Powers.pp" ;
+    "Common.Range.pp" ;
+    "Common.Spin.pp" ;
+    "Common.Zkey.pp" ;
+    "Gaussian.Atomic_shell.pp" ;
+    "Gaussian.Atomic_shell_pair.pp" ;
+    "Gaussian.Atomic_shell_pair_couple.pp" ;
+    "Gaussian.Basis.pp" ;
+    "Gaussian.Contracted_shell.pp" ;
+    "Gaussian.General_basis.pp" ;
+    "Linear_algebra.Matrix.pp" ;
+    "Mo.Basis.pp" ;
+    "Mo.Class.pp" ;
+    "Mo.Fock.pp" ;
+    "Mo.Frozen_core.pp" ;
+    "Mo.Hartree_fock.pp" ;
     "Mo.Localization.pp" ;
+    "Particles.Electrons.pp" ;
     "Particles.Element.pp" ;
     "Particles.Nuclei.pp" ;
     "Particles.Zmatrix.pp" ;