Skip to content

Commit

Permalink
Fix formatting in physics/GFS_surface_generic.F90
Browse files Browse the repository at this point in the history
  • Loading branch information
climbfuji committed Oct 1, 2021
1 parent 9438220 commit 71832db
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions physics/GFS_surface_generic.F90
Original file line number Diff line number Diff line change
Expand Up @@ -65,8 +65,7 @@ subroutine GFS_surface_generic_pre_run (nthreads, im, levs, vfrac, islmsk, isot,
lndp_var_list, lndp_prt_list, &
z01d, zt1d, bexp1d, xlai1d, vegf1d, lndp_vgf, &
cplflx, flag_cice, islmsk_cice, slimskin_cpl, &
wind, u1, v1, cnvwind, smcwlt2, smcref2, &
vtype_save, stype_save, slope_save, &
wind, u1, v1, cnvwind, smcwlt2, smcref2, vtype_save, stype_save, slope_save, &
errmsg, errflg)

use surface_perturbation, only: cdfnor
Expand Down

0 comments on commit 71832db

Please sign in to comment.