Problem in compiling iowrf

Post here if you think you might have found any type of bug

Problem in compiling iowrf

Postby ehsan.e » Sun Oct 16, 2011 2:46 pm

I am trying to compile iowrfin linux machine with intel fortran compiler (ifort). Although I follow the WRF tutorial and I do have NetDCF, but I receive too many errors. Any body has worked with this code? It seems it is not a final code and the code itself has many errors.

Command line I use for our machine:
ifort iowrf.f -L/home/opt/netcdf/gnu44/lib -lnetcdf -lm -I/home/opt/netcdf/gnu44/lib/ -Mfree -o iowrf

Error message:
ifort: command line warning #10006: ignoring unknown option '-Mfree'
iowrf.f(110): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( * ) :: , + . - % : . ** / // .LT. < .LE. <= .EQ. == .NE. ...
call read_args(input_file,option,iratio,box_start,box_end,bit64,debug)
----------------------------------------------------------------------------^
iowrf.f(151): error #5082: Syntax error, found ''' when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
write(6,'(4(A,i4))') ' ndims = ',ndims,' nvars = ',nvars,' ngatts = ',ngatts, &
--------------------------------------------------------------------^
iowrf.f(152): error #5082: Syntax error, found ',' when expecting one of: (
' nunlimdimid =',nunlimdimid
--------------------------------------^
iowrf.f(164): error #5120: Unterminated character constant
status = nf_get_att_int (ncid, nf_global, 'WEST-EAST_GRID_DIMENSION', iweg)
------------------------------------------------^
iowrf.f(164): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ) :: , :
status = nf_get_att_int (ncid, nf_global, 'WEST-EAST_GRID_DIMENSION', iweg)
---------------------------------------------------------------------------------^
iowrf.f(165): error #5120: Unterminated character constant
status = nf_get_att_int (ncid, nf_global, 'SOUTH-NORTH_GRID_DIMENSION', isng)
------------------------------------------------^
iowrf.f(165): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ) :: , :
status = nf_get_att_int (ncid, nf_global, 'SOUTH-NORTH_GRID_DIMENSION', isng)
-----------------------------------------------------------------------------------^
iowrf.f(166): error #5120: Unterminated character constant
status = nf_get_att_int (ncid, nf_global, 'BOTTOM-TOP_GRID_DIMENSION', ibtg)
------------------------------------------------^
iowrf.f(166): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ) :: , :
status = nf_get_att_int (ncid, nf_global, 'BOTTOM-TOP_GRID_DIMENSION', ibtg)
----------------------------------------------------------------------------------^
iowrf.f(187): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
if ( box_end(1) .ne. 0 ) jweg = int(box_end(1) - box_start(1)) + 1
--------------------------------------------------------------------------^
iowrf.f(188): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
if ( box_end(2) .ne. 0 ) jsng = int(box_end(2) - box_start(2)) + 1
--------------------------------------------------------------------------^
iowrf.f(189): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: ( <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> <CHARACTER_CONSTANT> <INTEGER_CONSTANT> ...
if ( box_end(3) .ne. 0 ) jbtg = int(box_end(3) - box_start(3)) + 1
--------------------------------------------------------------------------^
iowrf.f(253): error #5082: Syntax error, found '&' when expecting one of: ( , <END-OF-STATEMENT> ; <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> ...
write(6,'(i4," : ",A," in = ",i4," (out = ",i4,")")') &
----------------------------------------------------------------^
iowrf.f(254): error #5082: Syntax error, found ',' when expecting one of: ( % : . = =>
i,dname(i),dval(i),dval2(i)
-----------------^
iowrf.f(275): error #5082: Syntax error, found '&' when expecting one of: ( , <END-OF-STATEMENT> ; <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> ...
write(6,'(i4," : ",A," in = ",A," (out = ",$)') &
------------------------------------------------------------^
iowrf.f(276): error #5082: Syntax error, found ',' when expecting one of: ( % : . = =>
i,name,cval(1:ilen)
-------------------^
iowrf.f(283): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: <INTEGER_CONSTANT> <POUND_VAL> <INTEGER_KIND_CON> <POUND_BASE>
status = nf_put_att_text(mcid, nf_global, name, ilen,&
----------------------------------------------------------------^
iowrf.f(284): error #5276: Unbalanced parentheses
cval(1:ilen))
--------------------------------^
iowrf.f(284): error #5082: Syntax error, found ')' when expecting one of: ( % . = =>
cval(1:ilen))
--------------------------------^
iowrf.f(289): error #5082: Syntax error, found '&' when expecting one of: ( , <END-OF-STATEMENT> ; <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> ...
write(6,'(i4," : ",A," in = ",i7," (out = ",$)') &
-------------------------------------------------------------^
iowrf.f(290): error #5082: Syntax error, found ',' when expecting one of: ( % : . = =>
i,name,ival
-------------------^
iowrf.f(296): error #5082: Syntax error, found END-OF-STATEMENT when expecting one of: <INTEGER_CONSTANT> <POUND_VAL> <INTEGER_KIND_CON> <POUND_BASE>
status = nf_put_att_int(mcid, nf_global, name, itype,&
----------------------------------------------------------------^
iowrf.f(297): error #5276: Unbalanced parentheses
ilen, ival)
------------------------------^
iowrf.f(297): error #5082: Syntax error, found ',' when expecting one of: ( % : . = =>
ilen, ival)
------------------------^
iowrf.f(302): error #5082: Syntax error, found '&' when expecting one of: ( , <END-OF-STATEMENT> ; <IDENTIFIER> <CHAR_CON_KIND_PARAM> <CHAR_NAM_KIND_PARAM> ...
write(6,'(i4," : ",A," in = ",G18.10E2," (out = ",$)') &
-------------------------------------------------------------------^
(1640): catastrophic error: Too many errors, exiting
compilation aborted for iowrf.f (code 1)
ehsan.e
 
Posts: 17
Joined: Wed Sep 21, 2011 6:03 am

Re: Problem in compiling iowrf

Postby jimmyc » Wed Oct 19, 2011 9:07 pm

The users guide says to compile with the pgf90 compiler. I don't believe the compile options will be identical.
The views expressed in this message do not necessarily reflect those of NOAA or the National Weather Service or the University of Oklahoma.
James Correia, Jr
jimmyc
 
Posts: 519
Joined: Tue Apr 15, 2008 1:10 am

Re: Problem in compiling iowrf

Postby dcvz » Sat Oct 22, 2011 3:09 am

The first error is usually the one that counts. The rest proceed from that error. It complains about -Mfree. The ifort man page says the correct option is -free. The other options should be OK, but as jimmyc says the pgi and ifort options can be different.
dcvz
 
Posts: 151
Joined: Tue Apr 15, 2008 12:02 am


Return to Bugs

Who is online

Users browsing this forum: No registered users and 1 guest

cron