aboutsummaryrefslogtreecommitdiff
path: root/hello_complex/source/farewell_m.f90
diff options
context:
space:
mode:
authorBrad Richardson <brichardson@structint.com>2020-04-13 20:08:16 -0500
committerBrad Richardson <brichardson@structint.com>2020-04-29 19:08:05 -0700
commit7ec56260921d73a01039cd881e7ce278d59931f9 (patch)
tree46fa4cd891b3259a010256435db41444f33fb3fc /hello_complex/source/farewell_m.f90
parentb07a5fcc4d9ea577e0918f683ba2fc1d82e55cd9 (diff)
downloadfpm-7ec56260921d73a01039cd881e7ce278d59931f9.tar.gz
fpm-7ec56260921d73a01039cd881e7ce278d59931f9.zip
Create a complex project to test
Diffstat (limited to 'hello_complex/source/farewell_m.f90')
-rw-r--r--hello_complex/source/farewell_m.f9013
1 files changed, 13 insertions, 0 deletions
diff --git a/hello_complex/source/farewell_m.f90 b/hello_complex/source/farewell_m.f90
new file mode 100644
index 0000000..9fc75b9
--- /dev/null
+++ b/hello_complex/source/farewell_m.f90
@@ -0,0 +1,13 @@
+module farewell_m
+ implicit none
+ private
+
+ public :: make_farewell
+contains
+ function make_farewell(name) result(greeting)
+ character(len=*), intent(in) :: name
+ character(len=:), allocatable :: greeting
+
+ greeting = "Goodbye, " // name // "!"
+ end function make_farewell
+end module farewell_m