@leroysheep / rag-system
Code Commits Pulls CI/CD 81,972
jch
bisect jch maint master next seen test todo
text 14 lines 212 Bytes
Raw
1 module a
2
3 contains
4
5 subroutine RIGHT (funcA, funcB)
6
7 real funcA ! grid function a
8 real funcB ! grid function b
9
10 real ChangeMe
11
12 end subroutine RIGHT
13
14 end module a