SCALE-RM
mod_cpl_driver.f90
Go to the documentation of this file.
1 !-------------------------------------------------------------------------------
9 !-------------------------------------------------------------------------------
11  !-----------------------------------------------------------------------------
12  !
13  !++ used modules
14  !
15  use scale_precision
16  use scale_stdio
17  use scale_prof
18  use scale_debug
20  use scale_tracer
21  !-----------------------------------------------------------------------------
22  implicit none
23  private
24  !-----------------------------------------------------------------------------
25  !
26  !++ Public procedure
27  !
28  public :: cpl_driver_setup
29  public :: cpl_driver
30 
31  !-----------------------------------------------------------------------------
32  !
33  !++ Public parameters & variables
34  !
35  !-----------------------------------------------------------------------------
36  !
37  !++ Private procedure
38  !
39  !-----------------------------------------------------------------------------
40  !
41  !++ Private parameters & variables
42  !
43  !-----------------------------------------------------------------------------
44 contains
45  !-----------------------------------------------------------------------------
47  subroutine cpl_driver_setup
48  implicit none
49  !---------------------------------------------------------------------------
50 
51  return
52  end subroutine cpl_driver_setup
53 
54  !-----------------------------------------------------------------------------
56  subroutine cpl_driver
57  implicit none
58  !---------------------------------------------------------------------------
59 
60  return
61  end subroutine cpl_driver
62 
63 end module mod_cpl_driver
module DEBUG
Definition: scale_debug.F90:13
module CPL driver
module STDIO
Definition: scale_stdio.F90:12
module grid index
module TRACER
subroutine, public cpl_driver
CPL calcuration.
subroutine, public cpl_driver_setup
Setup.
module profiler
Definition: scale_prof.F90:10
module PRECISION