Files
OpenBLAS/ftest3.f
2013-07-31 14:41:39 +08:00

7 lines
94 B
Fortran

double complex function zho_ge()
zho_ge = (0.0d0,0.0d0)
return
end