From 4496ed63edfe8a0e85f8de018f37e946868f0904 Mon Sep 17 00:00:00 2001
From: MintoDA1 <51412913+MintoDA1@users.noreply.github.com>
Date: Sun, 10 Sep 2023 14:59:15 -0400
Subject: [PATCH] Fixed some tab/space issues and added missing library link
 step. Now it compiles and runs

---
 examples/morphology_test_cases/complex/CTEM | 1 -
 src/CMakeLists.txt                          | 2 +-
 src/porosity/module_porosity.f90            | 8 ++++----
 3 files changed, 5 insertions(+), 6 deletions(-)
 delete mode 120000 examples/morphology_test_cases/complex/CTEM

diff --git a/examples/morphology_test_cases/complex/CTEM b/examples/morphology_test_cases/complex/CTEM
deleted file mode 120000
index 9173fccf..00000000
--- a/examples/morphology_test_cases/complex/CTEM
+++ /dev/null
@@ -1 +0,0 @@
-../../../build/src/CTEM
\ No newline at end of file
diff --git a/src/CMakeLists.txt b/src/CMakeLists.txt
index 0a698297..1d4339d2 100644
--- a/src/CMakeLists.txt
+++ b/src/CMakeLists.txt
@@ -187,7 +187,7 @@ IF (CMAKE_SYSTEM_NAME STREQUAL "Windows")
    SET_PROPERTY(TARGET ${CTEM_LIBRARY} ${CTEM_DRIVER} APPEND_STRING PROPERTY LINK_FLAGS  "/NODEFAULTLIB")
 ENDIF()
 
-
+TARGET_LINK_LIBRARIES(${CTEM_DRIVER} PUBLIC ${CTEM_LIBRARY})
 # Check to see if the compiler allows for local-spec in do concurrent statements. Set a preprocessor variable if it does
 SET(TESTFILE "${CMAKE_BINARY_DIR}/${CMAKE_FILES_DIRECTORY}")
 SET(TESTFILE "${TESTFILE}/CMakeTmp/testFortranDoConcurrentLoc.f90")
diff --git a/src/porosity/module_porosity.f90 b/src/porosity/module_porosity.f90
index 9f4b3013..a45fd7f2 100644
--- a/src/porosity/module_porosity.f90
+++ b/src/porosity/module_porosity.f90
@@ -21,10 +21,10 @@ module module_porosity
       subroutine porosity_form_interior(user, surfi, crater, lradsq)
       use module_globals
       implicit none
-		type(usertype),intent(in)    :: user
-		type(surftype),intent(inout) :: surfi
-		type(cratertype),intent(in)  :: crater
-		real(DP),intent(in)          :: lradsq
+      type(usertype),intent(in)    :: user
+      type(surftype),intent(inout) :: surfi
+      type(cratertype),intent(in)  :: crater
+      real(DP),intent(in)          :: lradsq
       end subroutine porosity_form_interior
    end interface