From bee9d63e9c026db674ed471d27e96e4dd54ed6a5 Mon Sep 17 00:00:00 2001 From: sfilippone Date: Fri, 17 Nov 2023 14:46:22 +0100 Subject: [PATCH] Take out debug statement --- samples/advanced/pdegen/amg_d_pde3d.F90 | 1 - 1 file changed, 1 deletion(-) diff --git a/samples/advanced/pdegen/amg_d_pde3d.F90 b/samples/advanced/pdegen/amg_d_pde3d.F90 index 11494e64..24631320 100644 --- a/samples/advanced/pdegen/amg_d_pde3d.F90 +++ b/samples/advanced/pdegen/amg_d_pde3d.F90 @@ -343,7 +343,6 @@ program amg_d_pde3d call prec%set('smoother_type', p_choice%smther, info) call prec%set('smoother_sweeps', p_choice%jsweeps, info) call prec%set('poly_degree', p_choice%degree, info) - write(0,*) 'pvariant :',p_choice%pvariant call prec%set('poly_variant', p_choice%pvariant, info) select case (psb_toupper(p_choice%smther))