} END /********************** CrossCorrelationTable(s) ******************/ FORM (CrossCorrelationTableList_createTestSet, U"CrossCorrelationTableList: Create test set", U"CrossCorrelationTableList: Create test set...") WORD (U"Name", U"5x5") NATURAL (U"Matrix dimension", U"5") NATURAL (U"Number of matrices", U"20") BOOLEAN (U"First is positive definite", 1) REAL (U"Sigma", U"0.02") OK DO autoCrossCorrelationTableList thee = CrossCorrelationTableList_createTestSet (GET_INTEGER (U"Matrix dimension"), GET_INTEGER (U"Number of matrices"), GET_INTEGER (U"First is positive definite"), GET_REAL (U"Sigma")); praat_new (thee.move(), GET_STRING (U"Name")); END FORM (CrossCorrelationTable_createSimple, U"Create simple CrossCorrelationTable", 0) WORD (U"Name", U"ct") SENTENCE (U"Cross correlations", U"1.0 0.0 1.0") SENTENCE (U"Centroid", U"0.0 0.0") NATURAL (U"Number of samples", U"100") OK DO autoCrossCorrelationTable thee = CrossCorrelationTable_createSimple (GET_STRING (U"Cross correlations"), GET_STRING (U"Centroid"), GET_INTEGER (U"Number of samples")); praat_new (thee.move(), GET_STRING (U"Name")); END FORM (MixingMatrix_createSimple, U"Create simple MixingMatrix", 0)