Skip to content

Commit 5f73950

Browse files
author
Tanush Prathi
committed
Ran formatter
1 parent f5b64a0 commit 5f73950

File tree

1 file changed

+6
-6
lines changed

1 file changed

+6
-6
lines changed

src/simulation/m_time_steppers.fpp

Lines changed: 6 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -113,9 +113,9 @@ contains
113113
num_ts = 2
114114
end if
115115

116-
if(probe_wrt) then
117-
num_probe_ts = 2
118-
end if
116+
if (probe_wrt) then
117+
num_probe_ts = 2
118+
end if
119119

120120
! Allocating the cell-average conservative variables
121121
@:ALLOCATE(q_cons_ts(1:num_ts))
@@ -239,7 +239,7 @@ contains
239239
idwbuff(2)%beg:idwbuff(2)%end, &
240240
idwbuff(3)%beg:idwbuff(3)%end))
241241
end do
242-
@:ACC_SETUP_VFs(q_prim_ts1(i))
242+
@:ACC_SETUP_VFs(q_prim_ts1(i))
243243
end do
244244

245245
@:ALLOCATE(q_prim_ts2(1:num_probe_ts))
@@ -254,7 +254,7 @@ contains
254254
idwbuff(2)%beg:idwbuff(2)%end, &
255255
idwbuff(3)%beg:idwbuff(3)%end))
256256
end do
257-
@:ACC_SETUP_VFs(q_prim_ts2(i))
257+
@:ACC_SETUP_VFs(q_prim_ts2(i))
258258
end do
259259
end if
260260

@@ -552,7 +552,7 @@ contains
552552
q_cons_ts(stor)%vf(i)%sf(j, k, l) = &
553553
q_cons_ts(1)%vf(i)%sf(j, k, l)
554554
end if
555-
if(igr) then
555+
if (igr) then
556556
q_cons_ts(1)%vf(i)%sf(j, k, l) = &
557557
(rk_coef(s, 1)*q_cons_ts(1)%vf(i)%sf(j, k, l) &
558558
+ rk_coef(s, 2)*q_cons_ts(stor)%vf(i)%sf(j, k, l) &

0 commit comments

Comments
 (0)