Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses

Warming the pot

by Random_Walk (Prior)
on Oct 16, 2007 at 12:38 UTC ( #645159=CUFP: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
    use strict;
        my $delta_T = $T_pot - $T_env;
        return $T_pot - ( $delta_T * $cool_factor );
  2. or download this
    ********** the evil of an unwarmed pot ... initial temp tea: 84.62C **
    using 300ml in 2 steps 150.0 water each ..   warmed pot: 77.53C temp t
    +ea: 94.19C
    using 300ml in 3 steps 100.0 water each ...  warmed pot: 87.91C temp t
    +ea: 96.45C
    using 300ml in 4 steps  75.0 water each .... warmed pot: 92.78C temp t
    +ea: 97.51C

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: CUFP [id://645159]
Approved by Corion
Front-paged by liverpole
[marto]: Anyone care to check Nodes to consider, and help me correct a brainfart? Thanks
[marto]: My edit should have stated 'retitle'

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (7)
As of 2017-07-23 12:49 GMT
Find Nodes?
    Voting Booth?
    I came, I saw, I ...

    Results (347 votes). Check out past polls.