initmisc Subroutine

  1. solver.f90
  2. solver
  3. initmisc

private subroutine initmisc()

Initilize miscellaneous variables

Arguments

None

Calls

proc~~initmisc~~CallsGraph proc~initmisc initmisc debugcall debugcall proc~initmisc->debugcall

Called by

proc~~initmisc~~CalledByGraph proc~initmisc initmisc proc~setup_solver setup_solver proc~setup_solver->proc~initmisc proc~start_run start_run proc~start_run->proc~setup_solver program~main main program~main->proc~start_run

Contents

Source Code

initmisc

Source Code

        subroutine initmisc()
          !< Initilize miscellaneous variables
          !----------------------------------
            
            implicit none
            
            DebugCall('initmisc')

            control%current_iter = 0

        end subroutine initmisc