Go to the source code of this file.
|
| module | ets |
| | Module provides the interface between (external) CPO and internal ETS derived types. More...
|
| |
|
| subroutine | assign_code_parameters (codeparameters, return_status) |
| |
| subroutine | itmetskepler (EQUILIBRIUM_ITER, CORETRANSP, neotn, neotnp1, COREPROF_OLD, COREPROF_NEW, COREPROF_ITER, workflowtabint, workflowtabreal, code_parameters) |
| | ITMETSKEPLER provides the coupling between the COS type workflow and the ETS. More...
|
| |
| subroutine itm_ets::assign_code_parameters |
( |
type (type_param), intent(in) |
codeparameters, |
|
|
integer(ikind), intent(out) |
return_status |
|
) |
| |
| subroutine itmetskepler |
( |
type (type_equilibrium), dimension(:), pointer |
EQUILIBRIUM_ITER, |
|
|
type (type_coretransp), dimension(:), pointer |
CORETRANSP, |
|
|
type(type_neoclassic), dimension(:), pointer |
neotn, |
|
|
type(type_neoclassic), dimension(:), pointer |
neotnp1, |
|
|
type (type_coreprof), dimension(:), pointer |
COREPROF_OLD, |
|
|
type (type_coreprof), dimension(:), pointer |
COREPROF_NEW, |
|
|
type (type_coreprof), dimension(:), pointer |
COREPROF_ITER, |
|
|
integer, dimension(3) |
workflowtabint, |
|
|
real*8, dimension(6) |
workflowtabreal, |
|
|
type (type_param) |
code_parameters |
|
) |
| |
ITMETSKEPLER provides the coupling between the COS type workflow and the ETS.
note that psi is rescaled by $-2 $
- Author
- Ph.Huynh and V.Basiuk
- Version
- "$Id: ets.F90 1950 2018-12-15 11:31:13Z g2dpc $"
Definition at line 577 of file ets.F90.
1.8.5 
