WRFDA 3.1.1 with ifort and icc

[helberbg]

Dear all,

I have compiled WRFV3 and WPS on 64-bit machine, and all the exe files were generated with intel compiler ifort and icc. On the other hand, when I try to install WRFDA with the same compiler I encounter the following error:

ar: creating ./libio_grib_share.a
ar: creating ../libio_grib1.a
ar: creating libesmf_time.a
ar: creating libfftpack.a
registry.c(48): warning #266: function "sym_forget" declared implicitly
sym_forget() ;
^

registry.c(117): warning #266: function "init_parser" declared implicitly
init_parser() ;
^

registry.c(140): warning #266: function "pre_parse" declared implicitly
if ( pre_parse( dir, fp_in, fp_tmp ) ) {
^

registry.c(159): warning #266: function "check_dimspecs" declared implicitly
check_dimspecs() ;
^

registry.c(164): warning #266: function "gen_alloc_count" declared implicitly
gen_alloc_count( "inc" ) ;
^

registry.c(165): warning #266: function "gen_dealloc" declared implicitly
gen_dealloc( "inc" ) ;
^

registry.c(169): warning #266: function "gen_actual_args_new" declared implicitly
gen_actual_args_new( "inc" ) ;
^

registry.c(171): warning #266: function "gen_dummy_args_new" declared implicitly
gen_dummy_args_new( "inc" ) ;
^

registry.c(173): warning #266: function "gen_dummy_decls_new" declared implicitly
gen_dummy_decls_new( "inc" ) ;
^

registry.c(175): warning #266: function "gen_namelist_statements" declared implicitly
gen_namelist_statements("inc") ;
^

registry.c(185): warning #266: function "gen_nest_interp" declared implicitly
gen_nest_interp( "inc" ) ;
^

registry.c(189): warning #266: function "gen_comms" declared implicitly
gen_comms( "inc" ) ; /* this is either package supplied (by copying a */
^

reg_parse.c(222): warning #266: function "tolower" declared implicitly
x = tolower(tokens[F_DIMS][i]) ;
^

reg_parse.c(287): warning #177: label "normal" was declared but never referenced
normal:
^

reg_parse.c(437): warning #266: function "tolower" declared implicitly
if ( tolower(tokens[FIELD_STAG][i]) == 'x' || sw_all_x_staggered ) field_struct->stag_x = 1 ;
^

reg_parse.c(438): warning #266: function "tolower" declared implicitly
if ( tolower(tokens[FIELD_STAG][i]) == 'y' || sw_all_y_staggered ) field_struct->stag_y = 1 ;
^

reg_parse.c(439): warning #266: function "tolower" declared implicitly
if ( tolower(tokens[FIELD_STAG][i]) == 'z' ) field_struct->stag_z = 1 ;
^

reg_parse.c(458): warning #266: function "tolower" declared implicitly
x = tolower(tokens[FIELD_IO][i]) ;
^

misc.c(150): warning #266: function "range_of_dimension" declared implicitly
range_of_dimension( r, tx , i , p , nlstructname ) ;
^

misc.c(170): warning #1011: missing return statement at end of non-void function "range_of_dimension"
}
^

misc.c(212): warning #592: variable "zdex" is used before its value is set
sprintf(tmp,"%ssm3%d,%ssm3%d,1,1", r,bdex,r,zdex ) ;
^

misc.c(418): warning #266: function "getpid" declared implicitly
sprintf(tempfile,"regtmp1%d",getpid()) ;
^

misc.c(432): warning #266: function "getpid" declared implicitly
sprintf(tempfile,"regtmp1%d",getpid()) ;
^

misc.c(450): warning #266: function "toupper" declared implicitly
for ( p = str ; *p ; p++ ) *p = toupper(*p) ;
^

misc.c(460): warning #266: function "tolower" declared implicitly
for ( p = str ; *p ; p++ ) *p = tolower(*p) ;
^

misc.c(609): warning #266: function "dimension_size_expression" declared implicitly
dimension_size_expression( r, tx , i , p , nlstructname ) ;
^

misc.c(633): warning #1011: missing return statement at end of non-void function "dimension_size_expression"
}
^

gen_allocs.c(14): warning #266: function "gen_ddt_write" declared implicitly
gen_ddt_write( dirname ) ;
^

