write_trinity_parameters Subroutine

public subroutine write_trinity_parameters(trinpars_unit)

FIXME : Add documentation

Arguments

Type	Intent	Optional	Attributes		Name
integer,	intent(in)			::	trinpars_unit

Contents

Source Code

write_trinity_parameters

Source Code

  subroutine write_trinity_parameters(trinpars_unit)
    integer, intent(in) :: trinpars_unit
    write(trinpars_unit, "(A15)") '&run_parameters'
    write (trinpars_unit, *) ' beta = ', beta
    write (trinpars_unit, "(A1)") '/'

  end subroutine write_trinity_parameters