text: /*
   * $PIP_license: <Simplified BSD License>
   * Redistribution and use in source and binary forms, with or without
   * modification, are permitted provided that the following conditions are met:
   * 
   *     Redistributions of source code must retain the above copyright notice,
   *     this list of conditions and the following disclaimer.
   * 
   *     Redistributions in binary form must reproduce the above copyright notice,
   *     this list of conditions and the following disclaimer in the documentation
   *     and/or other materials provided with the distribution.
   * 
   * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
   * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
   * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
   * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
   * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
   * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
   * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
   * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
   * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
   * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
   * THE POSSIBILITY OF SUCH DAMAGE.
   * $
   * $RIKEN_copyright: Riken Center for Computational Sceience (R-CCS),
   * System Software Development Team, 2016-2021
   * $
   * $PIP_VERSION: Version 2.1.0$
   *
   * $Author: Atsushi Hori (R-CCS)
   * Query:   procinproc-info@googlegroups.com
   * User ML: procinproc-users@googlegroups.com
   * $
   */
  
  /** \page printpipmode printpipmode
   *
   * \brief Print current PiP mode
   *
   * \synopsis
   * printpipmode
   *
   * \sa pip-mode
   */
  
  #include <pip/pip.h>
  
  int main() {
    int ntasks, err;
    ntasks = 1;
    if( ( err = pip_init( NULL, &ntasks, NULL, 0 ) ) == 0 ) {
      printf( "%s\n", pip_get_mode_str() );
    } else {
      fprintf( stderr, "pip_init() fails (%s)\n", strerror(err) );
    }
    return err;
  }
  