[R] HCLUST subroutine question -- FORTRAN DO loops

[Peter Dalgaard]

"David Emmith" <demmith at spadac.com> writes:

> Shown below is most of the FORTRAN subroutine named HCLUST.
> 
> My question concerns the DO loop labeled as '10'. What happened to its
> CONTINUE statement? I will assume that after FLAG(I)=.TRUE. is executed that
> control returns to DO 10 I=1,N. Am I correct?

Yes. CONTINUE is purely used for legibility in such contexts; you can
put the label on the last statement of the block instead (as Google
might have told you soon enough...)


 
> Dave
> ----------------------------
> C  Initializations
> C
>       DO 10 I=1,N
> C        We do not initialize MEMBR in order to be able to restart the
> C        algorithm from a cut.
> C        MEMBR(I)=1.
>  10      FLAG(I)=.TRUE.



-- 
   O__  ---- Peter Dalgaard             Øster Farimagsgade 5, Entr.B
  c/ /'_ --- Dept. of Biostatistics     PO Box 2099, 1014 Cph. K
 (*) \(*) -- University of Copenhagen   Denmark          Ph:  (+45) 35327918
~~~~~~~~~~ - (p.dalgaard at biostat.ku.dk)                  FAX: (+45) 35327907