<html xmlns:v="urn:schemas-microsoft-com:vml" xmlns:o="urn:schemas-microsoft-com:office:office" xmlns:w="urn:schemas-microsoft-com:office:word" xmlns:m="http://schemas.microsoft.com/office/2004/12/omml" xmlns="http://www.w3.org/TR/REC-html40">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=us-ascii">
<meta name="Generator" content="Microsoft Word 12 (filtered medium)">
<style><!--
/* Font Definitions */
@font-face
        {font-family:Calibri;
        panose-1:2 15 5 2 2 2 4 3 2 4;}
@font-face
        {font-family:Tahoma;
        panose-1:2 11 6 4 3 5 4 4 2 4;}
/* Style Definitions */
p.MsoNormal, li.MsoNormal, div.MsoNormal
        {margin:0cm;
        margin-bottom:.0001pt;
        font-size:12.0pt;
        font-family:"Times New Roman","serif";}
a:link, span.MsoHyperlink
        {mso-style-priority:99;
        color:blue;
        text-decoration:underline;}
a:visited, span.MsoHyperlinkFollowed
        {mso-style-priority:99;
        color:purple;
        text-decoration:underline;}
span.EmailStyle17
        {mso-style-type:personal-reply;
        font-family:"Calibri","sans-serif";
        color:#1F497D;}
.MsoChpDefault
        {mso-style-type:export-only;}
@page WordSection1
        {size:612.0pt 792.0pt;
        margin:72.0pt 72.0pt 72.0pt 72.0pt;}
div.WordSection1
        {page:WordSection1;}
--></style><!--[if gte mso 9]><xml>
<o:shapedefaults v:ext="edit" spidmax="1026" />
</xml><![endif]--><!--[if gte mso 9]><xml>
<o:shapelayout v:ext="edit">
<o:idmap v:ext="edit" data="1" />
</o:shapelayout></xml><![endif]-->
</head>
<body lang="EN-NZ" link="blue" vlink="purple">
<div class="WordSection1">
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">Hi Ehsan,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">Sorry I didn&#8217;t send you and other users who were interested in local terrestrial files transformation &#8216;Makefile&#8217;<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">to compile &#8216;rd_wr_formatted.f90&#8221;. Please don&#8217;t remove
</span><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;"># in &#8220;write_geogrid.c&#8221; and&nbsp; &#8220;read_geogrid.c&#8221;.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">Edit&nbsp; and use &#8216;Makefile&#8217; to compile the program. Just correct FC, CC and flags in &#8216;Makefie&#8217;.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">I use pgf90 and you as I can see use &#8216;ifort&#8217;. If you want to swap real on integer input you easily can do it editting
<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">&#8216;Makefile&#8217; and use integer land-use categories as input.<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">Good luck,<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">Mikhail<o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span style="font-family:&quot;Arial&quot;,&quot;sans-serif&quot;">NB I don&#8217;t have any other software to transform ASCII input in binary files.<o:p></o:p></span></p>
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#8F8F8F">________________________________________________________________________________&nbsp;</span></b><span lang="EN-AU" style="color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30"><o:p>&nbsp;</o:p></span></b></p>
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">Dr. Mikhail Titov
</span></b><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#7AB800">| Senior Prof. Officer, Energy</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">
</span><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#7AB800">|</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30"> Aurecon
</span><span lang="EN-AU" style="color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">Ph:
</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">&#43;64 3 366 08 21 ext.9231 DDI &#43;64 367 32 31</span><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#7AB800">
<b>| </b></span><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">Fax:</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30"> &#43;64 3 379 6955
</span><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#7AB800">|</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">
<b>Mob:</b> &#43;64 21 106 5563</span><span lang="EN-AU" style="color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">Email:
<a href="mailto:TitovM@ap.aurecongroup.com">TitovM@ap.aurecongroup.com</a> </span>
</b><span lang="EN-AU" style="color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">Unit 1, 150 Cavendish Road
</span><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#7AB800">|</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30"> Christchurch 8051
</span><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#7AB800">|</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30"> New Zealand<o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">PO Box 1061
</span><span lang="EN-AU" style="color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#7AB800"><a href="http://www.aurecongroup.com/">http://www.aurecongroup.com</a></span><span lang="EN-AU" style="color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><span lang="EN-US" style="font-size:8.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30"><a href="http://www.aurecongroup.com/apac/groupentity/">http://www.aurecongroup.com/apac/groupentity/</a></span><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#353D30">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
 &nbsp;&nbsp;</span><span lang="EN-AU" style="color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#8F8F8F">_________________________________________________________________________________</span></b><span lang="EN-AU" style="color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:&quot;Calibri&quot;,&quot;sans-serif&quot;;color:#1F497D"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal" style="margin-bottom:12.0pt"><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Arial&quot;,&quot;sans-serif&quot;;color:#7AB800">Please consider your environment before printing this e-mail.</span><span style="font-size:11.0pt;font-family:&quot;Calibri&quot;,&quot;sans-serif&quot;;color:#1F497D"><o:p></o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:&quot;Calibri&quot;,&quot;sans-serif&quot;;color:#1F497D"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:&quot;Calibri&quot;,&quot;sans-serif&quot;"><o:p>&nbsp;</o:p></span></p>
<p class="MsoNormal"><span style="font-size:11.0pt;font-family:&quot;Calibri&quot;,&quot;sans-serif&quot;"><o:p>&nbsp;</o:p></span></p>
<div style="border:none;border-top:solid #B5C4DF 1.0pt;padding:3.0pt 0cm 0cm 0cm">
<p class="MsoNormal"><b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Tahoma&quot;,&quot;sans-serif&quot;">From:</span></b><span lang="EN-US" style="font-size:10.0pt;font-family:&quot;Tahoma&quot;,&quot;sans-serif&quot;"> Ehsan Beigi [mailto:ebeigi3@tigers.lsu.edu]
<br>
<b>Sent:</b> Tuesday, 7 June 2011 8:35 a.m.<br>
<b>To:</b> Mikhail Titov<br>
<b>Subject:</b> Re: Topo and land use ASCII - netCDF transformation<o:p></o:p></span></p>
</div>
<p class="MsoNormal"><o:p>&nbsp;</o:p></p>
<p class="MsoNormal" style="margin-bottom:12.0pt">thanks for your previous help. i remove the # in write_geogrid.c and&nbsp; read_geogrid.cfrom at the start of these lines to make it compatible with compilers by looking at configure.wps<br>
ifdef _UNDERSCORE <br>
define read_geogrid read_geogrid_ <br>
endif<br>
<br>
and then i use this command to compile the rd_wr_formatted.f90 code, is it correct :<br>
<br>
CC=icc FC=ifort ifort rd_wr_formatted.f90 -L/home/ehsan/Documents/Netcdf/4.1/lib -lnetcdf -lm&nbsp; \-I/home/ehsan/Documents/Netcdf/4.1/include -free&nbsp; -o rd_wr_formatted.f90
<br>
<br>
<span style="color:red;background:white">after type it&nbsp; in command line , it gives me :</span><br>
<br>
rd_wr_formatted.f90(25): error #6423: This name has already been used as an external function name.&nbsp;&nbsp; [IARGC]<br>
&nbsp;&nbsp; if (iargc /= 1) then<br>
-------^<br>
rd_wr_formatted.f90(25): error #8497: Illegal use of a procedure name in an expression, possibly a function call missing parenthesis.&nbsp;&nbsp; [IARGC]<br>
&nbsp;&nbsp; if (iargc /= 1) then<br>
-------^<br>
compilation aborted for rd_wr_formatted.f90 (code 1)<br>
<br>
<br>
CC=icc FC=ifort ifort rd_wr_formatted.f90 -L/home/ehsan/Documents/Netcdf/4.1/lib -lnetcdf -lm&nbsp; \-I/home/ehsan/Documents/Netcdf/4.1/include -free&nbsp; -o rd_wr_formatted.f90
<br>
rd_wr_formatted.f90(25): error #6423: This name has already been used as an external function name.&nbsp;&nbsp; [IARGC]<br>
&nbsp;&nbsp; if (iargc /= 1) then<br>
-------^<br>
rd_wr_formatted.f90(25): error #8497: Illegal use of a procedure name in an expression, possibly a function call missing parenthesis.&nbsp;&nbsp; [IARGC]<br>
&nbsp;&nbsp; if (iargc /= 1) then<br>
-------^<br>
compilation aborted for rd_wr_formatted.f90 (code 1)<br>
<br>
<br>
<br>
<span style="color:red">What should i do ?</span><br>
<br>
Best Regards,<br>
<br>
Ehsan Beigi<br>
<br>
<o:p></o:p></p>
</div>
<br>
<font face="Arial" color="Gray" size="1">Disclaimer - http://www.aurecongroup.com/apac/disclaimer/<br>
</font>
</body>
</html>