Remove debug output. COSIMA/access-om2#242

COSIMA · Aug 3, 2021 · c5a82a1 · c5a82a1
1 parent a451a7f
commit c5a82a1
Show file tree

Hide file tree

Showing 3 changed files with 0 additions and 8 deletions.
diff --git a/atm/src/atm.F90 b/atm/src/atm.F90
@@ -164,7 +164,6 @@ program atm
         do i=1, num_atm_to_ice_fields
             ri = to_runoff_map(i)
 
-            print*, 'forcing_fields(i)%dt: ', forcing_fields(i)%dt
             if (mod(cur_runtime_in_seconds, forcing_fields(i)%dt) == 0) then
                 call field_read_timer%start()
                 call forcing_fields(i)%update(accessom2%get_cur_forcing_date(), &

diff --git a/libforcing/src/forcing_config.F90 b/libforcing/src/forcing_config.F90
@@ -66,7 +66,6 @@ subroutine forcing_config_init(self, config, loggerin, num_fields)
 
     self%num_inputs = self%core%count(inputs)
     num_fields = self%num_inputs
-    print*, 'forcing_config_init num_fields: ', num_fields
     self%logger => loggerin
 
 endsubroutine forcing_config_init

diff --git a/libforcing/src/forcing_field.F90 b/libforcing/src/forcing_field.F90
@@ -63,7 +63,6 @@ subroutine forcing_field_init(self, name_list, filename_template_list, cname, do
     integer :: num_file_inputs, i
 
     num_file_inputs = size(name_list)
-    print*, 'num_file_inputs: ', num_file_inputs
 
     allocate(self%names(num_file_inputs))
     allocate(self%filename_templates(num_file_inputs))
@@ -110,8 +109,6 @@ subroutine forcing_field_init(self, name_list, filename_template_list, cname, do
     dt = self%dt
     calendar = self%calendar
 
-    print*, 'dt, calendar, nx, ny:', dt, calendar, self%ncvars(1)%nx, self%ncvars(1)%ny
-
 endsubroutine forcing_field_init
 
 
@@ -316,9 +313,6 @@ function get_shape(self)
     class(forcing_field), intent(in) :: self
     integer, dimension(2) :: get_shape
 
-    print*, 'cname: ', self%coupling_name
-    print*, 'shape: ', shape(self%data_array)
-
     get_shape = shape(self%data_array)
 endfunction