Changeset 10388 in ntrip for trunk/BNC/scripts/Bnc.pm


Ignore:
Timestamp:
Mar 12, 2024, 3:10:17 PM (6 months ago)
Author:
stuerze
Message:

changes regarding PPP

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/BNC/scripts/Bnc.pm

    r10385 r10388  
    493493    my $epochSec     = 0;
    494494    my $epochDiff    = 0;
    495     my ( @hlp, @N, @E, @U, %SATNUM, @TRP, @CLK, @OFF_GLO, @OFF_GAL, @OFF_BDS);
    496     my ( @EPOCH, @EPOCH_CLK, @EPOCH_OFF_GLO, @EPOCH_OFF_GAL, @EPOCH_OFF_BDS );
     495    my ( @hlp, @N, @E, @U, %SATNUM, @TRP, @CLK, @OFF_GPS, @OFF_GLO, @OFF_GAL, @OFF_BDS);
     496    my ( @EPOCH, @EPOCH_CLK, @EPOCH_OFF_GPS, @EPOCH_OFF_GLO, @EPOCH_OFF_GAL, @EPOCH_OFF_BDS );
    497497    my ( %AMB,        %RES,            %ELE,            %ION, %BIA );
    498498    my ( $station,    $lki,            $sys,            $sat, $amb );
     
    588588            push ( @CLK,       $hlp[2] + $hlp[3] );
    589589        }
     590        elsif ( $ln =~ /\bOFF_GPS\b/ ) {                # 2015-08... OFF_GPS 52.6806 -3.8042 +- 9.0077
     591            push ( @EPOCH_OFF_GPS, $epochSec );
     592            push ( @OFF_GPS,       $hlp[2] + $hlp[3] );
     593        }
    590594        elsif ( $ln =~ /\bOFF_GLO\b/ ) {                # 2015-08... OFF_GLO 52.6806 -3.8042 +- 9.0077
    591 #            push ( @EPOCH_OFF_GLO, $epochSec );
     595            push ( @EPOCH_OFF_GLO, $epochSec );
    592596            push ( @OFF_GLO,       $hlp[2] + $hlp[3] );
    593597        }
    594598        elsif ( $ln =~ /\bOFF_GAL\b/ ) {                # 2015-08... OFF_GAL 52.6806 -3.8042 +- 9.0077
    595 #            push ( @EPOCH_OFF_GAL, $epochSec );
     599            push ( @EPOCH_OFF_GAL, $epochSec );
    596600            push ( @OFF_GAL,       $hlp[2] + $hlp[3] );
    597601        }
    598602        elsif ( $ln =~ /\bOFF_BDS\b/ ) {                # 2015-08... OFF_BDS 52.6806 -3.8042 +- 9.0077
    599 #            push ( @EPOCH_OFF_BDS, $epochSec );
     603            push ( @EPOCH_OFF_BDS, $epochSec );
    600604            push ( @OFF_BDS,       $hlp[2] + $hlp[3] );
    601605        }
     
    624628    if ( $nof_epochs != scalar @TRP )                            { LOGDIE "number of epochs and TRP not equal\n" }
    625629    if ( @CLK     && scalar @EPOCH_CLK     != scalar @CLK )      { LOGDIE "number of epochs and CLK not equal\n" }
    626 #    if ( @OFF_GLO && scalar @EPOCH_OFF_GLO != scalar @OFF_GLO )  { LOGDIE "number of epochs and OFF_GLO not equal\n" }
    627 #    if ( @OFF_GAL && scalar @EPOCH_OFF_GAL != scalar @OFF_GAL )  { LOGDIE "number of epochs and OFF_GAL not equal\n" }
    628 #    if ( @OFF_BDS && scalar @EPOCH_OFF_BDS != scalar @OFF_BDS )  { LOGDIE "number of epochs and OFF_BDS not equal\n" }
     630    if ( @OFF_GPS && scalar @EPOCH_OFF_GPS != scalar @OFF_GPS )  { LOGDIE "number of epochs and OFF_GPS not equal\n" }
     631    if ( @OFF_GLO && scalar @EPOCH_OFF_GLO != scalar @OFF_GLO )  { LOGDIE "number of epochs and OFF_GLO not equal\n" }
     632    if ( @OFF_GAL && scalar @EPOCH_OFF_GAL != scalar @OFF_GAL )  { LOGDIE "number of epochs and OFF_GAL not equal\n" }
     633    if ( @OFF_BDS && scalar @EPOCH_OFF_BDS != scalar @OFF_BDS )  { LOGDIE "number of epochs and OFF_BDS not equal\n" }
    629634
    630635    if ( !$station ) { WARN "could not grep stationname from file: $file\n" }
     
    638643                 TRP     => \@TRP,
    639644                 CLK     => \@CLK,
     645                 OFF_GPS => \@OFF_GPS,
    640646                 OFF_GLO => \@OFF_GLO,
    641647                 OFF_GAL => \@OFF_GAL,
Note: See TracChangeset for help on using the changeset viewer.