223031012
/
DAMASK_EICMD
mirror of https://github.com/achalhp/DAMASK_EICMD.git
1
0
Fork 0
Code Issues Projects Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/Lambert.f90
View File

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