Skip to content

Commit

Permalink
removed more trailing white space
Browse files Browse the repository at this point in the history
  • Loading branch information
mvertens committed Jul 13, 2018
1 parent d32333e commit 8606be9
Show file tree
Hide file tree
Showing 2 changed files with 6 additions and 6 deletions.
8 changes: 4 additions & 4 deletions config_src/mct_driver/ocn_comp_mct.F90
Original file line number Diff line number Diff line change
Expand Up @@ -7,7 +7,7 @@ module ocn_comp_mct
use ESMF, only: ESMF_clock, ESMF_time, ESMF_timeInterval
use ESMF, only: ESMF_ClockGet, ESMF_TimeGet, ESMF_TimeIntervalGet
use seq_cdata_mod, only: seq_cdata, seq_cdata_setptrs
use seq_flds_mod, only: seq_flds_x2o_fields, seq_flds_o2x_fields
use seq_flds_mod, only: seq_flds_x2o_fields, seq_flds_o2x_fields
use mct_mod, only: mct_gsMap, mct_gsmap_init, mct_gsMap_lsize, &
mct_gsmap_orderedpoints
use mct_mod, only: mct_aVect, mct_aVect_init, mct_aVect_zero, &
Expand Down Expand Up @@ -38,11 +38,11 @@ module ocn_comp_mct
use MOM_time_manager, only: time_type, set_date, set_time, set_calendar_type, NOLEAP
use MOM_time_manager, only: operator(+), operator(-), operator(*), operator(/)
use MOM_time_manager, only: operator(==), operator(/=), operator(>), get_time
use MOM_file_parser, only: get_param, log_version, param_file_type
use MOM_file_parser, only: get_param, log_version, param_file_type
use MOM_get_input, only: Get_MOM_Input, directories
use MOM_EOS, only: gsw_sp_from_sr, gsw_pt_from_ct
use MOM_constants, only: CELSIUS_KELVIN_OFFSET
use MOM_domains, only: AGRID, BGRID_NE, CGRID_NE, pass_vector
use MOM_domains, only: AGRID, BGRID_NE, CGRID_NE, pass_vector
use mpp_domains_mod, only: mpp_get_compute_domain

! Previously inlined - now in separate modules
Expand Down Expand Up @@ -279,7 +279,7 @@ subroutine ocn_init_mct( EClock, cdata_o, x2o_o, o2x_o, NLFilename )

! Initialize the MOM6 model
runtype = get_runtype()
if (runtype == "initial") then
if (runtype == "initial") then
! startup (new run) - 'n' is needed below since we don't specify input_filename in input.nml
call ocean_model_init(glb%ocn_public, glb%ocn_state, time0, time0, input_restart_file = 'n')
else ! hybrid or branch or continuos runs
Expand Down
4 changes: 2 additions & 2 deletions config_src/mct_driver/ocn_cpl_indices.F90
Original file line number Diff line number Diff line change
Expand Up @@ -2,8 +2,8 @@ module ocn_cpl_indices

use mct_mod, only: mct_avect_init, mct_avect_indexra, mct_aVect_clean, mct_aVect
use seq_flds_mod, only: ice_ncat, seq_flds_i2o_per_cat
use seq_flds_mod, only: seq_flds_x2o_fields, seq_flds_o2x_fields
use seq_flds_mod, only: seq_flds_x2o_fields, seq_flds_o2x_fields

implicit none ; public

!> Structure with indices needed for MCT attribute vectors
Expand Down

0 comments on commit 8606be9

Please sign in to comment.