10
0
mirror of https://github.com/LCPQ/quantum_package synced 2024-06-14 01:05:27 +02:00

Corrected qp_print_basis

This commit is contained in:
Anthony Scemama 2016-01-26 15:17:25 +01:00
parent e2836ee5e0
commit 6162685051

View File

@ -1,7 +1,7 @@
open Core.Std
open Qptypes
let basis ()=
let basis () =
let ezfio_filename =
Sys.argv.(1)
in
@ -18,7 +18,7 @@ let basis ()=
|> print_endline
let mo ()=
let mo () =
let ezfio_filename =
Sys.argv.(1)
in
@ -35,5 +35,7 @@ let mo ()=
|> print_endline
basis ();;
mo ();;
let () =
basis ();
mo ()