Opened 6 years ago
Last modified 6 years ago
#206 new Defect
header binary file is not created when the flexpart is compiled without the netcdf module — at Initial Version
| Reported by: | camelia | Owned by: | |
|---|---|---|---|
| Priority: | major | Milestone: | FLEXPART 10 |
| Component: | FP coding/compilation | Version: | FLEXPART 9.0.2 |
| Keywords: | Cc: |
Description
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
