Lines Matching refs:status
66 void QuitCDF PROTOARGs((char *where, CDFstatus status));
75 CDFstatus status; in main() local
239 status = CDFcreate ("TEST", numDims, dimSizes, encoding, majority, &id); in main()
241 if (status < CDF_OK) { in main()
242 if (status == CDF_EXISTS) { in main()
243 status = CDFopen ("TEST", &id); in main()
244 if (status < CDF_OK) QuitCDF ("1.0", status); in main()
246 status = CDFdeleteCDF (id); in main()
247 if (status < CDF_OK) QuitCDF ("1.1", status); in main()
249 status = CDFcreate ("TEST", numDims, dimSizes, encoding, majority, &id); in main()
250 if (status < CDF_OK) QuitCDF ("1.2", status); in main()
251 status = CDFsetFormat (id, MULTI_FILE); in main()
252 if (status < CDF_OK) QuitCDF ("1.3", status); in main()
255 QuitCDF ("1.4", status); in main()
258 status = CDFsetFormat (id, MULTI_FILE); in main()
259 if (status < CDF_OK) QuitCDF ("1.5", status); in main()
265 status = CDFcreatezVar (id, var1Name, var1DataType, var1NumElements, numDims, in main()
267 if (status < CDF_OK) QuitCDF ("2.0", status); in main()
269 status = CDFsetzVarPadValue (id, var1Num_out, &pad1); in main()
270 if (status < CDF_OK) QuitCDF ("2.1", status); in main()
272 status = CDFcreatezVar (id, var2Name, var2DataType, var2NumElements, numDims, in main()
274 if (status < CDF_OK) QuitCDF ("2.2", status); in main()
276 status = CDFsetzVarPadValue (id, var2Num_out, &pad2); in main()
277 if (status < CDF_OK) QuitCDF ("2.3", status); in main()
279 status = CDFcreatezVar (id, var3Name, var3DataType, var3NumElements, in main()
282 if (status < CDF_OK) QuitCDF ("2.4", status); in main()
284 status = CDFsetzVarPadValue (id, var3Num_out, pad3); in main()
285 if (status < CDF_OK) QuitCDF ("2.5", status); in main()
287 status = CDFsetzVarsCacheSize (id, 5L); in main()
288 if (status < CDF_OK) QuitCDF ("2.6", status); in main()
290 status = CDFgetzVarCacheSize(id, 0L, &cacheOut1); in main()
291 if (status < CDF_OK) QuitCDF ("2.8", status); in main()
293 status = CDFgetzVarPadValue(id, 0L, &pad1out); in main()
294 if (status < CDF_OK) QuitCDF ("2.9", status); in main()
296 status = CDFgetzVarCacheSize(id, 1L, &cacheOut2); in main()
297 if (status < CDF_OK) QuitCDF ("2.10", status); in main()
299 status = CDFgetzVarPadValue(id, 1L, &pad2out); in main()
300 if (status < CDF_OK) QuitCDF ("2.11", status); in main()
302 status = CDFgetzVarCacheSize(id, 2L, &cacheOut3); in main()
303 if (status < CDF_OK) QuitCDF ("2.12", status); in main()
305 status = CDFgetzVarPadValue(id, 2L, &pad3out); in main()
306 if (status < CDF_OK) QuitCDF ("2.13", status); in main()
308 if (cacheOut1 != 5) QuitCDF ("2.14", status); in main()
309 if (cacheOut2 != 5) QuitCDF ("2.15", status); in main()
310 if (cacheOut3 != 5) QuitCDF ("2.16", status); in main()
311 if (pad1out != pad1) QuitCDF ("2.17", status); in main()
312 if (pad2out != pad2) QuitCDF ("2.18", status); in main()
313 if (strcmp(pad3out,pad3)) QuitCDF ("2.19", status); in main()
315 status = CDFsetzVarCacheSize(id, 0L, 4L); in main()
316 if (status < CDF_OK) QuitCDF ("2.20", status); in main()
318 status = CDFsetzVarCacheSize(id, 2L, 8L); in main()
319 if (status < CDF_OK) QuitCDF ("2.21", status); in main()
321 status = CDFgetzVarCacheSize(id, 0L, &cacheOut1); in main()
322 if (status < CDF_OK) QuitCDF ("2.22", status); in main()
324 status = CDFgetzVarCacheSize(id, 1L, &cacheOut2); in main()
325 if (status < CDF_OK) QuitCDF ("2.23", status); in main()
327 status = CDFgetzVarCacheSize(id, 2L, &cacheOut3); in main()
328 if (status < CDF_OK) QuitCDF ("2.24", status); in main()
330 if (cacheOut1 != 4) QuitCDF ("2.25", status); in main()
331 if (cacheOut2 != 5) QuitCDF ("2.26", status); in main()
332 if (cacheOut3 != 8) QuitCDF ("2.27", status); in main()
338 status = CDFsetzVarDataSpec (id, 0L, var1DataTypeNew); in main()
339 if (status < CDF_OK) QuitCDF ("3.0", status); in main()
341 status = CDFsetzVarRecVariance (id, 0L, var1RecVarianceNew); in main()
342 if (status < CDF_OK) QuitCDF ("3.1", status); in main()
344 status = CDFsetzVarDimVariances (id, 0L, var1DimVariancesNew); in main()
345 if (status < CDF_OK) QuitCDF ("3.2", status); in main()
347 status = CDFsetzVarInitialRecs (id, 0L, 1L); in main()
348 if (status < CDF_OK) QuitCDF ("3.3", status); in main()
350 status = CDFsetzVarDataSpec (id, 2L, var3DataTypeNew); in main()
351 if (status < CDF_OK) QuitCDF ("3.4", status); in main()
353 status = CDFsetzVarRecVariance (id, 2L, var3RecVarianceNew); in main()
354 if (status < CDF_OK) QuitCDF ("3.5", status); in main()
356 status = CDFsetzVarDimVariances (id, 2L, var3DimVariancesNew); in main()
357 if (status < CDF_OK) QuitCDF ("3.6", status); in main()
359 status = CDFsetzVarInitialRecs (id, 2L, 1L); in main()
360 if (status < CDF_OK) QuitCDF ("3.7", status); in main()
366 status = CDFcloseCDF (id); in main()
367 if (status < CDF_OK) QuitCDF ("4.0", status); in main()
373 status = CDFopen ("TEST", &id); in main()
374 if (status < CDF_OK) QuitCDF ("5.0", status); in main()
376 status = CDFsetDecoding (id, HOST_DECODING); in main()
377 if (status < CDF_OK) QuitCDF ("5.1", status); in main()
383 status = CDFdeleteCDF (id); in main()
384 if (status < CDF_OK) QuitCDF ("6.0", status); in main()
390 status = CDFcreateCDF("TEST", &id); in main()
391 if (status < CDF_OK) QuitCDF ("7.0", status); in main()
393 status = CDFsetEncoding (id, NETWORK_ENCODING); in main()
394 if (status < CDF_OK) QuitCDF ("7.1", status); in main()
396 status = CDFsetMajority (id, ROW_MAJOR); in main()
397 if (status < CDF_OK) QuitCDF ("7.2", status); in main()
399 status = CDFsetFormat (id, SINGLE_FILE); in main()
400 if (status < CDF_OK) QuitCDF ("7.3", status); in main()
402 status = CDFsetDecoding (id, HOST_DECODING); in main()
403 if (status < CDF_OK) QuitCDF ("7.4", status); in main()
409 status = CDFcreatezVar (id, var1Name, var1DataType, var1NumElements, numDims, in main()
411 if (status < CDF_OK) QuitCDF ("8.0", status); in main()
413 status = CDFsetzVarAllocRecords (id, var1Num_out, allocRecs1); in main()
414 if (status < CDF_OK) QuitCDF ("8.1", status); in main()
416 status = CDFsetzVarBlockingFactor (id, var1Num_out, blockingfactor1); in main()
417 if (status < CDF_OK) QuitCDF ("8.2", status); in main()
419 status = CDFcreatezVar (id, var2Name, var2DataType, var2NumElements, numDims, in main()
421 if (status < CDF_OK) QuitCDF ("8.3", status); in main()
423 status = CDFsetzVarAllocRecords (id, var2Num_out, allocRecs2); in main()
424 if (status < CDF_OK) QuitCDF ("8.4", status); in main()
426 status = CDFsetzVarBlockingFactor (id, var2Num_out, blockingfactor2); in main()
427 if (status < CDF_OK) QuitCDF ("8.5", status); in main()
429 status = CDFcreatezVar (id, var3Name, var3DataType, var3NumElements, in main()
432 if (status < CDF_OK) QuitCDF ("8.6", status); in main()
434 status = CDFsetzVarAllocRecords (id, var3Num_out, allocRecs3); in main()
435 if (status < CDF_OK) QuitCDF ("8.7", status); in main()
437 status = CDFsetzVarBlockingFactor (id, var3Num_out, blockingfactor3); in main()
438 if (status < CDF_OK) QuitCDF ("8.8", status); in main()
448 status = CDFputzVarData (id, var1Num_out, recNum, indices, in main()
450 if (status < CDF_OK) QuitCDF ("9.0", status); in main()
452 status = CDFputzVarData (id, var2Num_out, recNum, indices, in main()
454 if (status < CDF_OK) QuitCDF ("9.1", status); in main()
459 status = CDFputzVarData (id, var3Num_out, recNum, zIndicesA, in main()
461 if (status < CDF_OK) QuitCDF ("9.2", status); in main()
472 status = CDFgetzVarData (id, var1Num_out, recNum, indices, in main()
474 if (status < CDF_OK) QuitCDF ("10.0", status); in main()
476 status = CDFgetzVarData (id, var2Num_out, recNum, indices, in main()
478 if (status < CDF_OK) QuitCDF ("10.1", status); in main()
480 if (var1Value_out != var1Values[x0][x1]) QuitCDF ("10.2", status); in main()
481 if (var2Value_out != var2Values[x0][x1]) QuitCDF ("10.3", status); in main()
486 status = CDFgetzVarData (id, var3Num_out, recNum, zIndicesA, in main()
488 if (status < CDF_OK) QuitCDF ("10.4", status); in main()
491 if (var3Value_out[i] != var3Values[x0][i]) QuitCDF ("10.5", status); in main()
508 status = CDFhyperPutzVarData (id, var1Num_out, recStart, recCount, recInterval, in main()
510 if (status < CDF_OK) QuitCDF ("11.0", status); in main()
512 status = CDFhyperPutzVarData (id, var2Num_out, recStart, recCount, recInterval, in main()
514 if (status < CDF_OK) QuitCDF ("11.1", status); in main()
523 status = CDFhyperPutzVarData (id, var3Num_out, recStart, recCount, in main()
526 if (status < CDF_OK) QuitCDF ("11.2", status); in main()
532 status = CDFhyperGetzVarData (id, var1Num_out, recStart, recCount, recInterval, in main()
534 if (status < CDF_OK) QuitCDF ("12.0", status); in main()
536 status = CDFhyperGetzVarData (id, var2Num_out, recStart, recCount, recInterval, in main()
538 if (status < CDF_OK) QuitCDF ("12.1", status); in main()
543 QuitCDF ("12.2", status); in main()
545 QuitCDF ("12.3", status); in main()
548 status = CDFhyperGetzVarData (id, var3Num_out, recStart, recCount, in main()
551 if (status < CDF_OK) QuitCDF ("12.4", status); in main()
556 QuitCDF ("12.5", status); in main()
564 status = CDFsetzVarSeqPos (id, var3Num_out, recStart, zIndicesA); in main()
565 if (status < CDF_OK) QuitCDF ("14.0", status); in main()
567 status = CDFgetzVarSeqData (id, var3Num_out, var3Value_out); in main()
568 if (status < CDF_OK) QuitCDF ("14.1", status); in main()
570 status = CDFputzVarSeqData (id, var3Num_out, var3Value_out); in main()
571 if (status < CDF_OK) QuitCDF ("14.2", status); in main()
573 status = CDFgetzVarSeqPos (id, var3Num_out, &recNumOut, indicesOut); in main()
574 if (status < CDF_OK) QuitCDF ("14.3", status); in main()
576 if (recNumOut != recStart) QuitCDF ("14.4", status); in main()
577 if (indicesOut[0] != zIndicesA[0] + 2) QuitCDF ("14.5", status); in main()
583 status = CDFcreateAttr (id, attrName, attrScope, &attrNum_out); in main()
584 if (status < CDF_OK) QuitCDF ("16.0", status); in main()
586 status = CDFcreateAttr (id, attrName2, attrScope2, &attrNum_out); in main()
587 if (status < CDF_OK) QuitCDF ("16.1", status); in main()
589 status = CDFcreateAttr (id, attrName3, attrScope3, &attrNum_out); in main()
590 if (status < CDF_OK) QuitCDF ("16.2", status); in main()
596 status = CDFputAttrgEntry (id, 0L, entryNum, entryDataType, entryNumElems, in main()
598 if (status < CDF_OK) QuitCDF ("17.0", status); in main()
600 status = CDFputAttrzEntry (id, 1L, CDFgetVarNum(id, var1Name), CDF_BYTE, 1L, in main()
602 if (status < CDF_OK) QuitCDF ("17.1", status); in main()
604 status = CDFputAttrzEntry (id, 2L, CDFgetVarNum(id, var2Name), CDF_REAL8, 1L, in main()
606 if (status < CDF_OK) QuitCDF ("17.2", status); in main()
612 status = CDFgetAttrgEntry (id, 0L, entryNum, &entryValue_out); in main()
613 if (status < CDF_OK) QuitCDF ("19.1", status); in main()
615 status = CDFgetAttrzEntry (id, 1L, CDFgetVarNum(id, var1Name), &zEntryValue1Out); in main()
616 if (status < CDF_OK) QuitCDF ("19.3", status); in main()
618 status = CDFgetAttrzEntry (id, 2L, CDFgetVarNum(id, var2Name), &zEntryValue2Out); in main()
619 if (status < CDF_OK) QuitCDF ("19.5", status); in main()
621 if (entryValue_out != entryValue) QuitCDF ("19.6", status); in main()
622 if (zEntryValue1 != zEntryValue1Out) QuitCDF ("19.7", status); in main()
623 if (zEntryValue2 != zEntryValue2Out) QuitCDF ("19.8", status); in main()
629 status = CDFconfirmzVarExistence (id, var3Name); in main()
630 if (status < CDF_OK) QuitCDF ("20.0", status); in main()
632 status = CDFconfirmzVarExistence (id, var1Name); in main()
633 if (status < CDF_OK) QuitCDF ("20.1", status); in main()
635 status = CDFconfirmAttrExistence (id, attrName3); in main()
636 if (status < CDF_OK) QuitCDF ("20.2", status); in main()
638 status = CDFconfirmgEntryExistence (id, 0L, entryNum); in main()
639 if (status < CDF_OK) QuitCDF ("20.3", status); in main()
641 status = CDFconfirmzEntryExistence (id, 1L, CDFgetVarNum(id, var1Name)); in main()
642 if (status < CDF_OK) QuitCDF ("20.5", status); in main()
648 status = CDFgetLibraryVersion (&version_out, &release_out, &increment_out, in main()
650 if (status < CDF_OK) QuitCDF ("21.0", status); in main()
652 status = CDFgetLibraryCopyright (CopyrightText); in main()
653 if (status < CDF_OK) QuitCDF ("21.1", status); in main()
659 status = CDFgetFormat (id, &formatOut); in main()
660 if (status < CDF_OK) QuitCDF ("22.0", status); in main()
662 status = CDFgetEncoding (id, &encoding_out); in main()
663 if (status < CDF_OK) QuitCDF ("22.3", status); in main()
665 status = CDFgetMajority (id, &majority_out); in main()
666 if (status < CDF_OK) QuitCDF ("22.4", status); in main()
668 status = CDFgetzVarsMaxWrittenRecNum (id, &maxRec_out); in main()
669 if (status < CDF_OK) QuitCDF ("22.5", status); in main()
671 status = CDFgetNumzVars (id, &numZvars); in main()
672 if (status < CDF_OK) QuitCDF ("22.7", status); in main()
674 status = CDFgetNumAttributes (id, &numAttrs_out); in main()
675 if (status < CDF_OK) QuitCDF ("22.8", status); in main()
677 if (formatOut != SINGLE_FILE) QuitCDF ("22.9", status); in main()
678 if (encoding_out != actual_encoding) QuitCDF ("22.12", status); in main()
679 if (majority_out != majority) QuitCDF ("22.13", status); in main()
680 if (maxRec_out != 2) QuitCDF ("22.14", status); in main()
681 if (numZvars != 3) QuitCDF ("22.16", status); in main()
682 if (numAttrs_out != 3) QuitCDF ("22.17", status); in main()
689 if (status < CDF_OK) QuitCDF ("23.0", status); in main()
692 if (status < CDF_OK) QuitCDF ("23.1", status); in main()
695 if (status < CDF_OK) QuitCDF ("23.2", status); in main()
697 if (attrNum_out != 2) QuitCDF ("23.3", status); in main()
698 if (varNum_out1 != 1) QuitCDF ("23.4", status); in main()
699 if (varNum_out2 != 2) QuitCDF ("23.5", status); in main()
705 status = CDFrenamezVar (id, CDFgetVarNum (id, var1Name), new_var1Name); in main()
706 if (status < CDF_OK) QuitCDF ("24.0", status); in main()
708 status = CDFrenamezVar (id, CDFgetVarNum (id, var2Name), new_var2Name); in main()
709 if (status < CDF_OK) QuitCDF ("24.1", status); in main()
711 status = CDFrenamezVar (id, CDFgetVarNum (id, var3Name), new_var3Name); in main()
712 if (status < CDF_OK) QuitCDF ("24.2", status); in main()
718 status = CDFputzVarsRecordDatabyNumbers (id, nVars, varNs1, 2L, in main()
720 if (status < CDF_OK) QuitCDF ("25.0", status); in main()
722 status = CDFputzVarsRecordDatabyNumbers (id, nVars, varNs2, 2L, in main()
724 if (status < CDF_OK) QuitCDF ("25.1", status); in main()
726 status = CDFgetzVarsRecordDatabyNumbers (id, nVars, varNs1, 2L, in main()
728 if (status < CDF_OK) QuitCDF ("25.2", status); in main()
730 status = CDFgetzVarsRecordDatabyNumbers (id, nVars, varNs2, 2L, in main()
732 if (status < CDF_OK) QuitCDF ("25.3", status); in main()
735 sizeof(varsRecBuffer1))) QuitCDF ("25.4", status); in main()
737 sizeof(varsRecBuffer2))) QuitCDF ("25.5", status); in main()
743 status = CDFgetzVarName (id, var1Num_out, var1Name_out); in main()
744 if (status < CDF_OK) QuitCDF ("26.0", status); in main()
746 status = CDFgetzVarDataType (id, var1Num_out, &var1DataType_out); in main()
747 if (status < CDF_OK) QuitCDF ("26.1", status); in main()
749 status = CDFgetzVarNumElements (id, var1Num_out, &var1NumElements_out); in main()
750 if (status < CDF_OK) QuitCDF ("26.2", status); in main()
752 status = CDFgetzVarRecVariance (id, var1Num_out, &var1RecVariance_out); in main()
753 if (status < CDF_OK) QuitCDF ("26.3", status); in main()
755 status = CDFgetzVarDimVariances (id, var1Num_out, var1DimVariances_out); in main()
756 if (status < CDF_OK) QuitCDF ("26.4", status); in main()
758 status = CDFgetzVarBlockingFactor (id, var1Num_out, &blockingfactorOut1); in main()
759 if (status < CDF_OK) QuitCDF ("26.5", status); in main()
761 status = CDFgetzVarMaxAllocRecNum (id, var1Num_out, &maxAllocOut1); in main()
762 if (status < CDF_OK) QuitCDF ("26.6", status); in main()
764 status = CDFgetzVarMaxWrittenRecNum (id, var1Num_out, &maxRecOut1); in main()
765 if (status < CDF_OK) QuitCDF ("26.7", status); in main()
767 if (strcmp(var1Name_out,new_var1Name) != 0) QuitCDF ("26.11", status); in main()
768 if (var1DataType_out != var1DataType) QuitCDF ("26.12", status); in main()
769 if (var1NumElements_out != var1NumElements) QuitCDF ("26.13", status); in main()
770 if (var1RecVariance_out != var1RecVariance) QuitCDF ("26.14", status); in main()
771 if (var1Num_out != 0L) QuitCDF ("26.15", status); in main()
772 if (blockingfactorOut1 != blockingfactor1) QuitCDF ("26.16", status); in main()
773 if (maxAllocOut1 + 1 != allocRecs1) QuitCDF ("26.17", status); in main()
774 if (maxRecOut1 != 2L) QuitCDF ("26.18", status); in main()
778 QuitCDF ("26.19", status); in main()
782 status = CDFgetzVarName (id, var2Num_out, var2Name_out); in main()
783 if (status < CDF_OK) QuitCDF ("26.20", status); in main()
785 status = CDFgetzVarDataType (id, var2Num_out, &var2DataType_out); in main()
786 if (status < CDF_OK) QuitCDF ("26.21", status); in main()
788 status = CDFgetzVarNumElements (id, var2Num_out, &var2NumElements_out); in main()
789 if (status < CDF_OK) QuitCDF ("26.22", status); in main()
791 status = CDFgetzVarRecVariance (id, var2Num_out, &var2RecVariance_out); in main()
792 if (status < CDF_OK) QuitCDF ("26.23", status); in main()
794 status = CDFgetzVarDimVariances (id, var2Num_out, var2DimVariances_out); in main()
795 if (status < CDF_OK) QuitCDF ("26.24", status); in main()
797 status = CDFgetzVarBlockingFactor (id, var2Num_out, &blockingfactorOut2); in main()
798 if (status < CDF_OK) QuitCDF ("26.25", status); in main()
800 status = CDFgetzVarMaxAllocRecNum (id, var2Num_out, &maxAllocOut2); in main()
801 if (status < CDF_OK) QuitCDF ("26.26", status); in main()
803 status = CDFgetzVarMaxWrittenRecNum (id, var2Num_out, &maxRecOut2); in main()
804 if (status < CDF_OK) QuitCDF ("26.27", status); in main()
806 if (strcmp(var2Name_out,new_var2Name) != 0) QuitCDF ("26.31", status); in main()
807 if (var2DataType_out != var2DataType) QuitCDF ("26.32", status); in main()
808 if (var2NumElements_out != var2NumElements) QuitCDF ("26.33", status); in main()
809 if (var2RecVariance_out != var2RecVariance) QuitCDF ("26.34", status); in main()
810 if (var2Num_out != 1L) QuitCDF ("26.35", status); in main()
811 if (blockingfactorOut2 != blockingfactor2) QuitCDF ("26.36", status); in main()
812 if (maxAllocOut2 + 1 != allocRecs2) QuitCDF ("26.37", status); in main()
813 if (maxRecOut2 != 2L) QuitCDF ("26.38", status); in main()
818 QuitCDF ("26.39", status); in main()
822 status = CDFgetzVarName (id, var3Num_out, var3Name_out); in main()
823 if (status < CDF_OK) QuitCDF ("26.40", status); in main()
825 status = CDFgetzVarDataType (id, var3Num_out, &var3DataType_out); in main()
826 if (status < CDF_OK) QuitCDF ("26.41", status); in main()
828 status = CDFgetzVarNumElements (id, var3Num_out, &var3NumElements_out); in main()
829 if (status < CDF_OK) QuitCDF ("26.42", status); in main()
831 status = CDFgetzVarRecVariance (id, var3Num_out, &var3RecVariance_out); in main()
832 if (status < CDF_OK) QuitCDF ("26.43", status); in main()
834 status = CDFgetzVarDimVariances (id, var3Num_out, var3DimVariances_out); in main()
835 if (status < CDF_OK) QuitCDF ("26.44", status); in main()
837 status = CDFgetzVarNumDims (id, var3Num_out, &zNumDimsA_out); in main()
838 if (status < CDF_OK) QuitCDF ("26.45", status); in main()
840 status = CDFgetzVarDimSizes (id, var3Num_out, zDimSizesA_out); in main()
841 if (status < CDF_OK) QuitCDF ("26.46", status); in main()
843 status = CDFgetzVarBlockingFactor (id, var3Num_out, &blockingfactorOut3); in main()
844 if (status < CDF_OK) QuitCDF ("26.47", status); in main()
846 status = CDFgetzVarMaxAllocRecNum (id, var3Num_out, &maxAllocOut3); in main()
847 if (status < CDF_OK) QuitCDF ("26.48", status); in main()
849 status = CDFgetzVarMaxWrittenRecNum (id, var3Num_out, &maxRecOut3); in main()
850 if (status < CDF_OK) QuitCDF ("26.49", status); in main()
852 if (strcmp(var3Name_out,new_var3Name) != 0) QuitCDF ("26.53", status); in main()
853 if (var3DataType_out != var3DataType) QuitCDF ("26.54", status); in main()
854 if (var3NumElements_out != var3NumElements) QuitCDF ("26.55", status); in main()
855 if (var3RecVariance_out != var3RecVariance) QuitCDF ("26.56", status); in main()
856 if (zNumDimsA_out != zNumDimsA) QuitCDF ("26.57", status); in main()
857 if (var3Num_out != 2L) QuitCDF ("26.58", status); in main()
858 if (blockingfactorOut3 != blockingfactor3) QuitCDF ("26.59", status); in main()
859 if (maxAllocOut3 + 1 != allocRecs3) QuitCDF ("26.60", status); in main()
860 if (maxRecOut3 != 2L) QuitCDF ("26.61", status); in main()
864 QuitCDF ("26.62", status); in main()
867 QuitCDF ("26.63", status); in main()
875 status = CDFrenameAttr (id, CDFgetAttrNum (id, attrName), new_attrName); in main()
876 if (status < CDF_OK) QuitCDF ("27.0", status); in main()
882 status = CDFgetAttrName (id, CDFgetAttrNum (id, new_attrName), attrName_out); in main()
883 if (status < CDF_OK) QuitCDF ("28.0", status); in main()
885 status = CDFgetAttrScope (id, CDFgetAttrNum (id, new_attrName), in main()
887 if (status < CDF_OK) QuitCDF ("28.1", status); in main()
889 status = CDFgetAttrMaxgEntry (id, CDFgetAttrNum (id, new_attrName), in main()
891 if (status < CDF_OK) QuitCDF ("28.2", status); in main()
893 if (strcmp(attrName_out,new_attrName) != 0) QuitCDF ("28.4", status); in main()
894 if (attrScope_out != attrScope) QuitCDF ("28.5", status); in main()
895 if (maxEntry_out != entryNum) QuitCDF ("28.6", status); in main()
901 status = CDFgetAttrgEntryDataType (id, 0L, entryNum, &entryDataType_out); in main()
902 if (status < CDF_OK) QuitCDF ("29.0", status); in main()
904 status = CDFgetAttrgEntryNumElements (id, 0L, entryNum, &entryNumElems_out); in main()
905 if (status < CDF_OK) QuitCDF ("29.1", status); in main()
907 if (entryDataType_out != entryDataType) QuitCDF ("29.2", status); in main()
908 if (entryNumElems_out != entryNumElems) QuitCDF ("29.3", status); in main()
910 status = CDFgetAttrzEntryDataType (id, 1L, 0L, &entryDataType_out); in main()
911 if (status < CDF_OK) QuitCDF ("29.4", status); in main()
913 status = CDFgetAttrzEntryNumElements (id, 1L, 0L, &entryNumElems_out); in main()
914 if (status < CDF_OK) QuitCDF ("29.5", status); in main()
916 if (entryDataType_out != CDF_BYTE) QuitCDF ("29.6", status); in main()
917 if (entryNumElems_out != 1L) QuitCDF ("29.7", status); in main()
919 status = CDFgetAttrzEntryDataType (id, 2L, 1L, &entryDataType_out); in main()
920 if (status < CDF_OK) QuitCDF ("29.8", status); in main()
922 status = CDFgetAttrzEntryNumElements (id, 2L, 1L, &entryNumElems_out); in main()
923 if (status < CDF_OK) QuitCDF ("29.9", status); in main()
925 if (entryDataType_out != CDF_REAL8) QuitCDF ("29.10", status); in main()
926 if (entryNumElems_out != 1L) QuitCDF ("29.11", status); in main()
932 status = CDFgetStatusText (CDF_OK, errorText); in main()
933 if (status < CDF_OK) QuitCDF ("30.0", status); in main()
939 status = CDFsetzMode (id, zMODEon2); in main()
940 if (status < CDF_OK) QuitCDF ("31.0", status); in main()
942 status = CDFgetNumgAttributes (id, &numGattrs); in main()
943 if (status < CDF_OK) QuitCDF ("31.1", status); in main()
945 status = CDFgetNumvAttributes (id, &numVattrs); in main()
946 if (status < CDF_OK) QuitCDF ("31.2", status); in main()
948 status = CDFgetNumzVars (id, &numZvars); in main()
949 if (status < CDF_OK) QuitCDF ("31.4", status); in main()
951 status = CDFgetAttrMaxgEntry (id, 0L, &maxGentry); in main()
952 if (status < CDF_OK) QuitCDF ("31.5", status); in main()
954 status = CDFgetNumAttrgEntries (id, 0L, &numGentries); in main()
955 if (status < CDF_OK) QuitCDF ("31.6", status); in main()
957 status = CDFgetzVarsMaxWrittenRecNum (id, &maxRecOut); in main()
958 if (status < CDF_OK) QuitCDF ("31.7", status); in main()
960 status = CDFgetAttrMaxzEntry (id, 1L, &maxZentry); in main()
961 if (status < CDF_OK) QuitCDF ("31.10", status); in main()
963 status = CDFgetNumAttrzEntries (id, 1L, &numZentries); in main()
964 if (status < CDF_OK) QuitCDF ("31.11", status); in main()
966 status = CDFsetzMode (id, zMODEoff); in main()
967 if (status < CDF_OK) QuitCDF ("31.12", status); in main()
969 status = CDFinquire (id,&numDimsX,dimSizesX,&encodingX,&majorityX,&maxrRecX, in main()
971 if (status < CDF_OK) QuitCDF ("31.12a", status); in main()
973 status = CDFinquireCDF (id,&numDimsY,dimSizesY,&encodingY,&majorityY,&maxrRecY, in main()
975 if (status < CDF_OK) QuitCDF ("31.12b", status); in main()
977 if (numGattrs != 1) QuitCDF ("31.13", status); in main()
978 if (numVattrs != 2) QuitCDF ("31.14", status); in main()
979 if (numZvars != 3) QuitCDF ("31.16", status); in main()
980 if (maxGentry != entryNum) QuitCDF ("31.17", status); in main()
981 if (numGentries != 1) QuitCDF ("31.18", status); in main()
982 if (maxZentry != 0) QuitCDF ("31.21", status); in main()
983 if (numZentries != 1) QuitCDF ("31.22", status); in main()
984 if (maxRecOut != 2L) QuitCDF ("31.23", status); in main()
985 if (numDimsX != numDimsY || numDimsX != 0) QuitCDF ("31.24", status); in main()
986 if (encodingX != encodingY || encodingX != NETWORK_ENCODING) QuitCDF ("31.25", status); in main()
987 if (majorityX != majorityY || majorityX != ROW_MAJOR) QuitCDF ("31.26", status); in main()
989 if (nrVarsX != nrVarsY || nrVarsX != 0) QuitCDF ("31.28", status); in main()
990 if (nAttrsX != nAttrsY || nAttrsX != 3) QuitCDF ("31.29", status); in main()
991 if (nzVarsY != 3) QuitCDF ("31.30", status); in main()
992 if (maxzRecY != 2) QuitCDF ("31.31", status); in main()
998 status = CDFclosezVar (id, 0L); in main()
999 if (status != SINGLE_FILE_FORMAT) QuitCDF ("32.0", status); in main()
1001 status = CDFclosezVar (id, 2L); in main()
1002 if (status != SINGLE_FILE_FORMAT) QuitCDF ("32.1", status); in main()
1008 status = CDFsetAttrgEntryDataSpec (id, 0L, entryNum, entryDataTypeNew); in main()
1009 if (status < CDF_OK) QuitCDF ("33.0", status); in main()
1011 status = CDFsetAttrzEntryDataSpec (id, 1L, CDFgetVarNum(id, new_var1Name), in main()
1013 if (status < CDF_OK) QuitCDF ("33.1", status); in main()
1015 status = CDFsetAttrzEntryDataSpec (id, 2L, CDFgetVarNum(id, new_var2Name), in main()
1017 if (status < CDF_OK) QuitCDF ("33.2", status); in main()
1019 status = CDFsetAttrScope (id, 0L, VARIABLE_SCOPE); in main()
1020 if (status < CDF_OK) QuitCDF ("33.3", status); in main()
1022 status = CDFsetAttrScope (id, 0L, GLOBAL_SCOPE); in main()
1023 if (status < CDF_OK) QuitCDF ("33.4", status); in main()
1029 status = CDFdeleteAttrgEntry (id, 0L, entryNum); in main()
1030 if (status < CDF_OK) QuitCDF ("34.0", status); in main()
1032 status = CDFdeleteAttrzEntry (id, 1L, 0L); in main()
1033 if (status < CDF_OK) QuitCDF ("34.1", status); in main()
1035 status = CDFdeleteAttrzEntry (id, 2L, 1L); in main()
1036 if (status < CDF_OK) QuitCDF ("34.2", status); in main()
1038 status = CDFdeleteAttr (id, CDFgetAttrNum(id, new_attrName)); in main()
1039 if (status < CDF_OK) QuitCDF ("34.3", status); in main()
1041 status = CDFdeletezVar (id, CDFgetVarNum(id, new_var1Name)); in main()
1042 if (status < CDF_OK) QuitCDF ("34.4", status); in main()
1044 status = CDFdeletezVar (id, CDFgetVarNum(id, new_var3Name)); in main()
1045 if (status < CDF_OK) QuitCDF ("34.5", status); in main()
1051 status = CDFcloseCDF (id); in main()
1052 if (status < CDF_OK) QuitCDF ("35.0", status); in main()
1066 void QuitCDF (where, status) in QuitCDF() argument
1068 CDFstatus status;
1072 if (status < CDF_OK) {
1073 status = CDFgetStatusText (status, text);
1076 status = CDFcloseCDF (id);