Commit 7a181029 authored by Daniel Wortmann's avatar Daniel Wortmann

Deleted old output to unit 2 in cdngen

parent 8ef333e1
......@@ -89,8 +89,6 @@
LOGICAL l_enpara
PARAMETER (l_st=.false.)
IF (mpi%irank.EQ.0) WRITE (2,8005)
8005 FORMAT ('CHARGE DENSITY PART (cdngen):')
!
! Read Potential and keep only vr(:,0,:,:) and vz
......
Markdown is supported
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