gen_allocs.c(81): warning #268: the format string ends before this argument
fprintf(fp,".AND.(.NOT.inter_domain)",tag) ;
^

gen_allocs.c(93): warning #266: function "array_size_expression" declared implicitly
array_size_expression("", "(", bdy, t2, p, post_for_count, "model_config_rec%"),
^

gen_allocs.c(93): warning #181: argument is incompatible with corresponding format string conversion
array_size_expression("", "(", bdy, t2, p, post_for_count, "model_config_rec%"),
^

gen_allocs.c(117): warning #266: function "array_size_expression" declared implicitly
array_size_expression("", "(", -1, t2, p, post_for_count, "model_config_rec%"),
^

gen_allocs.c(117): warning #181: argument is incompatible with corresponding format string conversion
array_size_expression("", "(", -1, t2, p, post_for_count, "model_config_rec%"),
^

gen_allocs.c(201): warning #266: function "gen_alloc_count1" declared implicitly
gen_alloc_count1( dirname ) ;
^

gen_allocs.c(234): warning #266: function "gen_ddt_write1" declared implicitly
gen_ddt_write1( fp , "grid%", &Domain ) ;
^

gen_allocs.c(279): warning #266: function "gen_dealloc1" declared implicitly
gen_dealloc1( dirname ) ;
^

gen_allocs.c(295): warning #266: function "gen_dealloc2" declared implicitly
gen_dealloc2( fp , "grid%", &Domain ) ;
^

gen_scalar_indices.c(40): warning #266: function "gen_scalar_tables" declared implicitly
gen_scalar_tables ( fp ) ;
^

gen_scalar_indices.c(47): warning #266: function "gen_scalar_tables_init" declared implicitly
gen_scalar_tables_init ( fp ) ;
^

gen_scalar_indices.c(54): warning #266: function "gen_scalar_indices_init" declared implicitly
gen_scalar_indices_init ( fp ) ;
^

gen_scalar_indices.c(67): warning #268: the format string ends before this argument
fprintf(fp," INTEGER :: %s_num_table( max_domains )\n", p->name,p->name ) ;
^

gen_config.c(133): warning #266: function "sym_forget" declared implicitly
sym_forget() ;
^

gen_config.c(165): warning #266: function "toupper" declared implicitly
fputc(toupper(*i),fp);
^

gen_config.c(170): warning #266: function "toupper" declared implicitly
fputc(toupper(*i),fp);
^

gen_config.c(176): warning #266: function "toupper" declared implicitly
fputc(toupper(*i),fp);
^

gen_config.c(398): warning #266: function "sym_forget" declared implicitly
sym_forget() ;
^

sym.c(73): warning #266: function "create_ht" declared implicitly
create_ht( &symtab ) ;
^

sym.c(77): warning #266: function "exit" declared implicitly
exit(1) ;
^

sym.c(153): warning #266: function "create_ht" declared implicitly
create_ht( &symtab ) ;
^

sym.c(157): warning #266: function "exit" declared implicitly
exit(1) ;
^

symtab_gen.c(60): warning #266: function "hash" declared implicitly
index = hash( name ) ;
^

gen_wrf_io.c(33): warning #266: function "sym_forget" declared implicitly
OP_F(fp,"wrf_metaput_input.inc") ;
^

gen_wrf_io.c(349): warning #1011: missing return statement at end of non-void function "set_dim_strs"
}
^

gen_wrf_io.c(357): warning #1011: missing return statement at end of non-void function "set_dim_strs2"
}
^

gen_wrf_io.c(449): warning #266: function "range_of_dimension" declared implicitly
range_of_dimension( r, tx , d , p , "config_flags%" ) ;
^

gen_wrf_io.c(770): warning #266: function "make_upper_case" declared implicitly
make_upper_case(dname) ;
^

gen_wrf_io.c(906): warning #181: argument is incompatible with corresponding format string conversion
structname , fourdname, tend_tag, ibdy, bdy_indicator(ibdy), p->name ) ;
^

gen_wrf_io.c(906): warning #181: argument is incompatible with corresponding format string conversion
structname , fourdname, tend_tag, ibdy, bdy_indicator(ibdy), p->name ) ;
^

