mirror of
https://github.com/LCPQ/quantum_package
synced 2024-12-23 04:43:50 +01:00
Corrected qp_print_basis
This commit is contained in:
parent
e2836ee5e0
commit
6162685051
@ -1,7 +1,7 @@
|
|||||||
open Core.Std
|
open Core.Std
|
||||||
open Qptypes
|
open Qptypes
|
||||||
|
|
||||||
let basis ()=
|
let basis () =
|
||||||
let ezfio_filename =
|
let ezfio_filename =
|
||||||
Sys.argv.(1)
|
Sys.argv.(1)
|
||||||
in
|
in
|
||||||
@ -18,7 +18,7 @@ let basis ()=
|
|||||||
|> print_endline
|
|> print_endline
|
||||||
|
|
||||||
|
|
||||||
let mo ()=
|
let mo () =
|
||||||
let ezfio_filename =
|
let ezfio_filename =
|
||||||
Sys.argv.(1)
|
Sys.argv.(1)
|
||||||
in
|
in
|
||||||
@ -35,5 +35,7 @@ let mo ()=
|
|||||||
|> print_endline
|
|> print_endline
|
||||||
|
|
||||||
|
|
||||||
basis ();;
|
let () =
|
||||||
mo ();;
|
basis ();
|
||||||
|
mo ()
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user