lmi-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[lmi-commits] [lmi] master c4515973: Expunge /^Irc7702i/ and /^Mly/ fiel


From: Greg Chicares
Subject: [lmi-commits] [lmi] master c4515973: Expunge /^Irc7702i/ and /^Mly/ fields from ledger
Date: Thu, 19 May 2022 16:28:12 -0400 (EDT)

branch: master
commit c4515973bbf1925ddf6dacfa8429eccec5b55b88
Author: Gregory W. Chicares <gchicares@sbcglobal.net>
Commit: Gregory W. Chicares <gchicares@sbcglobal.net>

    Expunge /^Irc7702i/ and /^Mly/ fields from ledger
    
    See:
      https://lists.nongnu.org/archive/html/lmi/2022-05/msg00024.html
---
 ihs_acctval.cpp           |  6 ------
 ledger_evaluator.cpp      | 38 --------------------------------------
 ledger_invariant.cpp      |  6 ------
 ledger_invariant.hpp      |  6 ------
 ledger_invariant_init.cpp |  9 ---------
 ledger_variant.cpp        |  6 ------
 ledger_variant.hpp        |  5 -----
 ledger_variant_init.cpp   | 17 -----------------
 nychthemeral_test.sh      |  2 --
 9 files changed, 95 deletions(-)

diff --git a/ihs_acctval.cpp b/ihs_acctval.cpp
index 828c5306..0af0f8f1 100644
--- a/ihs_acctval.cpp
+++ b/ihs_acctval.cpp
@@ -1293,12 +1293,6 @@ void AccountValue::FinalizeYear()
                 ,mce_annual_rate
                 )
                 [Year]
-            ,InterestRates_->SepAcctNetRate
-                (SepBasis_
-                ,GenBasis_
-                ,mce_monthly_rate
-                )
-                [Year]
             ,Year
             );
         }
diff --git a/ledger_evaluator.cpp b/ledger_evaluator.cpp
index 69aec38a..e6304726 100644
--- a/ledger_evaluator.cpp
+++ b/ledger_evaluator.cpp
@@ -212,26 +212,12 @@ title_map_t static_titles()
     ,{"HoneymoonValueSpread"            , "Honeymoon\nValue\nSpread"}
     ,{"IndvTaxBracket"                  , "EE Tax\nBracket"}
     ,{"InforceLives"                    , "BOY\nLives\nInforce"}
-    ,{"Irc7702ic_usual"                 , "7702 ic\nUsual"}
-    ,{"Irc7702ic_glp"                   , "7702 ic\nfor GLP"}
-    ,{"Irc7702ic_gsp"                   , "7702 ic\nfor GSP"}
-    ,{"Irc7702ig_usual"                 , "7702 ig\nUsual"}
-    ,{"Irc7702ig_glp"                   , "7702 ig\nfor GLP"}
-    ,{"Irc7702ig_gsp"                   , "7702 ig\nfor GSP"}
     ,{"IrrCsv_Current"                  , "Curr IRR\non CSV"}
     ,{"IrrCsv_Guaranteed"               , "Guar IRR\non CSV"}
     ,{"IrrDb_Current"                   , "Curr IRR\non DB"}
     ,{"IrrDb_Guaranteed"                , "Guar IRR\non DB"}
     ,{"LoanIntAccrued_Current"          , "Curr Loan\nInt\nAccrued"}
     ,{"LoanIntAccrued_Guaranteed"       , "Guar Loan\nInt\nAccrued"}
