The AHA Model  Revision: 12809
Reference implementation 04 (HEDG02_04)
mod_drv.f90
Go to the documentation of this file.
1 !> @file mod_drv.f90
2 !! The main "driver" file for the AHA Model.
3 !! @author Sergey Budaev <sergey.budaev@uib.no>
4 !! @author Jarl Giske <jarl.giske@uib.no>
5 !! @date 2016-2017
6 
7 !-------------------------------------------------------------------------------
8 ! $Id: mod_drv.f90 6145 2017-11-06 12:31:23Z sbu062 $
9 !-------------------------------------------------------------------------------
10 
11 !> @brief Main driver component for the AHA Model.
12 !! @details This is the actual Fortran program that calls all the
13 !! computations for the AHA Model. It calls highest level
14 !! procedures that are implemented in the modules:
15 !! - @ref commondata
16 !! - @ref the_environment
17 !! - @ref the_genome
18 !! - @ref the_hormones
19 !! - @ref the_body
20 !! - @ref the_neurobio
21 !! - @ref the_individual
22 !! - @ref the_population
23 !! - @ref the_evolution
24 !! .
25 !! File version:
26 !! @verbatim
27 !! $Id: mod_drv.f90 6145 2017-11-06 12:31:23Z sbu062 $
28 !! @endverbatim
30 
31  use commondata
33 
34  implicit none
35 
36  !> - Initialise the system and logger calling commondata::system_init().
37  call system_init
38 
39  !> - Finally, call the the_evolution::generations_loop_ga(). This starts
40  !! the evolution process.
41  !! .
43 
44 end program aha_model_driver
program aha_model_driver
Main driver component for the AHA Model.
Definition: mod_drv.f90:29
COMMONDATA – definitions of global constants and procedures.
Definition: m_common.f90:1497
subroutine system_init()
Initialises the system environment and sets basic parameters.
Definition: m_common.f90:8405
Implementation of the genetic algorithm.
Definition: m_evolut.f90:14
subroutine, public generations_loop_ga()
This procedure implements the main Genetic Algorithm for evolving the agents.
Definition: m_evolut.f90:446