error in function
 

helo!

i cant find out this error please help me! :confused:
its in module form
tnks alot



program mul_plus
implicit none
real::a,b,multiply,plus

use c

print*,multiply,plus
pause
end program



module c
contains

function plus(a,b)
real::a,b,plus
a=2
b=5
plus=a+b
end function


function multiply(a,b)
real::a,b,multiply
a=2
b=5
multiply=a*b
end function

end module c