mirror of
https://github.com/betagouv/mon-entreprise
synced 2025-02-09 22:45:01 +00:00
1b963b8bbe
Cela permet l'inférence de type à partir des fichiers js qui ne sont pas encore convertis en TypeScript. Par ailleurs suppression des dernières traces de Flow. Ajout d'options plus strictes pour dans la config tsconfig.js
61 lines
1.7 KiB
TypeScript
61 lines
1.7 KiB
TypeScript
import {
|
|
add,
|
|
countBy,
|
|
descend,
|
|
flatten,
|
|
fromPairs,
|
|
head,
|
|
identity,
|
|
keys,
|
|
map,
|
|
mergeWith,
|
|
pair,
|
|
reduce,
|
|
sortWith,
|
|
toPairs,
|
|
values
|
|
} from 'ramda'
|
|
|
|
/*
|
|
COLLECTE DES VARIABLES MANQUANTES
|
|
*********************************
|
|
on collecte les variables manquantes : celles qui sont nécessaires pour
|
|
remplir les objectifs de la simulation (calculer des cotisations) mais qui n'ont pas
|
|
encore été renseignées
|
|
|
|
TODO perf : peut-on le faire en même temps que l'on traverse l'AST ?
|
|
Oui sûrement, cette liste se complète en remontant l'arbre. En fait, on le fait déjà pour nodeValue,
|
|
et quand nodeValue vaut null, c'est qu'il y a des missingVariables ! Il suffit donc de remplacer les
|
|
null par un tableau, et d'ailleurs utiliser des fonction d'aide pour mutualiser ces tests.
|
|
|
|
missingVariables: {variable: [objectives]}
|
|
*/
|
|
|
|
export let collectMissingVariablesByTarget = (targets = []) =>
|
|
fromPairs(targets.map(target => [target.dottedName, target.missingVariables]))
|
|
|
|
export let getNextSteps = missingVariablesByTarget => {
|
|
let byCount = ([, [count]]) => count
|
|
let byScore = ([, [, score]]) => score
|
|
|
|
let missingByTotalScore = reduce(
|
|
mergeWith(add),
|
|
{},
|
|
values(missingVariablesByTarget)
|
|
)
|
|
|
|
let innerKeys = flatten(map(keys, values(missingVariablesByTarget))),
|
|
missingByTargetsAdvanced = countBy(identity, innerKeys)
|
|
|
|
let missingByCompound = mergeWith(
|
|
pair,
|
|
missingByTargetsAdvanced,
|
|
missingByTotalScore
|
|
),
|
|
pairs = toPairs(missingByCompound),
|
|
sortedPairs = sortWith([descend(byCount), descend(byScore) as any], pairs)
|
|
return map(head, sortedPairs)
|
|
}
|
|
|
|
export let collectMissingVariables = targets =>
|
|
getNextSteps(collectMissingVariablesByTarget(targets))
|