iow_esm
/
components.mom5
4
0
Fork 0
Code Issues Pull Requests Projects Releases 1 Wiki Activity
Browse Source

Undone unnecessary changes

issues/1-unify-defines
Sven Karsten 2 years ago
parent
dd01471ddb
commit
7c88c86524
2 changed files with 1 additions and 8 deletions
Whitespace
Show all changes Ignore whitespace when comparing lines Ignore changes in amount of whitespace Ignore changes in whitespace at EOL
Split View
Diff Options
Show Stats Download Patch File Download Diff File
  1. 5
      src/mom5/drivers/ocean_solo.F90
  2. 4
      src/mom5/drivers/ocean_solo_nuopc.inc

5
src/mom5/drivers/ocean_solo.F90
Unescape View File

@ -390,11 +390,8 @@ ierr = check_nml_error(io_status,'ocean_solo_nml')
call external_coupler_sbc_before(Ice_ocean_boundary, Ocean_sfc, nc, dt_cpld )
#IFDEF OASIS_IOW_ESM
call update_ocean_model(Ice_ocean_boundary, Ocean_state, Ocean_sfc, Time, Time_step_coupled, 'none')
#ELSE
call update_ocean_model(Ice_ocean_boundary, Ocean_state, Ocean_sfc, Time, Time_step_coupled)
#ENDIF
Time = Time + Time_step_coupled

4
src/mom5/drivers/ocean_solo_nuopc.inc
Unescape View File

@ -868,11 +868,7 @@ module ocean_solo_mod
call external_coupler_sbc_before(Ice_ocean_boundary, Ocean_sfc, nc, dt_cpld )
#IFDEF OASIS_IOW_ESM
call update_ocean_model(Ice_ocean_boundary, Ocean_state, Ocean_sfc, Time, Time_step_coupled, 'none')
#ELSE
call update_ocean_model(Ice_ocean_boundary, Ocean_state, Ocean_sfc, Time, Time_step_coupled)
#ENDIF
Time = Time + Time_step_coupled

Write Preview
Loading…
Cancel
Save