4 lines
64 B
Fortran
4 lines
64 B
Fortran
FUNCTION MULTIPLY(X,Y)
|
|
REAL MULTIPLY, X, Y
|
|
MULTIPLY = X * Y
|
|
END
|