From 07200f06b8a3f19ddccf471704a7bd5c1d554f0e Mon Sep 17 00:00:00 2001 From: minima Date: Sun, 13 Mar 2005 19:52:34 +0000 Subject: [PATCH] use WCY::r if recent enough and available --- cmd/show/muf.pl | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/cmd/show/muf.pl b/cmd/show/muf.pl index 488ad8df..31bebfee 100644 --- a/cmd/show/muf.pl +++ b/cmd/show/muf.pl @@ -68,7 +68,12 @@ if ($lp) { my ($hr1, $day, $month) = (gmtime($main::systime))[2,3,4]; $month++; my $flux = Geomag::sfi; -my $ssn = Minimuf::spots($flux); +my $ssn; +if ($main::systime - $WCY::date < 86400) { + $ssn = $WCY::r +} else { + $ssn = Minimuf::spots($flux); +} my $theta; # path angle (rad) $theta=$lon1-$lon2; -- 2.43.0