small fix to m_mpi_proxy.fpp (#335)

MFlowCode · Feb 13, 2024 · 43f1865 · 43f1865
1 parent bddab4d
commit 43f1865
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/pre_process/m_mpi_proxy.fpp b/src/pre_process/m_mpi_proxy.fpp
@@ -105,7 +105,7 @@ contains
         ! Fluids physical parameters
         do i = 1, num_fluids_max
             #:for VAR in [ 'gamma','pi_inf','mul0','ss','pv','gamma_v','M_v',  &
-                & 'mu_v','k_v', 'G', 'qv' ]
+                & 'mu_v','k_v', 'G', 'cv', 'qv', 'qvp' ]
                 call MPI_BCAST(fluid_pp(i)%${VAR}$, 1, MPI_DOUBLE_PRECISION, 0, MPI_COMM_WORLD, ierr)
             #:endfor
         end do