-    ,{"MlyGAIntRate_Current"            , "Curr Monthly\nGen Acct\nInt Rate"}
-    ,{"MlyGAIntRate_Guaranteed"         , "Guar Monthly\nGen Acct\nInt Rate"}
-    ,{"MlyHoneymoonValueRate_Current"   , "Curr Monthly\nHoneymoon\nValue 
Rate"}
-    ,{"MlyHoneymoonValueRate_Guaranteed", "Guar Monthly\nHoneymoon\nValue 
Rate"}
-    ,{"MlyPostHoneymoonRate_Current"    , "Curr 
Monthly\nPost\nHoneymoon\nRate"}
-    ,{"MlyPostHoneymoonRate_Guaranteed" , "Guar 
Monthly\nPost\nHoneymoon\nRate"}
-    ,{"MlySAIntRate_Current"            , "Curr Monthly\nSep Acct\nInt Rate"}
-    ,{"MlySAIntRate_Guaranteed"         , "Guar Monthly\nSep Acct\nInt Rate"}
     ,{"ModalMinimumPremium"             , "Modal\nMinimum\nPremium"}
 //  ,{"NaarForceout"                    , "Forced\nWithdrawal\ndue to\nNAAR 
Limit"}
     ,{"NetClaims_Current"               , "Curr Net\nClaims"}
@@ -351,26 +337,12 @@ mask_map_t static_masks()
     ,{"HoneymoonValueSpread"            ,      "99.99%"}
     ,{"IndvTaxBracket"                  ,      "99.99%"}
     ,{"InforceLives"                    , "999,999,999"}
-    ,{"Irc7702ic_usual"                 ,      "99.99%"}
-    ,{"Irc7702ic_glp"                   ,      "99.99%"}
-    ,{"Irc7702ic_gsp"                   ,      "99.99%"}
-    ,{"Irc7702ig_usual"                 ,      "99.99%"}
-    ,{"Irc7702ig_glp"                   ,      "99.99%"}
-    ,{"Irc7702ig_gsp"                   ,      "99.99%"}
     ,{"IrrCsv_Current"                  ,  "100000.00%"}
     ,{"IrrCsv_Guaranteed"               ,  "100000.00%"}
     ,{"IrrDb_Current"                   ,  "100000.00%"}
     ,{"IrrDb_Guaranteed"                ,  "100000.00%"}
     ,{"LoanIntAccrued_Current"          , "999,999,999"}
     ,{"LoanIntAccrued_Guaranteed"       , "999,999,999"}
-    ,{"MlyGAIntRate_Current"            ,      "99.99%"}
-    ,{"MlyGAIntRate_Guaranteed"         ,      "99.99%"}
-    ,{"MlyHoneymoonValueRate_Current"   ,      "99.99%"}
-    ,{"MlyHoneymoonValueRate_Guaranteed",      "99.99%"}
-    ,{"MlyPostHoneymoonRate_Current"    ,      "99.99%"}
-    ,{"MlyPostHoneymoonRate_Guaranteed" ,      "99.99%"}
-    ,{"MlySAIntRate_Current"            ,      "99.99%"}
-    ,{"MlySAIntRate_Guaranteed"         ,      "99.99%"}
     ,{"ModalMinimumPremium"             , "999,999,999"}
 //  ,{"NaarForceout"                    , "999,999,999"}
     ,{"NetClaims_Current"               , "999,999,999"}
@@ -584,12 +556,6 @@ format_map_t static_formats()
     ,{"HoneymoonValueSpread"            , f4}
     ,{"IndvTaxBracket"                  , f4}
     ,{"InforceHMVector"                 , f4}
-    ,{"Irc7702ic_usual"                 , f4}
-    ,{"Irc7702ic_glp"                   , f4}
-    ,{"Irc7702ic_gsp"                   , f4}
-    ,{"Irc7702ig_usual"                 , f4}
-    ,{"Irc7702ig_glp"                   , f4}
-    ,{"Irc7702ig_gsp"                   , f4}
     ,{"IrrCsv_Current"                  , f4}
     ,{"IrrCsv_CurrentZero"              , f4}
     ,{"IrrCsv_Guaranteed"               , f4}
@@ -598,10 +564,6 @@ format_map_t static_formats()
     ,{"IrrDb_CurrentZero"               , f4}
     ,{"IrrDb_Guaranteed"                , f4}
     ,{"IrrDb_GuaranteedZero"            , f4}
-    ,{"MlyGAIntRate"                    , f4}
-    ,{"MlyHoneymoonValueRate"           , f4}
-    ,{"MlyPostHoneymoonRate"            , f4}
-    ,{"MlySAIntRate"                    , f4}
     ,{"TotalIMF"                        , f4}
 // F5: zero decimals, commas, cents to dollars
 // > Format as a number with thousand separators and no decimal places 
(#,###,##0)
diff --git a/ledger_invariant.cpp b/ledger_invariant.cpp
index cb61fa1b..df367210 100644
--- a/ledger_invariant.cpp
+++ b/ledger_invariant.cpp
@@ -111,12 +111,6 @@ void LedgerInvariant::Alloc(int len)
     OtherVectors    ["AddonCompOnAssets"          ] = &AddonCompOnAssets       
   ;
     OtherVectors    ["AddonCompOnPremium"         ] = &AddonCompOnPremium      
   ;
     OtherVectors    ["CorridorFactor"             ] = &CorridorFactor          
   ;
-    OtherVectors    ["Irc7702ic_usual"            ] = &Irc7702ic_usual         
   ;
-    OtherVectors    ["Irc7702ic_glp"              ] = &Irc7702ic_glp           
   ;
-    OtherVectors    ["Irc7702ic_gsp"              ] = &Irc7702ic_gsp           
   ;
-    OtherVectors    ["Irc7702ig_usual"            ] = &Irc7702ig_usual         
   ;
-    OtherVectors    ["Irc7702ig_glp"              ] = &Irc7702ig_glp           
   ;
-    OtherVectors    ["Irc7702ig_gsp"              ] = &Irc7702ig_gsp           
   ;
     OtherVectors    ["AnnLoanDueRate"             ] = &AnnLoanDueRate          
   ;
     OtherVectors    ["CurrMandE"                  ] = &CurrMandE               
   ;
     OtherVectors    ["TotalIMF"                   ] = &TotalIMF                
   ;
diff --git a/ledger_invariant.hpp b/ledger_invariant.hpp
index f9fb0e34..8995f57c 100644
--- a/ledger_invariant.hpp
+++ b/ledger_invariant.hpp
@@ -98,12 +98,6 @@ class LMI_SO LedgerInvariant final
     std::vector<double> AddonCompOnAssets;
     std::vector<double> AddonCompOnPremium;
     std::vector<double> CorridorFactor;
-    std::vector<double> Irc7702ic_usual;
-    std::vector<double> Irc7702ic_glp;
-    std::vector<double> Irc7702ic_gsp;
-    std::vector<double> Irc7702ig_usual;
-    std::vector<double> Irc7702ig_glp;
-    std::vector<double> Irc7702ig_gsp;
     std::vector<double> AnnLoanDueRate;
     // TODO ?? M&E varies by basis (cf. 'GuarMaxMandE' below), so it
     // belongs in the variant ledger.
diff --git a/ledger_invariant_init.cpp b/ledger_invariant_init.cpp
index 50131860..71ee1795 100644
--- a/ledger_invariant_init.cpp
+++ b/ledger_invariant_init.cpp
@@ -139,15 +139,6 @@ void LedgerInvariant::Init(BasicValues const* b)
     AddonCompOnAssets          = b->yare_input_.ExtraCompensationOnAssets ;
     AddonCompOnPremium         = b->yare_input_.ExtraCompensationOnPremium;
     CorridorFactor             = b->GetCorridorFactor();
-    if(!is_antediluvian_fork())
-        {
-        Irc7702ic_usual            = b->i7702_->ic_usual();
-        Irc7702ic_glp              = b->i7702_->ic_glp  ();
-        Irc7702ic_gsp              = b->i7702_->ic_gsp  ();
-        Irc7702ig_usual            = b->i7702_->ig_usual();
-        Irc7702ig_glp              = b->i7702_->ig_glp  ();
-        Irc7702ig_gsp              = b->i7702_->ig_gsp  ();
-        }
 
     AnnLoanDueRate = b->InterestRates_->RegLnDueRate
         (mce_gen_curr
diff --git a/ledger_variant.cpp b/ledger_variant.cpp
index e4a0734e..12333753 100644
--- a/ledger_variant.cpp
+++ b/ledger_variant.cpp
@@ -120,10 +120,6 @@ void LedgerVariant::Alloc(int len)
     EndYearVectors  ["TermPurchased"          ] = &TermPurchased          ; // 
f5
     EndYearVectors  ["BaseDeathBft"           ] = &BaseDeathBft           ; // 
f5
 
-    OtherVectors    ["MlySAIntRate"           ] = &MlySAIntRate           ;
-    OtherVectors    ["MlyGAIntRate"           ] = &MlyGAIntRate           ;
-    OtherVectors    ["MlyHoneymoonValueRate"  ] = &MlyHoneymoonValueRate  ;
-    OtherVectors    ["MlyPostHoneymoonRate"   ] = &MlyPostHoneymoonRate   ;
     OtherVectors    ["AnnSAIntRate"           ] = &AnnSAIntRate           ;
     OtherVectors    ["AnnGAIntRate"           ] = &AnnGAIntRate           ;
     OtherVectors    ["AnnHoneymoonValueRate"  ] = &AnnHoneymoonValueRate  ;
@@ -218,7 +214,6 @@ LedgerVariant& LedgerVariant::PlusEq
 //============================================================================
 void LedgerVariant::RecordDynamicSepAcctRate
     (double annual_rate
-    ,double monthly_rate
     ,int year
     )
 {
@@ -227,7 +222,6 @@ void LedgerVariant::RecordDynamicSepAcctRate
         {
         InitAnnSepAcctNetInt = annual_rate;
         }
-    MlySAIntRate[year] = monthly_rate;
 }
 
 //============================================================================
diff --git a/ledger_variant.hpp b/ledger_variant.hpp
index 287fa5a7..60526256 100644
--- a/ledger_variant.hpp
+++ b/ledger_variant.hpp
@@ -67,7 +67,6 @@ class LMI_SO LedgerVariant final
 
     void RecordDynamicSepAcctRate
         (double annual_rate
-        ,double monthly_rate
         ,int year
         );
 
@@ -123,10 +122,6 @@ class LMI_SO LedgerVariant final
     // Forborne vectors [none presently].
 
     // Nonscalable vectors.
-    std::vector<double> MlySAIntRate;
-    std::vector<double> MlyGAIntRate;
-    std::vector<double> MlyHoneymoonValueRate;
-    std::vector<double> MlyPostHoneymoonRate;
     std::vector<double> AnnSAIntRate;
     std::vector<double> AnnGAIntRate;
     std::vector<double> AnnHoneymoonValueRate;
diff --git a/ledger_variant_init.cpp b/ledger_variant_init.cpp
index c091a876..b3c408e2 100644
--- a/ledger_variant_init.cpp
+++ b/ledger_variant_init.cpp
@@ -45,23 +45,6 @@ void LedgerVariant::Init
 //  COICharge       =
 //  RiderCharges    =
 //  ExpenseCharges  =
-    MlySAIntRate               = bv.InterestRates_->SepAcctNetRate
-        (SepBasis_
-        ,GenBasis_
-        ,mce_monthly_rate
-        );
-    MlyGAIntRate               = bv.InterestRates_->GenAcctNetRate
-        (GenBasis_
-        ,mce_monthly_rate
-        );
-    MlyHoneymoonValueRate      = bv.InterestRates_->HoneymoonValueRate
-        (GenBasis_
-        ,mce_monthly_rate
-        );
-    MlyPostHoneymoonRate       = bv.InterestRates_->PostHoneymoonGenAcctRate
-        (GenBasis_
-        ,mce_monthly_rate
-        );
     AnnSAIntRate               = bv.InterestRates_->SepAcctNetRate
         (SepBasis_
         ,GenBasis_
diff --git a/nychthemeral_test.sh b/nychthemeral_test.sh
index a60e82e7..9c0e7b78 100755
--- a/nychthemeral_test.sh
+++ b/nychthemeral_test.sh
@@ -415,13 +415,11 @@ mv sample.summary.tsv               
sample.summary.tsv.touchstone
 mv sample.test0                     sample.test0.touchstone
 mv sample.test1                     sample.test1.touchstone
 
-# MlySAIntRate = 0.0053403194199831...; differs slightly for x87
 # DatePrepared: it's unclear why ".*" is needed, but it "works"
 for z in *.touchstone; do \
   diff \
     --unified=0 \
     --strip-trailing-cr \
-    --ignore-matching-lines="^0\.0053403194199831" \
     --ignore-matching-lines="^DatePrepared[ \t]*.*'[0-9-]*'$" \
     "$z" "$srcdir/$z" \
   || true ; \



reply via email to

[Prev in Thread] Current Thread [Next in Thread]