1064a246eSJacob Faibussowitsch #include <petscsys.h> 2064a246eSJacob Faibussowitsch 3*d71ae5a4SJacob Faibussowitsch void testValidHeaders(PetscRandom r, PetscViewer v, PetscDraw d, PetscDrawAxis a) 4*d71ae5a4SJacob Faibussowitsch { 5064a246eSJacob Faibussowitsch /* incorrect */ 6064a246eSJacob Faibussowitsch PetscValidHeaderSpecificType(r, PETSC_VIEWER_CLASSID, 0, DMDA); 7064a246eSJacob Faibussowitsch PetscValidHeaderSpecificType(v, PETSC_DRAW_CLASSID, 0, DMDA); 8064a246eSJacob Faibussowitsch PetscValidHeaderSpecificType(d, PETSC_DRAWAXIS_CLASSID, 0, DMDA); 9064a246eSJacob Faibussowitsch PetscValidHeaderSpecificType(a, PETSC_RANDOM_CLASSID, 0, DMDA); 10064a246eSJacob Faibussowitsch 11064a246eSJacob Faibussowitsch /* correct */ 12064a246eSJacob Faibussowitsch PetscValidHeaderSpecificType(r, PETSC_RANDOM_CLASSID, 1, DMDA); 13064a246eSJacob Faibussowitsch PetscValidHeaderSpecificType(v, PETSC_VIEWER_CLASSID, 2, DMDA); 14064a246eSJacob Faibussowitsch PetscValidHeaderSpecificType(d, PETSC_DRAW_CLASSID, 3, DMDA); 15064a246eSJacob Faibussowitsch PetscValidHeaderSpecificType(a, PETSC_DRAWAXIS_CLASSID, 4, DMDA); 16064a246eSJacob Faibussowitsch 17064a246eSJacob Faibussowitsch /* incorrect */ 18064a246eSJacob Faibussowitsch PetscValidHeaderSpecific(r, PETSC_DRAW_CLASSID, 0); 19064a246eSJacob Faibussowitsch PetscValidHeaderSpecific(v, PETSC_DRAWAXIS_CLASSID, 0); 20064a246eSJacob Faibussowitsch PetscValidHeaderSpecific(d, PETSC_RANDOM_CLASSID, 0); 21064a246eSJacob Faibussowitsch PetscValidHeaderSpecific(a, PETSC_VIEWER_CLASSID, 0); 22064a246eSJacob Faibussowitsch 23064a246eSJacob Faibussowitsch /* correct */ 24064a246eSJacob Faibussowitsch PetscValidHeaderSpecific(r, PETSC_RANDOM_CLASSID, 1); 25064a246eSJacob Faibussowitsch PetscValidHeaderSpecific(v, PETSC_VIEWER_CLASSID, 2); 26064a246eSJacob Faibussowitsch PetscValidHeaderSpecific(d, PETSC_DRAW_CLASSID, 3); 27064a246eSJacob Faibussowitsch PetscValidHeaderSpecific(a, PETSC_DRAWAXIS_CLASSID, 4); 28064a246eSJacob Faibussowitsch 29064a246eSJacob Faibussowitsch /* incorrect */ 30064a246eSJacob Faibussowitsch PetscValidHeader(r, 55); 31064a246eSJacob Faibussowitsch PetscValidHeader(v, 56); 32064a246eSJacob Faibussowitsch PetscValidHeader(d, 57); 33064a246eSJacob Faibussowitsch PetscValidHeader(a, 58); 34064a246eSJacob Faibussowitsch 35064a246eSJacob Faibussowitsch /* correct */ 36064a246eSJacob Faibussowitsch PetscValidHeader(r, 1); 37064a246eSJacob Faibussowitsch PetscValidHeader(v, 2); 38064a246eSJacob Faibussowitsch PetscValidHeader(d, 3); 39064a246eSJacob Faibussowitsch PetscValidHeader(a, 4); 40064a246eSJacob Faibussowitsch return; 41064a246eSJacob Faibussowitsch } 42