23 lines
951 B
Diff
23 lines
951 B
Diff
diff -up libint-2.6.0/fortran/fortran_example.F90.fexample libint-2.6.0/fortran/fortran_example.F90
|
|
--- libint-2.6.0/fortran/fortran_example.F90.fexample 2020-08-15 13:40:52.426814159 +0300
|
|
+++ libint-2.6.0/fortran/fortran_example.F90 2020-08-15 13:42:07.730617092 +0300
|
|
@@ -1,7 +1,7 @@
|
|
PROGRAM fortran_example
|
|
|
|
#include <libint2/config.h>
|
|
-#include <libint2/util/generated/libint2_params.h>
|
|
+#include "libint2_params.h"
|
|
#include "fortran_incldefs.h"
|
|
|
|
USE ISO_C_BINDING, ONLY: C_DOUBLE, C_F_POINTER, C_F_PROCPOINTER, C_NULL_PTR
|
|
@@ -86,8 +86,8 @@ PROGRAM fortran_example
|
|
am2, c2, alpha2, B, &
|
|
am3, c3, alpha3, C, &
|
|
am4, c4, alpha4, D, &
|
|
- F, deriv_order, erieval)
|
|
- CALL print_eri(am1, am2, am3, am4, erieval)
|
|
+ F, erieval)
|
|
+ CALL print_eri(am1, am2, am3, am4, deriv_order, erieval)
|
|
CALL libint2_cleanup_eri2(erieval)
|
|
#endif
|
|
#endif
|