Hi~,
I got the following error message when closing a netCDF file that I create:
PGF90-S-0188-Argument number 1 to nf90_close: type mismatch
(nc_close_chk.f90: 8)
0 inform, 0 warnings, 1 severes, 0 fatal for nc_close_chk
make: *** [nc_close_chk.o] Error 2
Following is the code with line number:
1 subroutine nc_close_chk(chk_ncid)
2 use netcdf
3 use nc_adj_module
4
5 integer chk_cls_sts
6
7 ! call nc_check( nf90_close(chk_ncid) )
8 chk_cls_sts = nf90_close(chk_ncid)
9
10 end subroutine nc_close_chk
Could you please show me the cause of the mistake? Thank you!
--
Cordially,
Hongyan
鸿雁