proper indentation

This commit is contained in:
Martin Diehl 2019-03-11 23:00:04 +01:00
parent 1fb1032127
commit 6a82a0a33e
1 changed files with 137 additions and 134 deletions

View File

@ -38,9 +38,10 @@
!> Modeling and Simulations in Materials Science and Engineering 22, 075013 (2014).
!--------------------------------------------------------------------------
module Lambert
use math
use prec, only: &
pReal
use math, only: &
PI
implicit none
private
@ -136,6 +137,8 @@ pure function LambertBallToCube(xyz) result(cube)
IEEE_value
use prec, only: &
dEq0
use math, only: &
math_clip
implicit none
real(pReal), intent(in), dimension(3) :: xyz