/* C */
    int
nusdas_subc_sigm(type1, type2, type3, btime, memb, vtime1, nlev,
  a, b, c, io)

    int
nusdas_subc_sigm2(type1, type2, type3, btime, memb, vtime1, vtime2,
  nlev, a, b, c, io)

! Fortran
SUBROUTINE NUSDAS_SUBC_SIGM(type1, type2, type3, btime, memb, vtime1, &
  nlev, a, b, c, io, iostat)
SUBROUTINE NUSDAS_SUBC_SIGM2(type1, type2, type3, btime, memb, vtime1, &
  vtime2, nlev, a, b, c, io, iostat)


symbol	Fortran	C
nlev	INTEGER	N_SI4 *
a	REAL, DIMENSION(nlev)	float *
b	REAL, DIMENSION(nlev)	float *
c	REAL, DIMENSION(nlev)	float *
io	(should be symbol/macro defined in header file)
iostat	INTEGER, INTENT(OUT)	(not used)

ARGUMENTS

nlev

number of levels

a

b

c

vertical coordinate parameters

io

one of following symbols

N_IO_PUT: writes SUBC record made from a, b, and c
N_IO_GET: reads SUBC record to a, b, and c

RETURN VALUE


0	Succeeded.
-1	Error: requested file not exist.
-2	Error: requested record not exist.
-3	Error: specified size is different to that of definition file.
-4	Error: specified number of level is smaller than that in file.
-5	Error: invalid argument.
-10 to -99	(see error code table)

see also Error Code of NuSDaS library for return code from -10 to -99.

NUSDAS_SUBC_ETA

SYNOPSIS

/* C */
    int
nusdas_subc_eta(type1, type2, type3, btime, memb, vtime1, nlev, a, b, c, io)

    int
nusdas_subc_eta2(type1, type2, type3, btime, memb, vtime1, vtime2, nlev,
  a, b, c, io)

! Fortran
SUBROUTINE NUSDAS_SUBC_ETA(type1, type2, type3, btime, memb, vtime1, &
  nlev, a, b, c, io, iostat)
SUBROUTINE NUSDAS_SUBC_ETA2(type1, type2, type3, btime, memb, vtime1, &
  vtime2, nlev, a, b, c, io, iostat)

argument types, argument meanings, and return values are same as NUSDAS_SUBC_SIGM.