SCALE-RM
scale_tracer_sn14.F90
Go to the documentation of this file.
1 !-------------------------------------------------------------------------------
13 !-------------------------------------------------------------------------------
15  !-----------------------------------------------------------------------------
16  !
17  !++ used modules
18  !
19  use scale_precision
20  use scale_stdio
21  !-----------------------------------------------------------------------------
22  implicit none
23  private
24  !-----------------------------------------------------------------------------
25  !
26  !++ Public procedure
27  !
28  public :: tracer_sn14_setup
29 
30  include "inc_tracer_sn14.h"
31 
32  !-----------------------------------------------------------------------------
33 contains
34  !-----------------------------------------------------------------------------
35  subroutine tracer_sn14_setup
36  implicit none
37 
38  return
39  end subroutine tracer_sn14_setup
40 
41 end module scale_tracer_sn14
module TRACER / sn14
module STDIO
Definition: scale_stdio.F90:12
module PRECISION
subroutine, public tracer_sn14_setup