mirror of
https://gitlab.com/scemama/eplf
synced 2024-11-19 12:32:36 +01:00
7 lines
136 B
Fortran
7 lines
136 B
Fortran
program debug
|
|
double precision a
|
|
double precision primitive_overlap
|
|
a = primitive_overlap(3.d0,-1.d0,3,2.d0,1.d0,4)
|
|
print *, a
|
|
end
|