Skip to content

Commit

Permalink
[format-bot] end if -> endif; end do -> enddo; if( -> if (
Browse files Browse the repository at this point in the history
  • Loading branch information
danieljprice committed Dec 10, 2019
1 parent fc9787f commit b1facd1
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/utils/analysis_disc_planet.f90
Original file line number Diff line number Diff line change
Expand Up @@ -300,7 +300,7 @@ subroutine do_analysis(dumpfile,numfile,xyzh,vxyz,pmass,npart,time,iunit)
L_p = L_p*sinks_mass
L_p_mag = sqrt(dot_product(L_p,L_p))

if(.not.assume_Ltot_is_same_as_zaxis) then
if (.not.assume_Ltot_is_same_as_zaxis) then
! Rotate sinks vector such that Ltot is parallel to z-axis
call rotatevec(L_p,(/0.,0.,1.0/),-rotate_about_z)
call rotatevec(L_p,(/0.,1.0,0./),rotate_about_y)
Expand Down

0 comments on commit b1facd1

Please sign in to comment.