<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.6000.16788" name=GENERATOR></HEAD>
<BODY>
<DIV dir=ltr align=left><SPAN class=359393615-15012009><FONT face=Arial 
color=#0000ff size=2>It should be there. Which version of MPICH2 are you using? 
In the lib subdirectory where MPICH2 is installed, do "</FONT></SPAN><SPAN 
class=359393615-15012009><FONT face=Arial color=#0000ff size=2>nm libmpich.a | 
grep -i f90" and see what it shows.</FONT></SPAN></DIV>
<DIV dir=ltr align=left><SPAN class=359393615-15012009><FONT face=Arial 
color=#0000ff size=2></FONT></SPAN>&nbsp;</DIV>
<DIV dir=ltr align=left><SPAN class=359393615-15012009><FONT face=Arial 
color=#0000ff size=2>Rajeev</FONT></SPAN></DIV><BR>
<BLOCKQUOTE 
style="PADDING-LEFT: 5px; MARGIN-LEFT: 5px; BORDER-LEFT: #0000ff 2px solid; MARGIN-RIGHT: 0px">
  <DIV class=OutlookMessageHeader lang=en-us dir=ltr align=left>
  <HR tabIndex=-1>
  <FONT face=Tahoma size=2><B>From:</B> mpich-discuss-bounces@mcs.anl.gov 
  [mailto:mpich-discuss-bounces@mcs.anl.gov] <B>On Behalf Of </B>trimtrim 
  trimtrim<BR><B>Sent:</B> Thursday, January 15, 2009 3:14 AM<BR><B>To:</B> 
  mpich-discuss@mcs.anl.gov<BR><B>Subject:</B> [mpich-discuss] can not find 
  function MPI_Type_create_f90_real<BR></FONT><BR></DIV>
  <DIV></DIV>Dear every one:<BR>&nbsp; I am try to use the function of 
  "MPI_Type_create_f90_real" to select the MPI send data type. But when I link 
  the program, it shows I can't find the library.<BR>"Error&nbsp;&nbsp;&nbsp; 
  1&nbsp;&nbsp;&nbsp; &nbsp;error LNK2019: unresolved external symbol 
  _MPI_TYPE_CREATE_F90_REAL referenced in function _MAIN__&nbsp;&nbsp;&nbsp; 
  TEST "&nbsp; <BR><BR>Does anyone knows which library I need to add, the 
  library "fmpe.lib" and "fmpich2.lib" are already add to the linker. Below is 
  the attached program.<BR>Many thanks<BR>Regards Haihua.<BR><BR>PROGRAM 
  MAIN<BR>USE mpi<BR>INTEGER(KIND=4),PARAMETER::p = 
  12,r=37;<BR>INTEGER(KIND=4),PARAMETER:: realKind 
  =selected_real_kind(p,r)<BR>INTEGER(KIND=4):: MPI_INT_KIND,info;<BR>CALL 
  MPI_Type_create_f90_real(p,r,MPI_INT_KIND,info);<BR><BR>write(*,*) 
  realKind;<BR>Write(*,*) 
PRECISION(x),range(x);<BR><BR>END<BR></BLOCKQUOTE></BODY></HTML>