Remove debug output. COSIMA/access-om2#242

Author: nichannah

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(), &

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

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