Skip to content

Commit

Permalink
These variables still need to be initialized
Browse files Browse the repository at this point in the history
  • Loading branch information
jaharris87 committed Jan 9, 2024
1 parent 373edb2 commit 7a60ab5
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions source/xnet_evolve.f90
Original file line number Diff line number Diff line change
Expand Up @@ -55,7 +55,7 @@ Subroutine full_net
kstep = 0
Do izb = zb_lo, zb_hi
kmon(:,izb) = 0
! ktot(:,izb) = 0
ktot(:,izb) = 0
EndDo

! Set reaction controls not read in from control
Expand All @@ -65,7 +65,7 @@ Subroutine full_net
Call t9rhofind(0,t,nt,t9,rho)
Do izb = zb_lo, zb_hi
tdel_old(izb) = tdel(izb)
! tdel_next(izb) = tdel(izb)
tdel_next(izb) = tdel(izb)
nto(izb) = nt(izb)
ntt(izb) = nt(izb)
to(izb) = t(izb)
Expand Down

0 comments on commit 7a60ab5

Please sign in to comment.