Opened 3 months ago

Last modified 3 months ago

#206 new Defect

header binary file not created when compiled without netcdf support

Reported by: camelia Owned by:
Priority: major Milestone: FLEXPART 10
Component: FP coding/compilation Version: FLEXPART 9.0.2
Keywords: Cc:

Description (last modified by pesei)

Missing in the FLEXPART.f90 the option in which flexpart is compiled without the netcdf module.

I fixed this problem by changed the lines 358 - 376 with:

#ifdef USE_NCF
  if (lnetcdfout.eq.1) then 
    call writeheader_netcdf(lnest=.false.)
  else 
!    call writeheader
    goto 10
  end if

  if (nested_output.eq.1) then
    if (lnetcdfout.eq.1) then
      call writeheader_netcdf(lnest=.true.)
    else
!      call writeheader_nest
      goto 11
    endif
  endif
#endif

  if (verbosity.gt.0) then
    print*,'call writeheader'
  endif

10  call writeheader

11  if (nested_output.eq.1) then
     call writeheader_nest
  endif

Another option could be to declare the variable lnetcdfout outside of netcdf module in FLEXPART.f90 and it to be included as parameter in the command file

Change History (4)

comment:1 Changed 3 months ago by pesei

  • Description modified (diff)

comment:2 Changed 3 months ago by pesei

  • Component changed from FP other to FP coding/compilation
  • Description modified (diff)

comment:3 Changed 3 months ago by pesei

  • Milestone set to FLEXPART 10

comment:4 Changed 3 months ago by pesei

  • Summary changed from header binary file is not created when the flexpart is compiled without the netcdf module to header binary file not created when compiled without netcdf support
Note: See TracTickets for help on using tickets.
hosted by ZAMG