mute a debug message

2026-05-22 04:30:46 +02:00
parent 0bc55225fc
commit fa334cd7de
1 changed files with 1 additions and 1 deletions
--- a/starfield.f90
+++ b/starfield.f90
@@ -25,7 +25,7 @@ subroutine plot_a_star(at_x, at_y, sz, color)
  integer                 :: idx
  real                    :: rad, xv, yv

-  write(0, '("plot a star at ", 2F8.3)') at_x, at_y
+  ! write(0, '("plot a star at ", 2F8.3)') at_x, at_y
  call genp_set_offset(at_x, at_y)
  do idx=0, 360, 36
    !   convert index to radians