Hi, I'm Riccardo Bentivoglio. I'm having some
troubles with the subroutine ''Steam_props", I'would like to understand this
part of the subroutine:
DATA ATZ/ 2*64.D1, 641.6D0, 27.D1 /, 1 ADZ/ 3*.319D0, 1.55D0 /, 2 AAT/ 2*2.D4, 4.D4, 25.D0 /, 3 AAD/ 34.D0, 4.D1, 3.D1, 1.05D3 / DATA WM/ 18.0152D0 /, GASCON/ .461522D0 /, TZ/ 647.073D0 /, 1 AA/ 1.D0 /, NC/ 36 / DATA UREF,SREF/ -4328.455039D0, 7.6180802D0 / DATA G1,G2,GF/ 11.D0, 44.333333333333D0, 3.5D0 / DATA BP/ .7478629D0, -.3540782D0, 2*0.D0, .7159876D-2, 0.D0, 1 -.3528426D-2, 3*0.D0 /, 2 BQ/ 1.1278334D0, 0.D0, -.5944001D0, -5.010996D0, 0.D0, 3 .63684256D0, 4*0.D0 / DATA G/-.53062968529023D3, .22744901424408D4, .78779333020687D3, 1 -.69830527374994D2, .17863832875422D5, -.39514731563338D5, 2 .33803884280753D5, -.13855050202703D5, -.25637436613260D6, 3 .48212575981415D6, -.34183016969660D6, .12223156417448D6, 4 .11797433655832D7, -.21734810110373D7, .10829952168620D7, 5 -.25441998064049D6, -.31377774947767D7, .52911910757704D7, 6 -.13802577177877D7, -.25109914369001D6, .46561826115608D7, 7 -.72752773275387D7, .41774246148294D6, .14016358244614D7, 8 -.31555231392127D7, .47929666384584D7, .40912664781209D6, 9 -.13626369388386D7, .69625220862664D6, -.10834900096447D7, A -.22722827401688D6, .38365486000660D6, .68833257944332D4, B .21757245522644D5, -.26627944829770D4, -.70730418082074D5, C -.225D0, -1.68D0, .055D0, -93.0D0 / DATA II/4*0, 4*1, 4*2, 4*3, 4*4, 4*5, 4*6, 4*8, 2*2, 0, 4, 3*2, 4/ DATA JJ/ 2,3,5,7,2,3,5,7,2,3,5,7,2,3,5,7,2,3,5,7,2,3,5,7,2,3,5,7, 1 2,3,5,7, 1, 3*4, 0, 2, 0, 0 / What are refferred to ?
I can't find a guide can help me to understand.
Regards,
Riccardo Bentivoglio |