8e621d0dacaddedd missing term in dbgr computation (fwork) in refl branch
Daniele Micheletti
2016-01-26 09:21:06 +0000
c0c966af96added branch for multiple passes (from nocommon rev142); fixed initial condition for second pass, new dispersion module for low density
Daniele Micheletti
2016-01-26 09:14:47 +0000
88740ab232Fixed computation of warm Nperp for low densityLorenzo Figini2016-01-25 11:37:17 +0000
59617c7a06gray/jetto interface reverted to F77 (removed use of modules), adding an intermediate F90 subroutine handling the reading of parameters/beams files. pec_init now uses optional input rho gridLorenzo Figini2015-11-24 16:36:20 +0000
46e36a5792re-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 JETTOLorenzo Figini2015-11-23 17:55:27 +0000
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,icdLorenzo Figini2015-11-19 18:20:58 +0000
f3fb3962d1updated prfile subr, added comments and minor changes in ic_gb
Daniela Farina
2015-11-19 17:44:17 +0000
c4a409f8c5* Added case ibeam=2 * Fixed intent in dierckx/bispev * New use of bessel_jn function in eccd/fpp * Some cleaning in cniteq * Fixed wrong call to gradi_upd in case of single-ray runs * Fixed call to pec_init for analytical equilibria
old-nocommon
Lorenzo Figini2015-11-18 16:28:15 +0000
4226416c4aOptimized tests for call to absorption routine. Fixed out of bounds error at 1st stepLorenzo Figini2015-11-12 17:43:12 +0000
c36ffbc6b6main subroutine restructured; single indexing of rays; all subroutines updated to Fortran 90 (and all commons removed); two passes feature temporarily disabled.Lorenzo Figini2015-11-12 11:57:43 +0000
198feb7a1fflux_average now in magsurf_data works anal/num , new subr fluxval, some routines moved into equilibrium, minor bugs fixed
Daniela Farina
2015-11-05 18:24:21 +0000
f77624d5baaddedd missing term in dbgr computation (fwork)Lorenzo Figini2015-11-04 11:27:13 +0000
9eb901015ecorrected a bug in fwork for dbgr and in ic_gb for ypwrk0
Daniela Farina
2015-11-04 10:21:50 +0000
4bb85f0dc1reorganized reading of input parameters and data files. Created f90 main program handling file reads and passing arrays to the main gray subroutine.Lorenzo Figini2015-11-03 14:56:38 +0000
e1ba175efbadded test in pol_limit for anpl=0 to avoid 0/0 expressions
Daniele Micheletti
2015-10-14 10:26:05 +0000
af5fb208b2inclusion of updated routines for analytical equilibrium/profiles; further cleaning of equidataLorenzo Figini2015-10-12 17:09:28 +0000
79c080b14dbugs fixed in eccdeff, density and zeffan
Daniela Farina
2015-10-12 11:29:53 +0000
61c97e3357corrected bug in equinum_fpol: vacuum value was returned for psin=0Lorenzo Figini2015-10-02 15:09:10 +0000
dcd3badba9partial upgrade of equidata and auxiliary routinesLorenzo Figini2015-10-02 14:10:38 +0000
2856725b49partial changes uploaded by mistake in the previous revision. gray, interp_eqprof and reflections were in an inconsistent stateLorenzo Figini2015-09-18 10:24:24 +0000
b9b6d3e8f4split profdata routine and moved in coreprof moduleLorenzo Figini2015-07-16 16:48:27 +0000
667f6fd111subroutine wall_refl moved in reflections module, rlim,zlim,nlim moved from interp_eqprof to reflections module
Daniele Micheletti
2015-07-16 14:47:56 +0000
20e68d468fHlambda function now evaluated from 1D spline in fjncl integration (mom. cons. CD model). Cleaned unused variables.Lorenzo Figini2015-06-15 15:35:15 +0000
f755232b01updated declarative section in gray.f in nocommon branch
Daniele Micheletti
2015-06-12 14:53:29 +0000
e5c4605d88new branch for new equinum subroutines
Daniela Farina
2015-05-20 15:07:15 +0000
e31f05e9a8moved all the definitions of arithmetical, physical and type kind constants in const_and_precisions. Changed argument from tekev to mu in spitzer function subroutines.Lorenzo Figini2015-05-15 16:02:27 +0000
045c581865other variables moved from common to argument list in eccd. fixed print of nharm in print_output, added missin /ierr/ common in ecrh_cdLorenzo Figini2015-05-13 16:27:52 +0000
3b24d5d58dcreated branch for code restructuring (progressive removal of common statements, dynamic allocation, etc). curr_int subroutine (and dependencies) partially updated.Lorenzo Figini2015-05-13 13:19:29 +0000
b9b687be88Fixed memory allocation errors in read_beams. Added driver for single beam simulations, with beam parameters read from external file.Lorenzo Figini2015-02-23 10:49:48 +0000
f997ec1eb3corrected reading of beam description file (bad handling of blank lines and of case nalpha=2)Lorenzo Figini2015-02-18 16:15:38 +0000
8eee0b3ecdgray-jintrac gray-externals.f: alpha0. beta0 prints in files removed
Daniele Micheletti
2015-02-13 15:34:08 +0000
a78099b8b8gray-jintrac gray-externals.f: added dadrhotv(1) and dvdrhotv(1) initialization to 0 in fluxaverage, spline degree in read_beams set to 1
Daniele Micheletti
2015-02-13 15:18:32 +0000
7a14671b2aupdated to multi-beam and improved array bounds checksLorenzo Figini2015-02-09 17:43:37 +0000
608d63acfefixed few out of bounds checks. added imx (dispersion) read from gray.dataLorenzo Figini2015-01-23 15:08:41 +0000
94212dba99added few missing dummy values in case of zero absorptionLorenzo Figini2015-01-09 15:05:20 +0000
3a798e9f4aadded ipol option and computation of polarization parameters at all steps, added case imx negative to disable convergence in dispersion
Daniela Farina
2014-12-22 15:30:17 +0000
8e593fdb1acorrected detection of turning point for rays missing inner wallLorenzo Figini2014-10-14 14:14:31 +0000
8f06be1281fixed the computation of beam polarization at launch (used if the beam hits the wall before crossing the plasma)Lorenzo Figini2014-08-25 13:40:44 +0000
b5355e2fd0corrected psi grid leading dimension in JINTRAC interface. Committed new branch for updated wall reflection algorithm.Lorenzo Figini2014-08-23 09:57:40 +0000
cb55af3857corrected psi grid leading dimension in JINTRAC interface. Committed new branch for updated wall reflection algorithm.Lorenzo Figini2014-08-23 09:57:40 +0000
2c90c5f2cfrenamed clashing common block names; fixed wrong calling of splining routines; fixed spline evaluation functions to work with uneven x grid spacing; removed debugging printsLorenzo Figini2014-06-19 08:13:52 +0000
074f331355removed dependency on itm-modules. fixed uncorrect use of ipec in pec (ipec=-1). changed dubious assignments (isev, iind) in pec. cleaned dependencies in Makefile. added missing beamdata.f90 file to the repository. added main program to test with standard input files (eqdsk, prf). renamed ei function and dierckx subroutine to avoid conflicts with flush library.Lorenzo Figini2014-06-16 16:41:43 +0000
9ca1ccd817made beam arrays allocatable and max # of knots in spline for scattered data reduced to n/4 to save memoryLorenzo Figini2014-06-13 15:12:36 +0000
b6d8dd5a6fsimpson quadrature replaced with simpler rule for unevenly spaced intervals (computation of <rho>_{P,J} and d<rho>_{P,J)Lorenzo Figini2014-06-13 09:47:20 +0000
f9facdc28eadded handling of ijetto=2 case in jintrac branchLorenzo Figini2014-06-12 23:13:32 +0000
b02c254a35added output of dP/dV and Jcd on arbitrary input grid. ijetto=2 (null psi outside plasma boundary) not handled yetLorenzo Figini2014-06-12 12:51:03 +0000
5484959955changed function names and logical unit numbers to avoid conflicts in JINTRACLorenzo Figini2014-06-11 10:05:33 +0000