Removed debugging output

piclas-framework · Oct 31, 2022 · dc8d374 · dc8d374
1 parent cdac034
commit dc8d374
Showing 1 changed file with 0 additions and 22 deletions.
diff --git a/src/particles/dsmc/dsmc_chemical_reactions.f90 b/src/particles/dsmc/dsmc_chemical_reactions.f90
@@ -1147,28 +1147,6 @@ SUBROUTINE DSMC_Chemistry(iPair, iReac)
 END DO
 #endif /* CODE_ANALYZE */
 
-associate( iPart1 => ReactInx(1), iPart2 => ReactInx(2))
-  IF(ANY(ISNAN(PartState(:,iPart1))))THEN
-    IPWRITE(UNIT_StdOut,*) "after eight "
-    IPWRITE(UNIT_StdOut,*) "iPart1,PartState(:,iPart1) =", iPart1,PartState(:,iPart1)
-    CALL abort(__STAMP__,'after 8')
-  END IF ! ANY(ISNAN(PartState(:,iPart1)))
-  IF(ANY(ISNAN(PartState(:,iPart2))))THEN
-    IPWRITE(UNIT_StdOut,*) "after eight "
-    IPWRITE(UNIT_StdOut,*) "iPart2,PartState(:,iPart2) =", iPart2,PartState(:,iPart2)
-    CALL abort(__STAMP__,'after 8')
-  END IF ! ANY(ISNAN(PartState(:,iPart2)))
-END ASSOCIATE
-
-IF(ProductReac(3).NE.0)THEN
-IF(ANY(ISNAN(PartState(:,ReactInx(3)))))THEN
-  IPWRITE(UNIT_StdOut,*) "AFTER "
-  IPWRITE(UNIT_StdOut,*) "ReactInx(3),PartState(:,ReactInx(3)) =", ReactInx(3),PartState(:,ReactInx(3))
-    CALL abort(__STAMP__,'after 3')
-END IF ! ANY(ISNAN(PartState(:,ReactInx(3))))
-
-END IF ! ProductReac(3).EQ.0
-
 END SUBROUTINE DSMC_Chemistry