J6 UNITED STATES NATIONAL MUSEUM BULLETIN 285 



1 , ( AMIN( J ) , J=NN1 , NN2 ) , ( RANGE ( J ) , J=NN1 , NN2 ) , ( AMEAN( J ) , J=NN1 , NN2 ) , ( STUV 85 



2DDV(j),J=NNl,NN2), (SDVMN(J), J=NNI , NN2 ) , (V(J), J=NN1,NN2) UV 86 



GO TO 27 UV 87 



C 



26 WRITE OUTPUT TAPE 6 , FMT7 , ( NUMBER( j) , J=NN1 , NN2) , (AMAX( J) , J=NN1 , NN2)UV 88 

 1, (AMIN(J) ,J=NN1,NN2) , (RANGE(j) , J=NN1, NN2 ) ,( AMEAN( J) , J=NN1,NN2) , (STUV 89 

 2DDV(J), J=NN1,NN2), (SDVMN(j), J=NN1,NN2), (V(j) , J=NN1,NN2) UV 90 



GO TO 27 UV 91 



C 



J>k WRITE OUTPUT TAPE 6,36 UV 92 



CALL EXIT UV 93 



C 



27 NPTEMP = NPTEMP + 1 UV 9^+ 

 Nl = N2 + 1 UV 95 

 N2 = N2 + NVAR - 1 UV 96 



C 



c 



36 FORMAT (1H1,23HAN0MAL0US VALUE IN DATA UV 97 



28 RETURN UV 98 



END UV 99 



C---_------ DASAN (SUBROUTINE BIVAR) -__-_-_ ___ 



C 



SUBROUTINE BIVAR ( NR0W1 , NR0W2 , NPTMP2 ) BVRMA 1 



C 



DIMENSION A(20) ,AMEANX(20) ,AMEANY(20) , B(20) , BASEl(20) ,DIFFER( 100,2BVRMA 2 

 1) ,DIFSQR(100,2) ,DRMA(20) ,DUMMY1 (222 ) ,DUMMY2(2*fO) ,DUMMY3( 100 , %) ,FMBVRMA 3 

 2T8 ( 96 ) , INDXBV( 80 ,k ) , PAIRS ( 20 ) , R( 20 ) , RSQ( 20 ) , SPMAX( 53 ) , STDDVX( 20 ) , BVRMA k 

 3STDDVY( 20 ) , STERRA( 20 ) , SUM2 ( 2 ) , SUMMUL( 20 ) , SUMSQ2 ( 2 ) , TOPI ( 20 ) , TX( 100BVRMA 5 



^,2),X(100,53),YMAXl(20),LGCOL(20),DUMMYMlOO,5),SLGMIN(53) BVRMA 6 



C 



COMMON K , X , NLOG , DUMMY1 , NBIVAR , FMT8 , DUMMY2 , SPMAX , DUMMY3 , INDXBV , DUMMBVRMA 7 



lYif,SLGMIN,NBVT BVRMA 8 



C 



BVRMA 9 



BVRMA 10 



BVRMA 11 



BVRMA 12 



BVRMA 13 



BVRMA Ik 



BVRMA 15 



BVRMA 16 



BVRMA 17 



BVRMA 18 



BVRMA 19 



BVRMA 20 



BVRMA 21 



BVRMA 22 



BVRMA 23 



BVRMA 2k 



BVRMA 25 



BVRMA 26 



BVRMA 27 