gen_wrf_io.c(978): warning #266: function "make_upper_case" declared implicitly
make_upper_case( dname ) ;
^

gen_wrf_io.c(1051): warning #266: function "make_upper_case" declared implicitly
make_upper_case(dname_tmp) ;
^

gen_interp.c(72): warning #266: function "gen_nest_interp1" declared implicitly
gen_nest_interp1 ( fp , Domain.fields, NULL, down_path[ipath], (down_path[ipath]==FORCE_DOWN)?2:2 ) ;
^

gen_interp.c(186): warning #266: function "set_dim_strs2" declared implicitly
set_dim_strs2 ( p->members->next , ddim , mdim , pdim , "c", 1 ) ;
^

gen_interp.c(206): warning #266: function "set_dim_strs2" declared implicitly
set_dim_strs2 ( p , ddim , mdim , pdim , "c", 1 ) ;
^

gen_interp.c(231): warning #266: function "range_of_dimension" declared implicitly
range_of_dimension( r, tx, d, p, "config_flags%" ) ;
^

gen_comms.c(91): warning #266: function "range_of_dimension" declared implicitly
range_of_dimension(r,tx,d,q,du?"":"config_flags%") ;
^

gen_comms.c(153): warning #1011: missing return statement at end of non-void function "print_4d_i1_decls"
}
^

gen_comms.c(192): warning #1011: missing return statement at end of non-void function "print_decl"
}
^

gen_comms.c(202): warning #1011: missing return statement at end of non-void function "print_body"
}
^

gen_comms.c(243): warning #266: function "make_upper_case" declared implicitly
make_upper_case(commname) ;
^

gen_comms.c(477): warning #266: function "gen_packs_halo" declared implicitly
gen_packs_halo( fp, p, maxstenwidth, 0, 0, "RSL_LITE_PACK", "local_communicator" ) ;
^

gen_comms.c(603): warning #266: function "range_of_dimension" declared implicitly
range_of_dimension( r, tx, d, q, "config_flags%" ) ;
^

gen_comms.c(936): warning #266: function "make_upper_case" declared implicitly
make_upper_case(commname) ;
^

gen_comms.c(1128): warning #266: function "make_upper_case" declared implicitly
make_upper_case(commname) ;
^

gen_comms.c(1262): warning #266: function "make_upper_case" declared implicitly
make_upper_case(commname) ;
^

gen_comms.c(1404): warning #266: function "make_upper_case" declared implicitly
make_upper_case(commname) ;
^

gen_comms.c(1714): warning #266: function "range_of_dimension" declared implicitly
range_of_dimension( r, tx, d, p, "config_flags%") ;
^

gen_comms.c(1892): warning #1011: missing return statement at end of non-void function "gen_shift"
}
^

gen_comms.c(1917): warning #266: function "gen_nest_pack" declared implicitly
gen_nest_pack( dirname ) ;
^

gen_comms.c(1918): warning #266: function "gen_nest_unpack" declared implicitly
gen_nest_unpack( dirname ) ;
^

gen_comms.c(1960): warning #266: function "count_fields" declared implicitly
count_fields ( node , &d2 , &d3 , fourd_names, down_path[ipath] ) ;
^

gen_comms.c(1989): warning #266: function "gen_nest_packunpack" declared implicitly
gen_nest_packunpack ( fp , Domain.fields, PACKIT, down_path[ipath] ) ;
^

gen_comms.c(2043): warning #266: function "count_fields" declared implicitly
count_fields ( node , &d2 , &d3 , fourd_names, down_path[ipath] ) ;
^

gen_comms.c(2057): warning #266: function "gen_nest_packunpack" declared implicitly
gen_nest_packunpack ( fp , Domain.fields, UNPACKIT, down_path[ipath] ) ;
^

gen_comms.c(2156): warning #266: function "range_of_dimension" declared implicitly
range_of_dimension(r, tx, d1, p, "config_flags%" ) ;
^

gen_comms.c(2266): warning #266: function "range_of_dimension" declared implicitly
range_of_dimension(r,tx,d,p,"config_flags%") ;
^

gen_comms.c(2371): warning #1011: missing return statement at end of non-void function "gen_debug"
}
^

standard.c(30): warning #266: function "drop_comment" declared implicitly
if ( linei[0] != '#' ) drop_comment( linei ) ;
^

