Re: How to relate two functions
- To: mathgroup at smc.vnet.net
- Subject: [mg127480] Re: How to relate two functions
- From: DC <b.gatessucks at gmail.com>
- Date: Sat, 28 Jul 2012 02:39:59 -0400 (EDT)
- Delivered-to: l-mathgroup@mail-archive0.wolfram.com
- Delivered-to: l-mathgroup@wolfram.com
- Delivered-to: mathgroup-newout@smc.vnet.net
- Delivered-to: mathgroup-newsend@smc.vnet.net
- References: <jutl8h$cib$1@smc.vnet.net>
In order to keep notation simple I'd define :
aa[t_] = s1[[1, 1, 2]]
tt[t_] = s1[[1, 2, 2]]
Then you can find the point where T[t]=1 with :
sol = FindRoot[tt[t] == 1, {t, 500}][[1, 2]]
The corresponding value of a[t] is then simply
aa[sol]