74 echoln =
'Listing of the User Circuit'
78 &
' ',
'************ Branch ',nbrns,
' ************'
subroutine readscreleminit
c *****************************************************************************c Common blocks for SCREAMER output and tabling c & numout
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numprt
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numpff
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numtab
c *****************************************************************************c Common blocks for SCREAMER output and tabling c & numufo
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numidr
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numcsv
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numplt
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numfil
c *****************************************************************************c Common blocks for SCREAMER output and tabling c numsfc character numsfc