white space adjustments

This commit is contained in:
Martin Diehl 2019-06-15 15:44:15 +02:00
parent 9f35267470
commit 0c52262e4a
1 changed files with 96 additions and 98 deletions

View File

@ -1050,9 +1050,9 @@ subroutine crystallite_results
contains contains
!-------------------------------------------------------------------------------------------------- !------------------------------------------------------------------------------------------------
!> @brief select tensors for output !> @brief select tensors for output
!-------------------------------------------------------------------------------------------------- !------------------------------------------------------------------------------------------------
function select_tensors(dataset,instance) function select_tensors(dataset,instance)
integer, intent(in) :: instance integer, intent(in) :: instance
@ -1103,8 +1103,6 @@ subroutine crystallite_results
end function select_rotations end function select_rotations
#endif #endif
end subroutine crystallite_results end subroutine crystallite_results