aboutsummaryrefslogtreecommitdiff
path: root/test/example_packages/submodules/src/child1.f90
diff options
context:
space:
mode:
authorLKedward <laurence.kedward@bristol.ac.uk>2020-09-18 11:38:13 +0100
committerLKedward <laurence.kedward@bristol.ac.uk>2020-09-18 11:38:13 +0100
commit35f4779647ddab4ef7edef26b4e0027004d6c756 (patch)
tree4ae4d9c33120495608fe43a9b92b9fb2c5fd41c4 /test/example_packages/submodules/src/child1.f90
parent27b2ead1813368abe297db1913871f69836f48c0 (diff)
downloadfpm-35f4779647ddab4ef7edef26b4e0027004d6c756.tar.gz
fpm-35f4779647ddab4ef7edef26b4e0027004d6c756.zip
Add: example package with submodules
Diffstat (limited to 'test/example_packages/submodules/src/child1.f90')
-rw-r--r--test/example_packages/submodules/src/child1.f9016
1 files changed, 16 insertions, 0 deletions
diff --git a/test/example_packages/submodules/src/child1.f90 b/test/example_packages/submodules/src/child1.f90
new file mode 100644
index 0000000..dbd0fa5
--- /dev/null
+++ b/test/example_packages/submodules/src/child1.f90
@@ -0,0 +1,16 @@
+submodule(parent) child1
+implicit none
+
+interface
+ module function my_fun() result (b)
+ integer :: b
+ end function my_fun
+end interface
+
+contains
+
+module procedure my_sub1
+ a = 1
+end procedure my_sub1
+
+end submodule child1 \ No newline at end of file