diff --git a/src/gray_tables.f90 b/src/gray_tables.f90 index 60ff18a..60cefbd 100644 --- a/src/gray_tables.f90 +++ b/src/gray_tables.f90 @@ -178,7 +178,7 @@ contains ! Δρ_p for the uniform ρ_p grid drho_p = 1.0_wp_ / (n_grid - 1) - do i = 0, n_grid + do i = 0, n_grid-1 rho_p = i * drho_p rho_t = equil%pol2tor(rho_p) call equil%flux_average(rho_p, & diff --git a/tests/01-ITER/outputs/flux-averages.56.txt b/tests/01-ITER/outputs/flux-averages.56.txt index 0ecb9e1..8c86cb5 100644 --- a/tests/01-ITER/outputs/flux-averages.56.txt +++ b/tests/01-ITER/outputs/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.58323855E-001 5.87612610E+000 7.72761516E+000 4.25817293E+000 1.95089025E+001 7.48558842E+002 1.44148403E+007 -2.03600582E+005 3.42050995E-001 1.12251225E+000 1.01245510E+000 -3.10372054E+000 9.89898990E-001 9.79117924E-001 5.92968411E+000 7.78877604E+000 4.24862207E+000 2.03342895E+001 7.77854770E+002 1.45665195E+007 -1.64626078E+005 3.42924185E-001 1.13141865E+000 1.01127084E+000 -3.43340227E+000 1.00000000E+000 1.00000000E+000 6.02021976E+000 7.85196526E+000 4.23964157E+000 2.12694154E+001 8.10619943E+002 1.46995990E+007 -1.20633150E+005 3.48087701E-001 1.14631063E+000 1.00917325E+000 -4.19998425E+000 - 1.01010101E+000 1.02089078E+000 6.11075539E+000 7.91515449E+000 4.23066108E+000 2.22045414E+001 8.43385114E+002 1.48326785E+007 -7.66402237E+004 3.53251215E-001 1.16120261E+000 1.00707566E+000 -4.96656600E+000 diff --git a/tests/02-ITER-half-field/outputs/flux-averages.56.txt b/tests/02-ITER-half-field/outputs/flux-averages.56.txt index 2ff0cfa..60e84b0 100644 --- a/tests/02-ITER-half-field/outputs/flux-averages.56.txt +++ b/tests/02-ITER-half-field/outputs/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.47100523E-001 3.11289594E+000 4.14143013E+000 2.25165065E+000 1.89338205E+001 7.22841915E+002 7.27853029E+006 -2.61031855E+005 3.30312360E-001 1.12427535E+000 1.01126375E+000 -3.29253634E+000 9.89898990E-001 9.72380684E-001 3.14847349E+000 4.18150112E+000 2.24901578E+000 1.98736725E+001 7.55994352E+002 7.53096122E+006 -2.75294883E+005 3.32015031E-001 1.13648754E+000 1.01069687E+000 -3.54691273E+000 1.00000000E+000 1.00000000E+000 3.20688218E+000 4.22293965E+000 2.24673615E+000 2.09089615E+001 7.91992135E+002 7.84263027E+006 -3.56367848E+005 3.38857767E-001 1.15599418E+000 1.00932020E+000 -4.17499177E+000 - 1.01010101E+000 1.03081104E+000 3.26529086E+000 4.26437818E+000 2.24445651E+000 2.19442504E+001 8.27989918E+002 8.15429930E+006 -4.37440764E+005 3.45700500E-001 1.17550081E+000 1.00794353E+000 -4.80307060E+000 diff --git a/tests/03-TCV/outputs/flux-averages.56.txt b/tests/03-TCV/outputs/flux-averages.56.txt index 330dda3..5341bda 100644 --- a/tests/03-TCV/outputs/flux-averages.56.txt +++ b/tests/03-TCV/outputs/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.59167058E-001 1.50291217E+000 2.00574848E+000 1.17617317E+000 2.62091496E-001 1.42846295E+000 3.08009008E+005 -7.74263515E+004 3.26975697E-001 1.06013475E+000 1.00796183E+000 -2.89985531E+000 9.89898990E-001 9.79153846E-001 1.50569225E+000 2.01992525E+000 1.17296022E+000 2.72711939E-001 1.48472719E+000 3.08617768E+005 -3.76395273E+004 3.22758903E-001 1.06166070E+000 1.00754892E+000 -3.05622034E+000 1.00000000E+000 1.00000000E+000 1.50866423E+000 2.03464501E+000 1.16973812E+000 2.83886379E-001 1.54378798E+000 3.08818881E+005 7.20178268E+002 3.18539539E-001 1.06330808E+000 1.00712445E+000 -3.23080112E+000 - 1.01010101E+000 1.02113771E+000 1.51163621E+000 2.04936478E+000 1.16651602E+000 2.95060820E-001 1.60284877E+000 3.09019993E+005 3.90798844E+004 3.14320174E-001 1.06495547E+000 1.00669998E+000 -3.40538190E+000 diff --git a/tests/04-JT60SA/outputs/flux-averages.56.txt b/tests/04-JT60SA/outputs/flux-averages.56.txt index 89e1b90..b7b0e6f 100644 --- a/tests/04-JT60SA/outputs/flux-averages.56.txt +++ b/tests/04-JT60SA/outputs/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.56164029E-001 2.65857775E+000 3.78163635E+000 1.78949473E+000 6.74916745E+000 1.21547587E+002 5.08323144E+006 -6.09554892E+005 2.82762623E-001 1.20541324E+000 1.02045646E+000 -3.09087372E+000 9.89898990E-001 9.77852047E-001 2.68590180E+000 3.82654893E+000 1.78812828E+000 7.02489125E+000 1.25985782E+002 5.25686742E+006 -6.44171886E+005 2.82317040E-001 1.21753034E+000 1.02022872E+000 -3.19726807E+000 1.00000000E+000 1.00000000E+000 2.71284908E+000 3.87313601E+000 1.78652786E+000 7.30633015E+000 1.30473398E+002 5.44029562E+006 -6.57746679E+005 2.81516108E-001 1.22954933E+000 1.02006585E+000 -3.30300655E+000 - 1.01010101E+000 1.02260170E+000 2.73979637E+000 3.91972310E+000 1.78492744E+000 7.58776905E+000 1.34961015E+002 5.62372382E+006 -6.71321478E+005 2.80715176E-001 1.24156832E+000 1.01990298E+000 -3.40874503E+000 diff --git a/tests/05-JT60SA-startup/outputs/flux-averages.56.txt b/tests/05-JT60SA-startup/outputs/flux-averages.56.txt index 52aeda7..fc15719 100644 --- a/tests/05-JT60SA-startup/outputs/flux-averages.56.txt +++ b/tests/05-JT60SA-startup/outputs/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.67113590E-001 2.06106568E+000 3.37073132E+000 1.48433965E+000 3.98595745E+000 7.26290769E+001 -1.79682525E+006 2.58231636E+005 2.04614958E-001 1.02075926E+000 1.01032631E+000 2.92614444E+000 9.89898990E-001 9.83450763E-001 2.06105220E+000 3.39293708E+000 1.48006003E+000 4.06857067E+000 7.41343920E+001 -1.81811960E+006 2.57048114E+005 2.01752305E-001 1.02074591E+000 1.01031971E+000 2.96272838E+000 1.00000000E+000 1.00000000E+000 2.06103920E+000 3.41521196E+000 1.47584775E+000 4.15119274E+000 7.56398684E+001 -1.83932247E+006 2.55966185E+005 1.98949584E-001 1.02073303E+000 1.01031333E+000 2.99914146E+000 - 1.01010101E+000 1.01676329E+000 2.06102620E+000 3.43748683E+000 1.47163547E+000 4.23381481E+000 7.71453448E+001 -1.86052534E+006 2.54884255E+005 1.96146863E-001 1.02072015E+000 1.01030696E+000 3.03555454E+000 diff --git a/tests/06-ITER-startup/outputs/mixed/flux-averages.56.txt b/tests/06-ITER-startup/outputs/mixed/flux-averages.56.txt index c8c23d9..842f473 100644 --- a/tests/06-ITER-startup/outputs/mixed/flux-averages.56.txt +++ b/tests/06-ITER-startup/outputs/mixed/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.79351639E-001 2.78546833E+000 4.01793595E+000 2.07994958E+000 1.22731267E+001 4.62572670E+002 5.56919394E+005 -2.22015234E+004 2.72109819E-001 1.05131069E+000 1.00018209E+000 -1.79945685E+001 9.89898990E-001 9.89593991E-001 2.78827476E+000 4.03924450E+000 2.07540658E+000 1.25197564E+001 4.71710499E+002 5.61453658E+005 -1.58239420E+004 2.69462439E-001 1.05236828E+000 1.00018055E+000 -1.82693787E+001 1.00000000E+000 1.00000000E+000 2.79170971E+000 4.06102985E+000 2.07086737E+000 1.27699725E+001 4.80970651E+002 5.64494740E+005 -1.12435807E+004 2.66947409E-001 1.05366198E+000 1.00017795E+000 -1.86009978E+001 - 1.01010101E+000 1.01047891E+000 2.79514467E+000 4.08281520E+000 2.06632815E+000 1.30201885E+001 4.90230803E+002 5.67535823E+005 -6.66321739E+003 2.64432379E-001 1.05495569E+000 1.00017534E+000 -1.89326169E+001 diff --git a/tests/06-ITER-startup/outputs/x-mode/flux-averages.56.txt b/tests/06-ITER-startup/outputs/x-mode/flux-averages.56.txt index 4ef8675..8d034f8 100644 --- a/tests/06-ITER-startup/outputs/x-mode/flux-averages.56.txt +++ b/tests/06-ITER-startup/outputs/x-mode/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.79351639E-001 2.78546833E+000 4.01793595E+000 2.07994958E+000 1.22731267E+001 4.62572670E+002 5.56919394E+005 -2.22015234E+004 2.72109819E-001 1.05131069E+000 1.00018209E+000 -1.79945685E+001 9.89898990E-001 9.89593991E-001 2.78827476E+000 4.03924450E+000 2.07540658E+000 1.25197564E+001 4.71710499E+002 5.61453658E+005 -1.58239420E+004 2.69462439E-001 1.05236828E+000 1.00018055E+000 -1.82693787E+001 1.00000000E+000 1.00000000E+000 2.79170971E+000 4.06102985E+000 2.07086737E+000 1.27699725E+001 4.80970651E+002 5.64494740E+005 -1.12435807E+004 2.66947409E-001 1.05366198E+000 1.00017795E+000 -1.86009978E+001 - 1.01010101E+000 1.01047891E+000 2.79514467E+000 4.08281520E+000 2.06632815E+000 1.30201885E+001 4.90230803E+002 5.67535823E+005 -6.66321739E+003 2.64432379E-001 1.05495569E+000 1.00017534E+000 -1.89326169E+001 diff --git a/tests/07-DTT/outputs/flux-averages.56.txt b/tests/07-DTT/outputs/flux-averages.56.txt index 4284a8b..1150354 100644 --- a/tests/07-DTT/outputs/flux-averages.56.txt +++ b/tests/07-DTT/outputs/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.37907287E-001 3.29994675E+000 4.39212147E+000 2.41007748E+000 2.23442803E+000 3.02796470E+001 -2.67450324E+006 2.77401857E+005 3.30138938E-001 1.11424768E+000 1.01220568E+000 -3.00205881E+000 9.89898990E-001 9.63439587E-001 3.33277389E+000 4.42792759E+000 2.40134630E+000 2.35159043E+000 3.17616270E+001 -2.70630031E+006 2.71947405E+005 3.31413545E-001 1.12375654E+000 1.01078842E+000 -3.40588799E+000 1.00000000E+000 1.00000000E+000 3.39034718E+000 4.46498428E+000 2.39152327E+000 2.48784915E+000 3.34600745E+001 -2.74622538E+006 3.46218296E+005 3.38025667E-001 1.14070924E+000 1.00861335E+000 -4.26840102E+000 - 1.01010101E+000 1.04281770E+000 3.44792045E+000 4.50204098E+000 2.38170024E+000 2.62410786E+000 3.51585218E+001 -2.78615045E+006 4.20489144E+005 3.44637786E-001 1.15766193E+000 1.00643828E+000 -5.13091380E+000 diff --git a/tests/08-STEP/outputs/flux-averages.56.txt b/tests/08-STEP/outputs/flux-averages.56.txt index 08a3ecd..558034c 100644 --- a/tests/08-STEP/outputs/flux-averages.56.txt +++ b/tests/08-STEP/outputs/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.49086811E-001 4.28289390E+000 6.83070235E+000 2.14289102E+000 3.13600443E+001 6.72454434E+002 -7.47523313E+006 1.07643736E+005 2.29447623E-001 1.34050833E+000 1.00157256E+000 2.28937237E+001 9.89898990E-001 9.73699997E-001 4.38041114E+000 7.01710822E+000 2.13964118E+000 3.26555741E+001 6.94176707E+002 -7.61539280E+006 1.08357253E+005 2.28579997E-001 1.37077241E+000 1.00138410E+000 2.49293326E+001 1.00000000E+000 1.00000000E+000 4.48176386E+000 7.22013608E+000 2.13656890E+000 3.40180104E+001 7.16509900E+002 -7.76011985E+006 1.03625121E+005 2.27791669E-001 1.40224634E+000 1.00121088E+000 2.69467220E+001 - 1.01010101E+000 1.02679356E+000 4.58311659E+000 7.42316393E+000 2.13349663E+000 3.53804467E+001 7.38843093E+002 -7.90484689E+006 9.88929917E+004 2.27003341E-001 1.43372027E+000 1.00103765E+000 2.89641113E+001 diff --git a/tests/09-DTT-rampup/outputs/flux-averages.56.txt b/tests/09-DTT-rampup/outputs/flux-averages.56.txt index 1c5c5fe..310fe12 100644 --- a/tests/09-DTT-rampup/outputs/flux-averages.56.txt +++ b/tests/09-DTT-rampup/outputs/flux-averages.56.txt @@ -120,4 +120,3 @@ 9.79797980E-001 9.56569102E-001 6.37102996E+000 8.68491513E+000 4.65880827E+000 2.33359204E+000 3.15512190E+001 -5.46097054E+006 3.05955734E+005 3.10897960E-001 1.10391629E+000 1.01377613E+000 -2.87185307E+000 9.89898990E-001 9.76538777E-001 6.41344469E+000 8.74179273E+000 4.64282849E+000 2.42683875E+000 3.27459637E+001 -5.48392881E+006 1.93041826E+005 3.10559918E-001 1.10975053E+000 1.01239335E+000 -3.18506218E+000 1.00000000E+000 1.00000000E+000 6.55380111E+000 8.79993386E+000 4.62742464E+000 2.53590995E+000 3.41261500E+001 -5.49807774E+006 6.83737665E+004 3.19031192E-001 1.12927258E+000 1.00814028E+000 -4.80574726E+000 - 1.01010101E+000 1.02826016E+000 6.69415747E+000 8.85807499E+000 4.61202080E+000 2.64498114E+000 3.55063363E+001 -5.51222668E+006 -5.62942818E+004 3.27502461E-001 1.14879461E+000 1.00388721E+000 -6.42643158E+000