Skip to content

Commit e74ab4a

Browse files
authored
fix: remove continuation lines with comments in monin_obukhov test (#1603)
1 parent 7ad9053 commit e74ab4a

File tree

1 file changed

+4
-11
lines changed

1 file changed

+4
-11
lines changed

test_fms/monin_obukhov/test_monin_obukhov.F90

Lines changed: 4 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -125,17 +125,10 @@ program test_monin_obukhov
125125
integer(ki), dimension(n_1d) :: del_m, del_t, del_q
126126
end type
127127

128-
type(drag_input_t), parameter :: drag_input = drag_input_t() &
129-
& !< Input arguments for mo_drag
130-
131-
type(stable_mix_input_t), parameter :: stable_mix_input = stable_mix_input_t() &
132-
& !< Input arguments for stable_mix
133-
134-
type(diff_input_t), parameter :: diff_input = diff_input_t() &
135-
& !< Input arguments for mo_diff
136-
137-
type(profile_input_t), parameter :: profile_input = profile_input_t() &
138-
& !< Input arguments for mo_profile
128+
type(drag_input_t), parameter :: drag_input = drag_input_t() !< Input arguments for mo_drag
129+
type(stable_mix_input_t), parameter :: stable_mix_input = stable_mix_input_t() !< Input arguments for stable_mix
130+
type(diff_input_t), parameter :: diff_input = diff_input_t() !< Input arguments for mo_diff
131+
type(profile_input_t), parameter :: profile_input = profile_input_t() !< Input arguments for mo_profile
139132

140133
! Entries 1:n of the arrays below contain known answer keys. Entry n+1 contains
141134
! the answers that we calculate. Represent answer data using integral arrays,

0 commit comments

Comments
 (0)