From 23aa5dd8065287374eab5a41e0ce3e8731031cd5 Mon Sep 17 00:00:00 2001 From: kudav Date: Thu, 7 Sep 2023 10:09:13 +0200 Subject: [PATCH] BEAMS3D: removed second spline message --- BEAMS3D/Sources/beams3d_init.f90 | 1 - 1 file changed, 1 deletion(-) diff --git a/BEAMS3D/Sources/beams3d_init.f90 b/BEAMS3D/Sources/beams3d_init.f90 index 6e6bea9f3..3413b79c6 100644 --- a/BEAMS3D/Sources/beams3d_init.f90 +++ b/BEAMS3D/Sources/beams3d_init.f90 @@ -615,7 +615,6 @@ SUBROUTINE beams3d_init ! Print Grid info to screen IF (lverb) THEN - ! WRITE(6,'(A)')'----- Constructing Splines -----' WRITE(6,'(A,F9.5,A,F9.5,A,I4)') ' R = [',MINVAL(raxis),',',MAXVAL(raxis),']; NR: ',nr WRITE(6,'(A,F8.5,A,F8.5,A,I4)') ' PHI = [',MINVAL(phiaxis),',',MAXVAL(phiaxis),']; NPHI: ',nphi WRITE(6,'(A,F8.5,A,F8.5,A,I4)') ' Z = [',MINVAL(zaxis),',',MAXVAL(zaxis),']; NZ: ',nz