@@ -131,8 +131,11 @@ end
if $ARGS[0] = 'doy':
doy_N1 = 275 * ARGS[2] / 9
doy_N2 = (ARGS[2] + 9) / 12
- doy_N3 = 1 + (ARGS[1] - 4 * (ARGS[1] / 4) + 2) / 3
+ doy_N3 = 1 + (ARGS[1] - (4 * (ARGS[1] / 4)) + 2) / 3
result = doy_N1 - (doy_N2 * doy_N3) + ARGS[3] - 30
+ killvar 'doy_N1'
+ killvar 'doy_N2'
+ killvar 'doy_N3'
end
if $ARGS[0] = 'mk1':
