[Mesa-users] Fwd: How to extract values

[harish sorrout]

---------- Forwarded message ---------
From: harish sorrout <harishsorrout at gmail.com>
Date: Fri, 15 Jul 2022, 21:02
Subject: Re: [Mesa-users] How to extract values
To: Rob Farmer <robert.j.farmer37 at gmail.com>


Sir
As you told to use
            real(dp) function star_get_profile_output(s,name,k) to get the
value of 'burn_c' .  So for this I need to put 'burn_c' at the place of
'name' argument.
So i select character (len=maxlen_profile_column_name) :: burn_c.  And use
  E_cburn(nz) = star_get_profile_output(s,burn_c,k) where real(dp) ::
E_cburn(nz). and
then used burn_timescales = (s% cp(k) * s% T) / E_cburn(k)

By doing so, I did not get any errors while compiling. Sir Is there
anything wrong with the above command.
Sir I could not understand your words  "You want to pass the string
"burn_c" not a variable called burn_c".
Please enlighten me.

Harish Kumar
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.mesastar.org/pipermail/mesa-users/attachments/20220715/e3866716/attachment.htm>