Michele Guerini Rocco
|
73bd010458
|
remove unnecessary implicit statements
Only a single `implicit none` at the start of each module is required.
|
2024-02-09 11:16:18 +01:00 |
|
Michele Guerini Rocco
|
d18e05353a
|
src: remove unused parameters
|
2022-05-11 01:15:02 +02:00 |
|
Michele Guerini Rocco
|
b1694bc575
|
src/pec.f90: fix uninitialised memory use
If the condition `sccsa > zero` is not met, ratj{a,b}mx remain
unitialised and print_finals may write them to fort.7.
|
2022-05-11 01:15:00 +02:00 |
|
Daniele Micheletti
|
27f1793f14
|
trunk: added multiple passes calculation; added multipass module; graycore/gray_main: subroutine rewritten; equilibrium/read_equil_an: limiter coordinates read from equilibrium file for ipass>1; err_codes/check_err: istop=1 only for alpha<0; pec/pec_tab: fixed index assignements in loops; polarization/pol_limit: fixed ext,eyt normalization
|
2019-03-26 14:21:22 +00:00 |
|
|
9fcc54804f
|
added re-normalization of Pins and Currins in spec subroutine
|
2017-09-19 16:32:53 +00:00 |
|
|
46e36a5792
|
re-added missing output files, file units specified in dedicated module, added option iequil=3 for partially filled psi(R,z) grid on input: required for integration in JETTO
|
2015-11-23 17:55:27 +00:00 |
|
|
68e8217ff3
|
* reduced arrays required for dI/ds,dP/ds integration
* new module for error handling
* input parameters collected in a single file
* fixed uninitialized pabs,icd
|
2015-11-19 18:20:58 +00:00 |
|
|
ce10204479
|
nocommon branch merged back into trunk
|
2015-11-18 16:34:33 +00:00 |
|