dummy orientations module
needs to be extendend to include symmetry
This commit is contained in:
parent
40d38ebf55
commit
5cdd603671
|
@ -65,14 +65,18 @@ add_library(ROTATIONS OBJECT "rotations.f90")
|
|||
add_dependencies(ROTATIONS LAMBERT QUATERNIONS)
|
||||
list(APPEND OBJECTFILES $<TARGET_OBJECTS:ROTATIONS>)
|
||||
|
||||
add_library(ORIENTATIONS OBJECT "orientations.f90")
|
||||
add_dependencies(ORIENTATIONS ROTATIONS)
|
||||
list(APPEND OBJECTFILES $<TARGET_OBJECTS:ORIENTATIONS>)
|
||||
|
||||
# SPECTRAL solver and FEM solver use different mesh files
|
||||
if (PROJECT_NAME STREQUAL "DAMASK_spectral")
|
||||
add_library(MESH OBJECT "mesh.f90")
|
||||
add_dependencies(MESH ROTATIONS FEsolving)
|
||||
add_dependencies(MESH ORIENTATIONS FEsolving)
|
||||
list(APPEND OBJECTFILES $<TARGET_OBJECTS:MESH>)
|
||||
elseif (PROJECT_NAME STREQUAL "DAMASK_FEM")
|
||||
add_library(FEZoo OBJECT "FEM_zoo.f90")
|
||||
add_dependencies(FEZoo ROTATIONS FEsolving)
|
||||
add_dependencies(FEZoo ORIENTATIONS FEsolving)
|
||||
list(APPEND OBJECTFILES $<TARGET_OBJECTS:FEZoo>)
|
||||
add_library(MESH OBJECT "meshFEM.f90")
|
||||
add_dependencies(MESH FEZoo)
|
||||
|
|
|
@ -0,0 +1,8 @@
|
|||
module orientations
|
||||
use rotations
|
||||
|
||||
implicit none
|
||||
type, extends(rotation), public :: orientation
|
||||
end type
|
||||
|
||||
end module orientations
|
|
@ -27,10 +27,9 @@
|
|||
! ###################################################################
|
||||
|
||||
module quaternions
|
||||
|
||||
use prec
|
||||
implicit none
|
||||
|
||||
implicit none
|
||||
public
|
||||
type, public :: quaternion
|
||||
real(pReal) :: w = 0.0_pReal
|
||||
|
|
Loading…
Reference in New Issue