*-- Author :    Girish D. Patel
      SUBROUTINE GETEAR(IRUN,IDATE,ITIME,IBFLD,IPRESS,IFR,IFP,IRET)
C     ------BOSMDL                                                                                            
C     ------                                                                                                  
        CALL H1ENVI(IFLAG,IPROC,NPROC)                                                                 
*