Beefy Boxes and Bandwidth Generously Provided by pair Networks
Just another Perl shrine

Re^4: Ocean tides in Perl

by flexvault (Monsignor)
on Nov 01, 2011 at 17:28 UTC ( #935166=note: print w/replies, xml ) Need Help??

in reply to Re^3: Ocean tides in Perl
in thread Ocean tides in Perl

About 20+ years ago, I wrote a small basic program for a Yacht Club. The data was available from a US government agency for a specific geographic location. The Yacht Club knew that their location was 1 hour 22 minutes behind the tide for that specific geographic location. With that information the program produced a chart something like the following for the entire year:

Tides for ____________________ starting with November 1, 2011. Day High Tide Height Sunrise Moon Time % Moon /Low Time Feet Sunset Visible Tu 1 High 3:41 AM 3.0 7:43 AM Rise 1:23 PM 31 1 Low 11:14 AM 0.2 6:47 PM 1 High 5:57 PM 2.2 1 Low 11:06 PM 1.1

The only calculations the program made was to adjust the 'Tide Time'. For perl to do this the script would be trivial.

From this discussion, it sounds like I needed to account for a lot more. Isn't tide predicting mostly an approximation?

"Well done is better than well said." - Benjamin Franklin

Replies are listed 'Best First'.
Re^5: Ocean tides in Perl
by GrandFather (Sage) on Nov 01, 2011 at 19:24 UTC

    For approximate times that technique is ok but gets worse the further separated the reference station and the point of interest are. The error is also a strong function of local sea floor topology. However if you are interested in tide height rather than just times of slack water then this technique can degrade rapidly over fairly short distances.

    True laziness is hard work
Re^6: Ocean tides in Perl
by Anonymous Monk on Nov 01, 2011 at 22:15 UTC
    Has been 20 years, but do you still have the code that generated that chart?

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://935166]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (7)
As of 2018-06-19 11:03 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (113 votes). Check out past polls.