WRF-Hydro编译错误

forasking

出现如下错误，可能是什么原因呢？

ar -r ../lib/libHYDRO.a module_NWM_io_dict.o

cp *.mod ../mod

Routing Makefile:

cpp -P -traditional -nostdinc -DMPP_LAND -I ../Data_Rec -DHYDRO_D -DWRF_HYDRO  -DSPATIAL_SOIL -DWRFIO_NCD_LARGE_FILE_SUPPORT -DWRF_HYDRO_NUDGING   -I/home/chengwenchen/junyi/tool/netcdf4env/include module_NWM_io.F > module_NWM_io.f

mpif90 -o module_NWM_io.o -w -c -ftz -align all -fno-alias -fp-model precise -FR -convert big_endian  -I./ -I ../../MPP -I ../MPP -I ../mod -I/home/chengwenchen/junyi/tool/netcdf4env/include module_NWM_io.f

module_NWM_io.f(62): error #6377: FUNCTION must be present on the end-function-stmt of an internal or module function

END

andrewsoong

5.0有个bug，你修改一下这个程序，把end改成end function就好了。或者你换intel 2018编译器

forasking

andrewsoong 发表于 2018-7-18 18:12
5.0有个bug，你修改一下这个程序，把end改成end function就好了。或者你换intel 2018编译器

哇，谢谢！但是检查了module_NWM_io.f，发现使用的都是subroutine而非function，也都以end subroutine结尾了。是因为编译器对subroutine的支持有问题吗？报错信息里的文件名后的62是指错误行号吗？

andrewsoong

forasking 发表于 2018-7-18 19:33
哇，谢谢！但是检查了module_NWM_io.f，发现使用的都是subroutine而非function，也都以end subroutine结 ...

你要是不会改，那就换编译器吧