4 lines
83 B
Fortran
4 lines
83 B
Fortran
elemental function elemf(x)
|
|
real :: elemf, x
|
|
elemf = f(x)
|
|
end function elemf
|