Changeset 11d86e7 in flexpart.git for src/timemanager.f90

Timestamp:

May 28, 2020, 7:16:49 AM (4 years ago)

Author:

Sabine <sabine.eckhardt@…>

Branches:

dev

Children:

969c1fe

Parents:

ffbe224

Message:

bugfix in the fluxoutput

File:

• src/timemanager.f90 (modified) (1 diff)

src/timemanager.f90

@@ -430 +430 @@
         if ((iout.eq.4).or.(iout.eq.5)) call plumetraj(itime)
         if ((iflux.eq.1).and.(lnetcdfout.eq.0)) call fluxoutput(itime)
+#ifdef USE_NCF
         if ((iflux.eq.1).and.(lnetcdfout.eq.1)) call fluxoutput_netcdf(itime)
+#endif
         write(*,45) itime,numpart,gridtotalunc,wetgridtotalunc,drygridtotalunc