Skip to content

Commit

Permalink
Swapped argument attribute order
Browse files Browse the repository at this point in the history
Altered the order of the attributes of the new argument to match the other arguments.  The code is syntactically equivalent.
  • Loading branch information
Hallberg-NOAA authored Oct 5, 2018
1 parent ecefa4c commit 7575e39
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion config_src/solo_driver/atmos_ocean_fluxes.F90
Original file line number Diff line number Diff line change
Expand Up @@ -22,7 +22,7 @@ function aof_set_coupler_flux(name, flux_type, implementation, atm_tr_index,
integer, optional, intent(in) :: atm_tr_index !< An unused argument
real, dimension(:), optional, intent(in) :: param !< An unused argument
logical, dimension(:), optional, intent(in) :: flag !< An unused argument
real, intent(in), optional :: mol_wt !< An unused argument
real, optional, intent(in) :: mol_wt !< An unused argument
character(len=*), optional, intent(in) :: ice_restart_file !< An unused argument
character(len=*), optional, intent(in) :: ocean_restart_file !< An unused argument
character(len=*), optional, intent(in) :: units !< An unused argument
Expand Down

0 comments on commit 7575e39

Please sign in to comment.