Fix conditional typo

holm10 · Nov 11, 2024 · f4931dc · f4931dc
1 parent 622864d
commit f4931dc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/bbb/oderhs.m b/bbb/oderhs.m
@@ -7853,7 +7853,7 @@ call fd2tra (nx,ny,floxge(0:nx+1,0:ny+1,igsp),
 *        ----------------------------------------------------
 *               COUPLE MOLECULES TO ATOMS AND IONS
 *        ----------------------------------------------------
-         if (ishymol .neq. 0) then  #..D2 included
+         if (ishymol .ne. 0) then  #..D2 included
 *           Thermal energy source of molecules
 *           ----------------------------------------------------
             reseg(ix,iy,2) = reseg(ix,iy,2)