PUTC

Portability Function: Writes a character to Fortran external unit number 6.

Module

USE IFPORT

構文

result = PUTC (char)

char

(Input) Character. Character to be written to external unit 6.

Results

The result type is INTEGER(4). The result is zero if successful; otherwise, an error code.

Compatibility

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

 use IFPORT
 integer(4) i4
 character*1 char1
 do i = 1,26
   char1 = char(123-i)
   i4 = putc(char1)
   if (i4.ne.0) iflag = 1
 enddo

関連情報


このヘルプトピックについてのフィードバックを送信

© 1996-2011 Intel Corporation. 無断での引用、転載を禁じます。