13 lines
162 B
Text
13 lines
162 B
Text
module a
|
|
|
|
contains
|
|
|
|
* subroutine wrong
|
|
subroutine RIGHT
|
|
* subroutine wrong
|
|
|
|
real ChangeMe
|
|
|
|
end subroutine RIGHT
|
|
|
|
end module a
|