Skip to content

Commit

Permalink
Merge pull request #93 from gustavo-marques/add_nuopc_cap
Browse files Browse the repository at this point in the history
Adding the NUOPC cap
  • Loading branch information
alperaltuntas authored Apr 17, 2019
2 parents 25ff7c8 + e5238f5 commit 5868144
Show file tree
Hide file tree
Showing 9 changed files with 6,473 additions and 5 deletions.
8 changes: 4 additions & 4 deletions config_src/mct_driver/ocn_cap_methods.F90
Original file line number Diff line number Diff line change
Expand Up @@ -123,10 +123,10 @@ subroutine ocn_import(x2o, ind, grid, ice_ocean_boundary, ocean_public, logunit,
write(logunit,F01)'import: day, secs, j, i, lwrad = ',day,secs,j,i,ice_ocean_boundary%lw_flux(i,j)
write(logunit,F01)'import: day, secs, j, i, q_flux = ',day,secs,j,i,ice_ocean_boundary%q_flux(i,j)
write(logunit,F01)'import: day, secs, j, i, t_flux = ',day,secs,j,i,ice_ocean_boundary%t_flux(i,j)
write(logunit,F01)'import: day, secs, j, i, seaice_melt_heat = ',day,secs,j,i, &
ice_ocean_boundary%seaice_melt_heat(i,j)
write(logunit,F01)'import: day, secs, j, i, seaice_melt = ',day,secs,j,i, &
ice_ocean_boundary%seaice_melt(i,j)
write(logunit,F01)'import: day, secs, j, i, seaice_melt_heat = ',&
day,secs,j,i,ice_ocean_boundary%seaice_melt_heat(i,j)
write(logunit,F01)'import: day, secs, j, i, seaice_melt = ',&
day,secs,j,i,ice_ocean_boundary%seaice_melt(i,j)
write(logunit,F01)'import: day, secs, j, i, latent_flux = ',&
day,secs,j,i,ice_ocean_boundary%latent_flux(i,j)
write(logunit,F01)'import: day, secs, j, i, runoff = ',&
Expand Down
1,175 changes: 1,175 additions & 0 deletions config_src/nuopc_driver/MOM_ocean_model.F90

Large diffs are not rendered by default.

1,391 changes: 1,391 additions & 0 deletions config_src/nuopc_driver/MOM_surface_forcing.F90

Large diffs are not rendered by default.

2,455 changes: 2,455 additions & 0 deletions config_src/nuopc_driver/mom_cap.F90

Large diffs are not rendered by default.

Loading

0 comments on commit 5868144

Please sign in to comment.