add whitespace back in

R/mortality_processes.R

@@ -116,7 +116,7 @@ reset_target <- function(variables, events, target, state, parameters, timestep)
 
     # onwards infectiousness
     variables$infectivity$queue_update(0, target)
-
+    
     # treated compartment residence time:
     if(!is.null(variables$dt)) {
       variables$dt$queue_update(parameters$dt, target)

R/processes.R

@@ -30,7 +30,7 @@ create_processes <- function(
     correlations,
     lagged_eir,
     lagged_infectivity,
-    timesteps,
+    timesteps, 
     mixing = 1,
     mixing_index = 1
 ) {
@@ -105,22 +105,22 @@ create_processes <- function(
       0
     )
   )
-
+  
   # =======================
   # Antimalarial Resistance
   # =======================
   # Add an a new process which governs the transition from Tr to S when
   # antimalarial resistance is simulated. The rate of transition switches
   # from a parameter to a variable when antimalarial resistance == TRUE.
-
+  
   # Assign the dt input to a separate object with the default single parameter value:
   dt_input <- parameters$dt
-
-  # If antimalarial resistance is switched on, assign dt variable values to the
+  
+  # If antimalarial resistance is switched on, assign dt variable values to the 
   if(parameters$antimalarial_resistance) {
     dt_input <- variables$dt
   }
-
+  
   # Create the progression process for Tr --> S specifying dt_input as the rate:
   processes <- c(
     processes,