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

CRITICAL DEBUG KINETIC ELECTRONS (appeared when kxky plane rotated)

parent fa51343e
No related branches found
No related tags found
No related merge requests found
...@@ -139,7 +139,7 @@ SUBROUTINE stepon ...@@ -139,7 +139,7 @@ SUBROUTINE stepon
DO ij=ijgs_e,ijge_e DO ij=ijgs_e,ijge_e
DO ip=ipgs_e,ipge_e DO ip=ipgs_e,ipge_e
DO ikx=2,Nkx/2 !symmetry at ky = 0 DO ikx=2,Nkx/2 !symmetry at ky = 0
moments_e( ip,ij,iky_0,ikx,iz, :) = CONJG(moments_e( ip,ij,iky_0,Nkx+2-iky,iz, :)) moments_e( ip,ij,iky_0,ikx,iz, :) = CONJG(moments_e( ip,ij,iky_0,Nkx+2-ikx,iz, :))
END DO END DO
! must be real at origin ! must be real at origin
moments_e(ip,ij, iky_0,ikx_0,iz, :) = REAL(moments_e(ip,ij, iky_0,ikx_0,iz, :)) moments_e(ip,ij, iky_0,ikx_0,iz, :) = REAL(moments_e(ip,ij, iky_0,ikx_0,iz, :))
......
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