diff --git a/src/inital.F90 b/src/inital.F90 index 91f05c860ed68319fbfc79fac939a9a714ad6dfd..e78dd6ef6cfc2532e861d9faec99c48057e955af 100644 --- a/src/inital.F90 +++ b/src/inital.F90 @@ -64,10 +64,9 @@ SUBROUTINE inital !!!!!! Load the COSOlver collision operator coefficients !!!!!! IF (ABS(CO) .GT. 1) THEN CALL load_COSOlver_mat - ! Compute collision - CALL compute_TColl ! compute C_0 = C(N_0) ENDIF - + ! Compute collision + CALL compute_TColl ! compute C_0 = C(N_0) END SUBROUTINE inital !******************************************************************************!