anchor.diff:    ! The input and output connections are opened and the commenting
     ! style is changed to comply with the FORTRAN95 standard. Line
     ! breaks are removed.
  -  !*****************************************************************************
  -
  -	!Interface to IMSL replacements
  -	USE IMSL_REPLACEMENTS
  +  !***************************************************************************** 
  +
  +  ! Interface to IMSL replacements
  +  USE IMSL_REPLACEMENTS
     
   !********************************************************
   !*  PROGRAM TO CONSTRUCT MONTE CARLO DATA FOR DP MODEL  *
  
positive.code:       INTEGER X1,X2,E,T
  
  
  ! Open files
  open(9,file='in1a.txt')
    
  open(10,file='otest.txt')
    
  open(11,file='ftest.txt')
  
  
        READ(9,1500) NPER,NPOP,DRAW,DRAW1,TAU
  
negative.code: 
  END SUBROUTINE 
  
  !*******************************************************************************
  !*******************************************************************************
  
  END MODULE
  
  