CALL SEQUENCE... binning TSIN MEANTS COLAPSE INPUT OUTPUT [-a VAL1 -b VAL2] AUTHOR - B.Dugas, OCTOBRE 22/85. LAST REVISION: $Header: Autres-corrections-d-usages-de-MAXW-NWDS-modifs-dans-GGSIGN-SIGNAG @ 2018-06-05 17:00:06 -0400 (dugas) $ DESCRIPTION... binning - IDENTIFIES MEAN PROPRETIES BY THE BIN METHOD. PURPOSE - DETERMINE UNE MOYENNE A LONG TERME EN UTILISANT LA METHODE DES BOITES. LE PROGRAMME LIT SUR INPUT LE NOMBRE DE CYCLES CY ET NOMBRE DESIRE DE BOITES DISTINCTES BC PAR CYCLES. UNE BOITE DISTINCTE PEUT ETRE UNE JOURNEE OU CINQ JOURNEES OU ...; CES BOITES DOIVENT TOUTES CORRESPONDRE A PLUS D'UN POINT DE TSIN. INPUT FILE... TSIN = EST N'IMPORTE QUEL FICHIER DE SERIES TEMPORELLES. CES SERIES NE DOIVENT PAS NECESSAIREMENT ETRE TOUTES DE MEME SORTE, NOM ET NIVEAU. ELLES DOIVENT TOUTES ETRE DE MEME LONGUEUR. OUTPUT FILES... MEANTS = CONTIENT DES SERIES TEMPORELLES SE COMPOSANT TOUTES DE CY CYCLES IDENTIQUES. CES SERIES SONT DE LONGUEUR CY*BC. CES CYCLES SONT LA MOYENNE DES CY CYCLES DE TSIN. COLAPSE= EST UN FICHIER DE SERIES TEMPORELLES DE MEME LONGUEUR QUE MEANTS. CHAQUE POINT DE CHAQUE CYCLE EST LA MOYENNE D'UN BOITE DANS LE CYCLE CORRESPONDANT DE TSIN. INPUT PARAMETERS... CY (a) = NOMBRE DE CYCLES COMPLET DANS LES SERIES D'ENTREES. BC (b) = NOMBRE DE BOITES DISTINCTES DANS CHAQUE CYCLE. READ(5,5000) CY,BC 5000 FORMAT(10X,2I5) EXAMPLE OF INPUT CARD... BINNING 20 365 0123456789012345678901234567890123456789012345678901234567890 1 2 3 4 5 6 7 EXIT CONDITIONS... 0 NO PROBLEMS 1 TSIN NOT IN TIME SERIES FORMAT 2 TIME SERIES TOO LARGE 3 CY*BC LONGER THAN INPUT TIMME SERIES 4 UNABLE TO READ TSIN 5 DATA MORE THAN ONE SIZE OR NOT IN TIME SERIES FORMAT 6 PREMATURE END OF FILE ON TSIN 7 PREMATURE END OF FILE ON INPUT 8 MEMORY ALLOCATION PROBLEM