INTERFACE:
subroutine ncd_pio_init()DESCRIPTION:
Initial PIO
USES:
use seq_io_mod , only : seq_io_getiosys, seq_io_getiotypeARGUMENTS:
implicit noneREVISION HISTORY:
LOCAL VARIABLES:
character(len=*),parameter :: subname='ncd_pio_init' ! subroutine name -----------------------------------------------------------------------