C This code would ideally be located in the Analysis_Control INITIALIZATION
C  entry point, but could go anywhere before the call to CMUSWM.

$$INCLUDE 'R_N$LIBRARY:RN_SEQ.INC'

	Integer RNSINI

	Integer Status
	Integer Stream

C  CMUSWM needs QFL RN initialized

	Stream = RN_QFL1
	Status = RNSINI(Stream)