Skip to content
Snippets Groups Projects
Commit bed1c2ae authored by Antoine Cyril David Hoffmann's avatar Antoine Cyril David Hoffmann :seedling:
Browse files

cleaning

parent e97bff9b
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
Showing
with 0 additions and 2 deletions
src/nonlinear_mod.F90
+ 0
− 2
View file @ bed1c2ae
......@@ -123,8 +123,6 @@ SUBROUTINE compute_nonlinear
! Apply the ExB shearing rate factor before going back to k-space
IF (ExB_NL_CORRECTION) THEN
CALL apply_inv_ExB_NL_factor(bracket_sum_r,inv_ExB_NL_factor)
! invinvfactor = 1._xp/inv_ExB_NL_factor
! CALL apply_inv_ExB_NL_factor(bracket_sum_r,invinvfactor)
ENDIF
! Put the real nonlinear product back into k-space
#ifdef SINGLE_PRECISION
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment