7 lines
93 B
FortranFixed
7 lines
93 B
FortranFixed
double complex function zho_ge()
|
|
|
|
zho_ge = (0.0d0,0.0d0)
|
|
|
|
return
|
|
end
|