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

remove a test...

parent 5264460b
No related branches found
No related tags found
No related merge requests found
......@@ -280,12 +280,5 @@ CONTAINS
! inv_ExB_NL_factor(iky,ix) = 1._xp + (imagu*kxExB*xval)
ENDDO
ENDDO
! test
DO iky = 1,Ny/2+1
DO ix = 1,Nx
write(42,*) REAL(inv_ExB_NL_factor(iky,ix) * ExB_NL_factor(ix,iky))
ENDDO
ENDDO
stop
END SUBROUTINE Update_nonlinear_ExB_factors
END MODULE ExB_shear_flow
\ No newline at end of file
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment