text: /*
   *      $Id: c_mpifnb.c,v 1.2 2008-07-23 16:16:53 haley Exp $
   */
  /************************************************************************
  *                                                                       *
  *                Copyright (C)  2000                                    *
  *        University Corporation for Atmospheric Research                *
  *                All Rights Reserved                                    *
  *                                                                       *
  *    The use of this Software is governed by a License Agreement.       *
  *                                                                       *
  ************************************************************************/
  
  
  #include <ncarg/ncargC.h>
  
  extern int NGCALLF(mpifnb,MPIFNB)(NGstring,int);
  
  int c_mpifnb
  #ifdef NeedFuncProto
  (
      char *chrs
  )
  #else
  (chrs)
      char *chrs;
  #endif
  {
      int len;
      NGstring chrs_f;
      len=NGSTRLEN(chrs);
      chrs_f=NGCstrToFstr(chrs,len);
      return(NGCALLF(mpifnb,MPIFNB)(chrs_f,len));
  }
  