writere.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	writere ()

Function/Subroutine Documentation

writere()

subroutine writere

(

)

!
!     writes a header for each eigenfrequency in the .dat file
!
      implicit none
!
      write(5,*)
      write(5,100)
 100  format
     &  ('                    R E A L   P A R T')
      write(5,*)
!
      return