standard.c(39): warning #266: function "strncpy" declared implicitly
strncpy(q,p,4) ; q+=4 ;
^

standard.c(44): warning #266: function "change_to_lower" declared implicitly
strncpy(wrf_error_fatal_str, p+3+ns,15+1) ; change_to_lower(wrf_error_fatal_str,15+1 ) ; /* 15, but add one to check for '3' */
^

standard.c(50): warning #266: function "strncmp" declared implicitly
if ( !strncmp( wrf_error_fatal_str, "wrf_error_fatal", 15 ) && wrf_error_fatal_str[15] != '3' )
^

standard.c(74): warning #266: function "strcpy" declared implicitly
strcpy(lineo,p+3+ns) ;
^

standard.c(84): warning #266: function "strcat" declared implicitly
strcat(lineo,linei) ;
^

standard.c(156): warning #1011: missing return statement at end of non-void function "drop_comment"
}
^

standard.c(166): warning #1011: missing return statement at end of non-void function "change_to_lower"
}
^

da.make:450: warning: overriding commands for target `input_wrf.o'
../../configure.wrf:569: warning: ignoring old commands for target `input_wrf.o'
makefile:61: warning: overriding commands for target `.f90.o'
../../configure.wrf:332: warning: ignoring old commands for target `.f90.o'
da.make:450: warning: overriding commands for target `input_wrf.o'
../../configure.wrf:569: warning: ignoring old commands for target `input_wrf.o'
makefile:61: warning: overriding commands for target `.f90.o'
../../configure.wrf:332: warning: ignoring old commands for target `.f90.o'
opening ../../Registry/registry.dimspec
including ../../Registry/registry.dimspec
opening ../../Registry/registry.io_boilerplate
including ../../Registry/registry.io_boilerplate
opening ../../Registry/registry.fire
including ../../Registry/registry.fire
ADVISORY: RSL_LITE version of gen_comms is linked in with registry program.
da.make:450: warning: overriding commands for target `input_wrf.o'
../../configure.wrf:569: warning: ignoring old commands for target `input_wrf.o'
makefile:61: warning: overriding commands for target `.f90.o'
../../configure.wrf:332: warning: ignoring old commands for target `.f90.o'
fortcom: Error: da_bufr.f, line 9353: Unterminated character constant
&4,") DESCRIPTORS (THE LIMIT) IN TABLE D SEQUENCE '//'MNEMONIC ",A)&
--------------------------------------------------------------------^
fortcom: Error: da_bufr.f, line 9354: Invalid character_kind_parameter. No underscore
&') MAXCD, NEMO
------------------------------------------------------------------------^
fortcom: Error: da_bufr.f, line 9353: Syntax error, found ''' when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
&4,") DESCRIPTORS (THE LIMIT) IN TABLE D SEQUENCE '//'MNEMONIC ",A)&
----------------------------------------------------------^
fortcom: Error: da_bufr.f, line 9289: This label is undefined. [903]
IF (NSEQ + 1.GT.MAXCD) GOTO 903
----------------------------------^
compilation aborted for da_bufr.f (code 1)
make[1]: [da_bufr.o] Error 1 (ignored)
/bin/sh: line 1: 29472 Killed make -i -r all_wrfvar
/usr/local/intel/mpi/3.1/bin64/mpif90: line 551: 30420 Killed ifort -c -r8 -i4 -O0 -fno-inline -fno-ip -w -ftz -align all -fno-alias -fp-model precise -FR -convert big_endian module_comm_dm.f90 -I/usr/local/intel/mpi/3.1/include64/gfortran -I/usr/local/intel/mpi/3.1/include64


Can you help me please

Thank you in advance

Best regards

Helber Gomes

[ochimborazo]

Hello everyone,

I got the same problem. Has anybody found out how to fix this?

Oscar

[hnlim]

Hi,

I had the same error at da_bufr.f though i get some of the exe files generated but not all.
Has anyone had any solution to it?

Agnes

[cathy kang]

Hi，everyone,i have the same problem ,so is there anybody figure that out?

[hnlim]

The problem will go off when I upgrade to V3.2.
According to wrfhelp, its because of some way of coding that ifort does not like.
They are not errors.