[Dart-dev] [6985] DART/trunk/location/threed_sphere/location_mod.f90: add parens to force the order of multiply and divide

nancy at ucar.edu nancy at ucar.edu
Tue May 6 11:53:13 MDT 2014


Revision: 6985
Author:   nancy
Date:     2014-05-06 11:53:13 -0600 (Tue, 06 May 2014)
Log Message:
-----------
add parens to force the order of multiply and divide
so that it happens in the required order.

Modified Paths:
--------------
    DART/trunk/location/threed_sphere/location_mod.f90

-------------- next part --------------
Modified: DART/trunk/location/threed_sphere/location_mod.f90
===================================================================
--- DART/trunk/location/threed_sphere/location_mod.f90	2014-05-06 16:31:09 UTC (rev 6984)
+++ DART/trunk/location/threed_sphere/location_mod.f90	2014-05-06 17:53:13 UTC (rev 6985)
@@ -192,7 +192,7 @@
 endif
 
 ! Make sure that the number of longitudes, nlon, for get_close_obs is odd
-if(nlon / 2 * 2 == nlon) then
+if((nlon / 2) * 2 == nlon) then
    call error_handler(E_ERR, 'initialize_module', 'nlon must be odd', &
       source, revision, revdate)
 endif


More information about the Dart-dev mailing list