NAME: SPINMODEL_TEST.PRO PURPOSE: Perform consistency checks on a spin model. CATEGORY: TDAS CALLING SEQUENCE: spinmodel_test,model_ptr INPUTS: model_ptr: A pointer to a spinmodel structure, obtained from the spinmodel_common block or the spinmodel_get_ptr() function. This input must be a scalar. OUTPUTS: Prints "PASS"/"FAIL" messages depending on outcome of tests. KEYWORDS: None. PROCEDURE: Validate model_ptr input argument. Compare spin model capacity to actual number of segments. Validate pointer to model segments. Call segment_test on each model segment, check for any failures. Examine boundaries of adjacent segments, making sure time and spin_number endpoints are identical across each pair. Exercise spinmodel_interp_n by retrieving modeled sun pulse times by spin number. Exercise spinmodel_interp_t by recalculating the spin count and spin phase at each modeled sun pulse time. Cross check results of spinmodel_interp_n and spinmodel_interp_t to verify that the expected values are produced within modest tolerances (allowable phase error .01 deg at each modeled sun pulse time). EXAMPLE: model_ptr=spinmodel_get_ptr('a') spinmodel_test,model_ptr Written by: Jim Lewis (jwl@ssl.berkeley.edu) Change Date: 2007-10-08