t$init (6) --- initialize for a subroutine trace run     09/05/84


          | _C_a_l_l_i_n_g _I_n_f_o_r_m_a_t_i_o_n

          |      subroutine t$init


          | _F_u_n_c_t_i_o_n

          |      'T$init'  is  called at the beginning of the main program in
          |      Ratfor programs that  have  been  processed  with  the  "-p"
          |      (profiling)  option  of  'rp'.  It initializes the profiling
          |      common blocks with the number of routines in the program.

          |      'T$init' is inserted into the Fortran output as inline code,
          |      rather than being referenced  from  the  standard  Subsystem
          |      library.   As  such,  it  can  never be accessed by the user
          |      unless the "-p" option is specified (even  then,  it  should
          |      not  be  called  by  the user, since it has no effect on the
          |      profiling information).


          | _I_m_p_l_e_m_e_n_t_a_t_i_o_n

          |      A simple assignment statement initializes a variable in  the
          |      common  blocks  produced  by  'rp' and used by the profiling
          |      subroutines.


          | _S_e_e _A_l_s_o

          |      rp (1) t$clup (6),  t$entr  (6),  t$exit  (6),  t$time  (6),
          |      t$trac (6)



























            t$init (6)                    - 1 -                    t$init (6)