mirror of
https://github.com/CatalaLang/catala.git
synced 2024-09-20 00:41:05 +03:00
Generating OCaml for aides au logement
This commit is contained in:
parent
8d3e283669
commit
7461a8db31
39733
french_law/ocaml/law_source/aides_logement.ml
Normal file
39733
french_law/ocaml/law_source/aides_logement.ml
Normal file
File diff suppressed because it is too large
Load Diff
5769
french_law/ocaml/law_source/aides_logement_api_web.ml
Normal file
5769
french_law/ocaml/law_source/aides_logement_api_web.ml
Normal file
File diff suppressed because it is too large
Load Diff
@ -506,7 +506,7 @@ let enfant_le_plus_age (enfant_le_plus_age_in : EnfantLePlusAgeIn.t) :
|
||||
(fun (acc_ : _) (item_ : _) ->
|
||||
if predicate_ acc_ >! predicate_ item_ then acc_ else item_)
|
||||
{
|
||||
Enfant.identifiant = ~-!(integer_of_string "1");
|
||||
Enfant.identifiant = integer_of_string "-1";
|
||||
Enfant.obligation_scolaire =
|
||||
SituationObligationScolaire.Pendant ();
|
||||
Enfant.remuneration_mensuelle = money_of_cents_string "0";
|
||||
|
Loading…
Reference in New Issue
Block a user