xfWriteVectorTimestepPar(xid a_Id, double a_Time, int a_NumTotal, int a_NumProc, int a_NumComponents const double *a_Values, , const int *a_WhichVals); xfWriteVectorTimestepParMinMax(xid a_Id, double a_Time, int a_NumTotal, int a_NumProc, int a_NumComponents, const double *a_Values, const int *a_WhichVals, int a_Stride, double a_Min, double a_Max);
SUBROUTINE XF_WRITE_VECTOR_TIMESTEP_PAR (a_Id, a_Time, a_NumValues, a_NumProc, a_NumComponents, a_Values, a_WhichValues, a_Stride, error) INTEGER(HID_T), INTENT(IN) :: a_Id REAL(DOUBLE), INTENT(IN) :: a_Time INTEGER(HSIZE_T), INTENT(IN) :: a_NumValues INTEGER(HSIZE_T), INTENT(IN) :: a_NumProc INTEGER(HSIZE_T), INTENT(IN) :: a_NumComponents REAL*8, DIMENSION(*), INTENT(IN) :: a_Values INTEGER, DIMENSION(*), INTENT(IN) :: a_WhichVals INTEGER, INTENT(IN) :: a_Stride INTEGER, INTENT(OUT) :: error SUBROUTINE XF_WRITE_VECTOR_TS_MIN_MAX_PAR(a_Id, a_Time, a_NumValues, a_NumProc, & a_NumComponents, a_Values, a_WhichVals, & a_Minimum, a_Maximum, error) INTEGER(HID_T), INTENT(IN) :: a_Id REAL*8, INTENT(IN) :: a_Time INTEGER(HSIZE_T), INTENT(IN) :: a_NumTotal INTEGER(HSIZE_T), INTENT(IN) :: a_NumProc INTEGER(HSIZE_T), INTENT(IN) :: a_NumComponents REAL*8, DIMENSION(*), INTENT(IN) :: a_Values INTEGER, DIMENSION(*), INTENT(IN) :: a_WhichVals REAL*8, INTENT(IN) :: a_Minimum, a_Maximum INTEGER, INTENT(OUT) :: error