Skip to content

Commit

Permalink
Fixed some tab/space issues and added missing library link step. Now …
Browse files Browse the repository at this point in the history
…it compiles and runs
  • Loading branch information
MintoDA1 authored and MintoDA1 committed Sep 10, 2023
1 parent a395db2 commit 4496ed6
Show file tree
Hide file tree
Showing 3 changed files with 5 additions and 6 deletions.
1 change: 0 additions & 1 deletion examples/morphology_test_cases/complex/CTEM

This file was deleted.

2 changes: 1 addition & 1 deletion src/CMakeLists.txt
Original file line number Diff line number Diff line change
Expand Up @@ -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")
Expand Down
8 changes: 4 additions & 4 deletions src/porosity/module_porosity.f90
Original file line number Diff line number Diff line change
Expand Up @@ -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

Expand Down

0 comments on commit 4496ed6

Please sign in to comment.