- 积分
- 41
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2024-8-1
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
编译wrf用的15,WPS用的23
附上log文件:
scan_input.f90(14): error #7013: This module file was not generated by any release of this compiler. [NETCDF]
504 use netcdf
505 --------^
506 scan_input.f90(74): error #6404: This name does not have a type, and must have an explicit type. [NF90_NOWRITE]
507 stat = nf90_open(trim(filename), NF90_NOWRITE, handle % ncid)
508 -----------------------------------------^
509 scan_input.f90(74): error #6404: This name does not have a type, and must have an explicit type. [NF90_OPEN]
510 stat = nf90_open(trim(filename), NF90_NOWRITE, handle % ncid)
511 ---------------^
512 scan_input.f90(75): error #6404: This name does not have a type, and must have an explicit type. [NF90_NOERR]
513 if (stat /= NF90_NOERR) then
514 --------------------^
515 scan_input.f90(80): error #6632: Keyword arguments are invalid without an explicit interface. [NVARIABLES]
516 stat = nf90_inquire(handle % ncid, nVariables=handle % num_vars)
517 -------------------------------------------^
518 scan_input.f90(80): error #6404: This name does not have a type, and must have an explicit type. [NF90_INQUIRE]
519 stat = nf90_inquire(handle % ncid, nVariables=handle % num_vars)
520 ---------------^
521 scan_input.f90(97): error #6632: Keyword arguments are invalid without an explicit interface. [UNLIMITEDDIMID]
522 stat = nf90_inquire(handle % ncid, unlimitedDimId=handle % unlimited_dimid)
523 -------------------------------------------^
524 scan_input.f90(104): error #6632: Keyword arguments are invalid without an explicit interface. [LEN]
525 stat = nf90_inquire_dimension(handle % ncid, handle % unlimited_dimid, len=nRecords)
526 -----------------------------------------------------------------------------------^
527 scan_input.f90(104): error #6404: This name does not have a type, and must have an explicit type. [NF90_INQUIRE_DIMENSION]
528 stat = nf90_inquire_dimension(handle % ncid, handle % unlimited_dimid, len=nRecords)
529 -------------------^
530 scan_input.f90(132): error #6404: This name does not have a type, and must have an explicit type. [NF90_CLOSE]
531 stat = nf90_close(handle % ncid)
532 ---------------^
533 scan_input.f90(178): error #6632: Keyword arguments are invalid without an explicit interface. [NAME]
534 name=field % name, &
-------------------------------------^
536 scan_input.f90(179): error #6632: Keyword arguments are invalid without an explicit interface. [XTYPE]
537 xtype=field % xtype, &
538 -------------------------------------^
539 scan_input.f90(180): error #6632: Keyword arguments are invalid without an explicit interface. [NDIMS]
540 ndims=field % ndims)
541 -------------------------------------^
542 scan_input.f90(177): error #6404: This name does not have a type, and must have an explicit type. [NF90_INQUIRE_VARIABLE]
543 stat = nf90_inquire_variable(handle % ncid, field % varid, &
544 ---------------^
545 scan_input.f90(186): error #6404: This name does not have a type, and must have an explicit type. [NF90_FLOAT]
546 if (field % xtype == NF90_FLOAT) then
547 -----------------------------^
548 scan_input.f90(188): error #6404: This name does not have a type, and must have an explicit type. [NF90_DOUBLE]
549 else if (field % xtype == NF90_DOUBLE) then
550 ----------------------------------^
551 scan_input.f90(190): error #6404: This name does not have a type, and must have an explicit type. [NF90_INT]
552 else if (field % xtype == NF90_INT) then
553 ----------------------------------^
554 scan_input.f90(192): error #6404: This name does not have a type, and must have an explicit type. [NF90_CHAR]
555 else if (field % xtype == NF90_CHAR) then
556 ----------------------------------^
557 scan_input.f90(201): error #6632: Keyword arguments are invalid without an explicit interface. [DIMIDS]
558 dimids=field % dimids)
559 -------------------------------------^
560 scan_input.f90(213): error #6632: Keyword arguments are invalid without an explicit interface. [NAME]
561 name=field % dimnames(idim), &
562 ------------------------------------------^
563 scan_input.f90(214): error #6632: Keyword arguments are invalid without an explicit interface. [LEN]
564 len=field % dimlens(idim))
565 ------------------------------------------^
566 scan_input.f90(212): error #6404: This name does not have a type, and must have an explicit type. [NF90_INQUIRE_DIMENSION]
567 stat = nf90_inquire_dimension(handle % ncid, field % dimids(idim), &
568 -------------------^
569 scan_input.f90(239): error #6404: This name does not have a type, and must have an explicit type. [NF90_INQ_VARID]
570 stat = nf90_inq_varid(handle % ncid, trim(fieldname), field % varid)
571 ---------------^
572 scan_input.f90(246): error #6632: Keyword arguments are invalid without an explicit interface. [NAME]
573 name=field % name, &
-------------------------------------^
575 scan_input.f90(247): error #6632: Keyword arguments are invalid without an explicit interface. [XTYPE]
576 xtype=field % xtype, &
577 -------------------------------------^
578 scan_input.f90(248): error #6632: Keyword arguments are invalid without an explicit interface. [NDIMS]
579 ndims=field % ndims)
580 -------------------------------------^
581 scan_input.f90(245): error #6404: This name does not have a type, and must have an explicit type. [NF90_INQUIRE_VARIABLE]
582 stat = nf90_inquire_variable(handle % ncid, field % varid, &
583 ---------------^
584 scan_input.f90(269): error #6632: Keyword arguments are invalid without an explicit interface. [DIMIDS]
585 dimids=field % dimids)
586 -------------------------------------^
587 scan_input.f90(281): error #6632: Keyword arguments are invalid without an explicit interface. [NAME]
588 name=field % dimnames(idim), &
589 ------------------------------------------^
590 scan_input.f90(282): error #6632: Keyword arguments are invalid without an explicit interface. [LEN]
591 len=field % dimlens(idim))
592 ------------------------------------------^
593 scan_input.f90(608): catastrophic error: Too many errors, exiting
594 compilation aborted for scan_input.f90 (code 1)
595 make[1]: [scan_input.o] Error 1 (ignored)
596 /bin/rm -f mpas_mesh.o mpas_mesh.mod
597 /lib/cpp -P -traditional -D_UNDERSCORE -DBYTESWAP -DLINUX -DIO_NETCDF -DIO_BINARY -DIO_GRIB1 -DBIT32 -D_MPI -D_METGRID -DUSE_JPEG2000 -DU SE_PNG -I/g8/JOB_TMP/huzhq/wly/wly/WRF-4.6.0/external/io_netcdf -I/g8/JOB_TMP/huzhq/wly/wly/WRF-4.6.0/external/io_grib_share -I/g8/JOB_TM P/huzhq/wly/wly/WRF-4.6.0/external/io_grib1 -I/g8/JOB_TMP/huzhq/wly/wly/WRF-4.6.0/external/io_int -I/g8/JOB_TMP/huzhq/wly/wly/WRF-4.6.0/i nc -I/g1/app/mathlib/netcdf/4.4.0/gnu/include mpas_mesh.F > mpas_mesh.f90
598 mpiifort -FR -convert big_endian -c mpas_mesh.f90 -I/g8/JOB_TMP/huzhq/wly/wly/WRF-4.6.0/external/io_netcdf -I/g8/JOB_TMP/huzhq/wly/wly/W RF-4.6.0/external/io_grib_share -I/g8/JOB_TMP/huzhq/wly/wly/WRF-4.6.0/external/io_grib1 -I/g8/JOB_TMP/huzhq/wly/wly/WRF-4.6.0/external/io _int -I/g8/JOB_TMP/huzhq/wly/wly/WRF-4.6.0/inc -I/g1/app/mathlib/netcdf/4.4.0/gnu/include
599 mpas_mesh.f90(14): error #7002: Error in opening the compiled module file. Check INCLUDE paths. [SCAN_INPUT]
600 use scan_input
601 --------^
602 mpas_mesh.f90(48): error #6457: This derived type name has not been declared. [INPUT_HANDLE_TYPE]
603 type (input_handle_type) :: handle
604 --------------^
605 mpas_mesh.f90(49): error #6457: This derived type name has not been declared. [INPUT_FIELD_TYPE]
606 type (input_field_type) :: field
--------------^
608 mpas_mesh.f90(53): error #6404: This name does not have a type, and must have an explicit type. [HANDLE]
609 if (scan_input_open(mesh_filename, handle) /= 0) then
610 -------------------------------------------^
611 mpas_mesh.f90(53): error #6404: This name does not have a type, and must have an explicit type. [SCAN_INPUT_OPEN]
612 if (scan_input_open(mesh_filename, handle) /= 0) then
613 ------------^
614 mpas_mesh.f90(61): error #6404: This name does not have a type, and must have an explicit type. [FIELD]
615 if (scan_input_for_field(handle, 'nEdgesOnCell', field) /= 0) then
616 ---------------------------------------------------------^
617 mpas_mesh.f90(61): error #6404: This name does not have a type, and must have an explicit type. [SCAN_INPUT_FOR_FIELD]
618 if (scan_input_for_field(handle, 'nEdgesOnCell', field) /= 0) then
619 ------------^
620 mpas_mesh.f90(66): error #6460: This is not a field name that is defined in the encompassing structure. [DIMLENS]
621 mesh % nCells = field % dimlens(1)
622 --------------------------------^
623 mpas_mesh.f90(70): error #6404: This name does not have a type, and must have an explicit type. [SCAN_INPUT_READ_FIELD]
624 stat = scan_input_read_field(field)
625 ---------------^
626 mpas_mesh.f90(72): error #6460: This is not a field name that is defined in the encompassing structure. [ARRAY1I]
627 mesh % nEdgesOnCell(:) = field % array1i(:)
628 -----------------------------------------^
629 mpas_mesh.f90(73): error #6404: This name does not have a type, and must have an explicit type. [SCAN_INPUT_FREE_FIELD]
630 stat = scan_input_free_field(field)
631 ---------------^
632 mpas_mesh.f90(81): error #6514: Substring or array slice notation requires CHARACTER type or array. [ARRAY1I]
633 mesh % landmask(:) = field % array1i(:)
634 -----------------------------------------^
635 mpas_mesh.f90(81): error #6303: The assignment operation or the binary expression operation is invalid for the data types of the two oper ands. [ARRAY1I]
636 mesh % landmask(:) = field % array1i(:)
637 -----------------------------------------^
638 mpas_mesh.f90(100): error #6460: This is not a field name that is defined in the encompassing structure. [ARRAY2I]
639 mesh % cellsOnCell(:,:) = field % array2i(:,:)
640 ------------------------------------------^
641 mpas_mesh.f90(113): error #6911: The syntax of this substring is invalid. [ARRAY2I]
642 mesh % verticesOnCell(:,:) = field % array2i(:,:)
643 ---------------------------------------------^
|
|