@f1studio/form-spec 5.0.0-alpha.135 → 5.0.0-alpha.137

package/src/FormSpec.FS/Integrations/Adapters/CorEMR/CoreMREncoder.ts

@@ -1,24 +1,174 @@
-import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../../../../Thoth.Json/packages/Thoth.Json/Decode.js";
-import { comparePrimitives, uncurry2 } from "@fable-org/fable-library-js/Util.js";
+import { FSharpRef, Record } from "@fable-org/fable-library-js/Types.js";
+import { orElse, defaultArg, map, value as value_3, bind, unwrap, Option } from "@fable-org/fable-library-js/Option.js";
+import { int32, float64 } from "@fable-org/fable-library-js/Int32.js";
+import { comparePrimitives, stringHash, uncurry2, IComparable, IEquatable } from "@fable-org/fable-library-js/Util.js";
+import { record_type, option_type, float64_type, TypeInfo } from "@fable-org/fable-library-js/Reflection.js";
+import { fold, contains, exists, tail, choose, map as map_1, singleton, empty, tryFind, head, isEmpty, FSharpList, collect, filter } from "@fable-org/fable-library-js/List.js";
+import { Shared_MatrixItemKey, Shared_MatrixAnswer, Spec_MultiChoiceInfo, Spec_SingleChoiceInfo, Shared_FieldOption, Shared_FieldOptionKey, Shared_FieldKey, Spec_FormSpec$1, Shared_FieldValue, Shared_FieldAnswer, Shared_PluginDataProperty, Shared_FieldValue_$union, Spec_FormStep$1, Spec_FormField$1, Spec_PluginFieldConfig, Spec_FieldType_$union } from "../../../FormSpec.js";
+import { split, isNullOrWhiteSpace } from "@fable-org/fable-library-js/String.js";
+import { tryParse } from "@fable-org/fable-library-js/Double.js";
+import { item } from "@fable-org/fable-library-js/Array.js";
+import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../../../../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
 import { CoreMRStepMap, CoreMRMatrixItemAnchor, CoreMRChoiceAnchor, CoreMRFieldAnchor, CoreMRSourceMap, CoreMRSourceMap_$reflection } from "./CoreMRSourceMap.js";
 import { FSharpResult$2_Ok, FSharpResult$2_Error, FSharpResult$2_$union } from "@fable-org/fable-library-js/Result.js";
-import { Auto_generateBoxedEncoder_437914C6, toString } from "../../../../Thoth.Json/packages/Thoth.Json/Encode.js";
+import { Auto_generateBoxedEncoder_437914C6, toString } from "../../../../libs/Thoth.Json/packages/Thoth.Json/Encode.js";
 import { CoreMRAnswer, CoreMRFormInsertRequest, CoreMRFormInsertRequest_$reflection } from "./FormSpecToCoreMRInsert.js";
-import { CaseStrategy_CamelCase } from "../../../../Thoth.Json/packages/Thoth.Json/Types.js";
-import { isNullOrWhiteSpace } from "@fable-org/fable-library-js/String.js";
-import { Spec_FormSpec$1, Spec_FormStep$1, Spec_FormField$1, Shared_PluginDataProperty, Shared_MatrixItemKey, Shared_MatrixAnswer, Shared_FieldAnswer, Shared_FieldValue, Shared_FieldValue_$union, Spec_FieldType_$union, Spec_MultiChoiceInfo, Spec_SingleChoiceInfo, Shared_FieldOption, Shared_FieldOptionKey, Shared_FieldKey } from "../../../FormSpec.js";
+import { CaseStrategy_CamelCase } from "../../../../libs/Thoth.Json/packages/Thoth.Json/Types.js";
 import { Helpers_canonicalizeFieldKey } from "../../../Helpers.js";
-import { orElse, defaultArg, value as value_2, Option, map, bind } from "@fable-org/fable-library-js/Option.js";
-import { int64, fromInt32, toInt64 } from "@fable-org/fable-library-js/BigInt.js";
-import { int32 } from "@fable-org/fable-library-js/Int32.js";
-import { collect, exists, head, tail, choose, isEmpty, map as map_1, singleton, empty, FSharpList, tryFind } from "@fable-org/fable-library-js/List.js";
+import { op_LeftShift, op_BitwiseOr, int64, fromInt32, toInt64 } from "@fable-org/fable-library-js/BigInt.js";
 import { toList, FSharpSet } from "@fable-org/fable-library-js/Set.js";
 import { computeBitmask } from "../../../BitmaskHelpers.js";
 import { FSharpMap, ofList, tryFind as tryFind_1 } from "@fable-org/fable-library-js/Map.js";
+import { Operators_FailurePattern } from "@fable-org/fable-library-js/FSharp.Core.js";
+
+export class ExtractedVitals extends Record implements IEquatable<ExtractedVitals>, IComparable<ExtractedVitals> {
+    readonly Temperature: Option<float64>;
+    readonly SystolicBp: Option<float64>;
+    readonly DiastolicBp: Option<float64>;
+    readonly HeartRate: Option<float64>;
+    readonly RespiratoryRate: Option<float64>;
+    readonly Spo2: Option<float64>;
+    readonly PainScale: Option<float64>;
+    constructor(Temperature: Option<float64>, SystolicBp: Option<float64>, DiastolicBp: Option<float64>, HeartRate: Option<float64>, RespiratoryRate: Option<float64>, Spo2: Option<float64>, PainScale: Option<float64>) {
+        super();
+        this.Temperature = Temperature;
+        this.SystolicBp = SystolicBp;
+        this.DiastolicBp = DiastolicBp;
+        this.HeartRate = HeartRate;
+        this.RespiratoryRate = RespiratoryRate;
+        this.Spo2 = Spo2;
+        this.PainScale = PainScale;
+    }
+}
+
+export function ExtractedVitals_$reflection(): TypeInfo {
+    return record_type("FormSpec.Integrations.CorEMR.CoreMREncoder.ExtractedVitals", [], ExtractedVitals, () => [["Temperature", option_type(float64_type)], ["SystolicBp", option_type(float64_type)], ["DiastolicBp", option_type(float64_type)], ["HeartRate", option_type(float64_type)], ["RespiratoryRate", option_type(float64_type)], ["Spo2", option_type(float64_type)], ["PainScale", option_type(float64_type)]]);
+}
 
 /**
  * 🚀 BIGINT LIBERATION: Native BigInt support via Fable 4.28.0+ & Liberation Fork
  * No Extra.* needed - using native Thoth.Json auto generation only
+ * 🩺 Convert extracted vitals to CoreMR bridge API format (camelCase)
+ */
+export function vitalsTobridge(vitals: ExtractedVitals): { diastolicBp?: float64, heartRate?: float64, respiratoryRate?: float64, spo2?: float64, systolicBp?: float64, temperature?: float64 } {
+    return {
+        diastolicBp: unwrap(vitals.DiastolicBp),
+        heartRate: unwrap(vitals.HeartRate),
+        respiratoryRate: unwrap(vitals.RespiratoryRate),
+        spo2: unwrap(vitals.Spo2),
+        systolicBp: unwrap(vitals.SystolicBp),
+        temperature: unwrap(vitals.Temperature),
+    };
+}
+
+/**
+ * 🩺 Extract vitals data from FormSpec for separate bridge submission
+ * Finds Type 130 vitals fields and converts PluginData to bridge format
+ */
+export function extractVitalsFromFormSpec(spec: Spec_FormSpec$1<Spec_FieldType_$union>): Option<ExtractedVitals> {
+    try {
+        const vitalsFields: FSharpList<Spec_FormField$1<Spec_FieldType_$union>> = filter<Spec_FormField$1<Spec_FieldType_$union>>((field: Spec_FormField$1<Spec_FieldType_$union>): boolean => {
+            const matchValue: Spec_FieldType_$union = field.FieldType;
+            let matchResult: int32, pf_1: Spec_PluginFieldConfig;
+            if (matchValue.tag === /* PluginField */ 23) {
+                if (matchValue.fields[0].PluginId === "Fable.Form.Simple.Bulma.Fields.VitalsField") {
+                    matchResult = 0;
+                    pf_1 = matchValue.fields[0];
+                }
+                else {
+                    matchResult = 1;
+                }
+            }
+            else {
+                matchResult = 1;
+            }
+            switch (matchResult) {
+                case 0:
+                    return true;
+                default:
+                    return false;
+            }
+        }, collect<Spec_FormStep$1<Spec_FieldType_$union>, Spec_FormField$1<Spec_FieldType_$union>>((step: Spec_FormStep$1<Spec_FieldType_$union>): FSharpList<Spec_FormField$1<Spec_FieldType_$union>> => step.Fields, spec.Steps));
+        if (!isEmpty(vitalsFields)) {
+            const matchValue_1: Option<Shared_FieldValue_$union> = head(vitalsFields).Value;
+            let matchResult_1: int32, props: FSharpList<Shared_PluginDataProperty>, answer: Shared_FieldAnswer;
+            if (matchValue_1 != null) {
+                switch (value_3(matchValue_1).tag) {
+                    case /* PluginData */ 3: {
+                        matchResult_1 = 0;
+                        props = (value_3(matchValue_1) as Shared_FieldValue<3>).fields[0];
+                        break;
+                    }
+                    case /* Single */ 0: {
+                        matchResult_1 = 1;
+                        answer = (value_3(matchValue_1) as Shared_FieldValue<0>).fields[0];
+                        break;
+                    }
+                    default:
+                        matchResult_1 = 2;
+                }
+            }
+            else {
+                matchResult_1 = 2;
+            }
+            switch (matchResult_1) {
+                case 0: {
+                    const getVitalValue = (propertyName: string): Option<float64> => bind<Shared_PluginDataProperty, float64>((p_1: Shared_PluginDataProperty): Option<float64> => {
+                        if (isNullOrWhiteSpace(p_1.Value)) {
+                            return undefined;
+                        }
+                        else {
+                            let matchValue_2: [boolean, float64];
+                            let outArg = 0;
+                            matchValue_2 = ([tryParse(p_1.Value, new FSharpRef<float64>((): float64 => outArg, (v: float64): void => {
+                                outArg = v;
+                            })), outArg] as [boolean, float64]);
+                            if (matchValue_2[0]) {
+                                return matchValue_2[1];
+                            }
+                            else {
+                                return undefined;
+                            }
+                        }
+                    }, tryFind<Shared_PluginDataProperty>((p: Shared_PluginDataProperty): boolean => (p.Name === propertyName), props!));
+                    return new ExtractedVitals(getVitalValue("temperature"), getVitalValue("systolic_bp"), getVitalValue("diastolic_bp"), getVitalValue("pulse"), getVitalValue("respiration"), getVitalValue("oxygen_saturation"), getVitalValue("pain_scale"));
+                }
+                case 1: {
+                    const parts: string[] = split(answer!.Value, ["|"], undefined, 0);
+                    const parseAt = (index: int32): Option<float64> => {
+                        if ((index < parts.length) && !isNullOrWhiteSpace(item(index, parts))) {
+                            let matchValue_3: [boolean, float64];
+                            let outArg_1 = 0;
+                            matchValue_3 = ([tryParse(item(index, parts), new FSharpRef<float64>((): float64 => outArg_1, (v_2: float64): void => {
+                                outArg_1 = v_2;
+                            })), outArg_1] as [boolean, float64]);
+                            if (matchValue_3[0]) {
+                                return matchValue_3[1];
+                            }
+                            else {
+                                return undefined;
+                            }
+                        }
+                        else {
+                            return undefined;
+                        }
+                    };
+                    return new ExtractedVitals(parseAt(0), parseAt(1), parseAt(2), parseAt(3), parseAt(4), parseAt(5), parseAt(6));
+                }
+                default:
+                    return undefined;
+            }
+        }
+        else {
+            return undefined;
+        }
+    }
+    catch (ex: any) {
+        return undefined;
+    }
+}
+
+/**
  * Decode provenance payload using Thoth Auto — same type that was encoded by
  * CoreMRSourceMap.convertWithMapAndProvenance (Encode.Auto.toString).
  * Native Thoth.Json auto generation with full int64 support.
@@ -124,8 +274,7 @@ function getOptionsFromFieldType(ft: Spec_FieldType_$union): FSharpList<Shared_F
     }
 }
 
-function fieldToAnswers(field: Spec_FormField$1<Spec_FieldType_$union>, anchor: CoreMRFieldAnchor): FSharpList<CoreMRAnswer> {
-    let canonicalAnswer: string;
+function fieldToAnswers(field: Spec_FormField$1<Spec_FieldType_$union>, vitalsIdOpt: Option<int64>, anchor: CoreMRFieldAnchor): FSharpList<CoreMRAnswer> {
     if (anchor.Encoding.IsSkip) {
         return empty<CoreMRAnswer>();
     }
@@ -135,38 +284,43 @@ function fieldToAnswers(field: Spec_FormField$1<Spec_FieldType_$union>, anchor:
     else {
         const matchValue: Option<Shared_FieldValue_$union> = field.Value;
         if (matchValue != null) {
-            switch (value_2(matchValue).tag) {
+            switch (value_3(matchValue).tag) {
                 case /* Multiple */ 1: {
-                    const answers: FSharpSet<Shared_FieldAnswer> = (value_2(matchValue) as Shared_FieldValue<1>).fields[0];
-                    if (anchor.Encoding.ValueEncoding !== "choice_score") {
-                        return empty<CoreMRAnswer>();
-                    }
-                    else {
-                        const options_1: FSharpList<Shared_FieldOption> = getOptionsFromFieldType(field.FieldType);
-                        const choicesWithBitPos: FSharpList<[string, int32]> = map_1<CoreMRChoiceAnchor, [string, int32]>((c_2: CoreMRChoiceAnchor): [string, int32] => {
-                            const bit: int32 = defaultArg(c_2.BitPosition, c_2.Sequence - 1) | 0;
-                            return [getFieldOptionKeyGuid(c_2.FieldOptionKey), bit] as [string, int32];
-                        }, anchor.Choices);
-                        if (isEmpty(choicesWithBitPos)) {
-                            return empty<CoreMRAnswer>();
-                        }
-                        else {
-                            return singleton(new CoreMRAnswer(anchor.Sequence, computeBitmask(choose<string, int32>((key: string): Option<int32> => map<[string, int32], int32>((tuple: [string, int32]): int32 => tuple[1], tryFind<[string, int32]>((tupledArg: [string, int32]): boolean => (tupledArg[0] === key), choicesWithBitPos)), choose<string, string>((valStr_1: string): Option<string> => map<Shared_FieldOption, string>((opt_2: Shared_FieldOption): string => getFieldOptionKeyGuid(opt_2.OptionKey), tryFind<Shared_FieldOption>((opt_1: Shared_FieldOption): boolean => (Helpers_canonicalizeFieldKey(opt_1.Value) === Helpers_canonicalizeFieldKey(valStr_1)), options_1)), map_1<Shared_FieldAnswer, string>((a: Shared_FieldAnswer): string => a.Value, toList<Shared_FieldAnswer>(answers))))), undefined));
+                    const answers: FSharpSet<Shared_FieldAnswer> = (value_3(matchValue) as Shared_FieldValue<1>).fields[0];
+                    const matchValue_3: int32 = anchor.ItemTypeId | 0;
+                    switch (matchValue_3) {
+                        case 26:
+                        case 40:
+                        case 41:
+                        case 143: {
+                            const options_1: FSharpList<Shared_FieldOption> = getOptionsFromFieldType(field.FieldType);
+                            const choicesWithBitPos_1: FSharpList<[string, int32]> = map_1<CoreMRChoiceAnchor, [string, int32]>((c_3: CoreMRChoiceAnchor): [string, int32] => {
+                                const bit_2: int32 = defaultArg(c_3.BitPosition, c_3.Sequence - 1) | 0;
+                                return [getFieldOptionKeyGuid(c_3.FieldOptionKey), bit_2] as [string, int32];
+                            }, anchor.Choices);
+                            if (isEmpty(choicesWithBitPos_1)) {
+                                throw new Error(`🚨 ItemTypeId ${anchor.ItemTypeId} multiple choice field ${anchor.FieldKey} has no choices`);
+                            }
+                            else {
+                                return singleton(new CoreMRAnswer(anchor.Sequence, computeBitmask(choose<string, int32>((key: string): Option<int32> => map<[string, int32], int32>((tuple: [string, int32]): int32 => tuple[1], tryFind<[string, int32]>((tupledArg_1: [string, int32]): boolean => (tupledArg_1[0] === key), choicesWithBitPos_1)), choose<string, string>((valStr_1: string): Option<string> => map<Shared_FieldOption, string>((opt_4: Shared_FieldOption): string => getFieldOptionKeyGuid(opt_4.OptionKey), tryFind<Shared_FieldOption>((opt_3: Shared_FieldOption): boolean => (Helpers_canonicalizeFieldKey(opt_3.Value) === Helpers_canonicalizeFieldKey(valStr_1)), options_1)), map_1<Shared_FieldAnswer, string>((a: Shared_FieldAnswer): string => a.Value, toList<Shared_FieldAnswer>(answers))))), undefined));
+                            }
                         }
+                        default:
+                            throw new Error(`🚨 Multiple answers not supported for CoreMR ItemTypeId ${anchor.ItemTypeId} field ${anchor.FieldKey} - only bitmask types (26,40,41,143) support multiple selection!`);
                     }
                 }
                 case /* Matrix */ 2: {
-                    const matrixAnswer: Shared_MatrixAnswer = (value_2(matchValue) as Shared_FieldValue<2>).fields[0];
+                    const matrixAnswer: Shared_MatrixAnswer = (value_3(matchValue) as Shared_FieldValue<2>).fields[0];
                     if (isEmpty(anchor.MatrixItemAnchors)) {
                         return empty<CoreMRAnswer>();
                     }
                     else {
                         const options_2: FSharpList<Shared_FieldOption> = getOptionsFromFieldType(field.FieldType);
-                        return choose<CoreMRMatrixItemAnchor, CoreMRAnswer>((rowAnchor: CoreMRMatrixItemAnchor): Option<CoreMRAnswer> => map<string, CoreMRAnswer>((selectedValue: string): CoreMRAnswer => (new CoreMRAnswer(rowAnchor.Sequence, defaultArg(getScoreFromOption(options_2, selectedValue), 0n), undefined)), tryFind_1<Shared_MatrixItemKey, string>(rowAnchor.MatrixItemKey, matrixAnswer.Values)), anchor.MatrixItemAnchors);
+                        return choose<CoreMRMatrixItemAnchor, CoreMRAnswer>((rowAnchor: CoreMRMatrixItemAnchor): Option<CoreMRAnswer> => map<string, CoreMRAnswer>((selectedValue_1: string): CoreMRAnswer => (new CoreMRAnswer(rowAnchor.Sequence, defaultArg(getScoreFromOption(options_2, selectedValue_1), 0n), undefined)), tryFind_1<Shared_MatrixItemKey, string>(rowAnchor.MatrixItemKey, matrixAnswer.Values)), anchor.MatrixItemAnchors);
                     }
                 }
                 case /* PluginData */ 3: {
-                    const props: FSharpList<Shared_PluginDataProperty> = (value_2(matchValue) as Shared_FieldValue<3>).fields[0];
+                    const props: FSharpList<Shared_PluginDataProperty> = (value_3(matchValue) as Shared_FieldValue<3>).fields[0];
                     let matchResult: int32, p_1: Shared_PluginDataProperty;
                     if (!isEmpty(props)) {
                         if (isEmpty(tail(props))) {
@@ -193,56 +347,134 @@ function fieldToAnswers(field: Spec_FormField$1<Spec_FieldType_$union>, anchor:
                     }
                 }
                 default: {
-                    const answer: Shared_FieldAnswer = (value_2(matchValue) as Shared_FieldValue<0>).fields[0];
+                    const answer: Shared_FieldAnswer = (value_3(matchValue) as Shared_FieldValue<0>).fields[0];
                     const options: FSharpList<Shared_FieldOption> = getOptionsFromFieldType(field.FieldType);
-                    const matchValue_2: string = anchor.Encoding.ValueEncoding;
+                    const matchValue_2: int32 = anchor.ItemTypeId | 0;
                     switch (matchValue_2) {
-                        case "choice_score": {
-                            const matchValue_3: Option<int64> = orElse(getScoreFromOption(options, answer.Value), (canonicalAnswer = Helpers_canonicalizeFieldKey(answer.Value), map<CoreMRChoiceAnchor, int64>((c_1: CoreMRChoiceAnchor): int64 => c_1.Score, tryFind<CoreMRChoiceAnchor>((c: CoreMRChoiceAnchor): boolean => exists<Shared_FieldOption>((opt: Shared_FieldOption): boolean => {
+                        case 1:
+                        case 2:
+                            return singleton(new CoreMRAnswer(anchor.Sequence, 0n, supportsTextContent(anchor) ? answer.Value : undefined));
+                        case 20:
+                        case 21:
+                        case 25:
+                        case 32: {
+                            const canonicalAnswer: string = Helpers_canonicalizeFieldKey(answer.Value);
+                            const scoreOpt: Option<int64> = map<CoreMRChoiceAnchor, int64>((c_1: CoreMRChoiceAnchor): int64 => c_1.Score, tryFind<CoreMRChoiceAnchor>((c: CoreMRChoiceAnchor): boolean => exists<Shared_FieldOption>((opt: Shared_FieldOption): boolean => {
                                 if (getFieldOptionKeyGuid(opt.OptionKey) === getFieldOptionKeyGuid(c.FieldOptionKey)) {
                                     return Helpers_canonicalizeFieldKey(opt.Value) === canonicalAnswer;
                                 }
                                 else {
                                     return false;
                                 }
-                            }, options), anchor.Choices))));
-                            if (matchValue_3 == null) {
-                                return singleton(new CoreMRAnswer(anchor.Sequence, 0n, undefined));
+                            }, options), anchor.Choices));
+                            if (scoreOpt == null) {
+                                throw new Error(`🚨 No matching choice found for ItemTypeId ${anchor.ItemTypeId} field ${anchor.FieldKey} answer '${answer.Value}'`);
                             }
                             else {
-                                return singleton(new CoreMRAnswer(anchor.Sequence, value_2(matchValue_3), undefined));
+                                return singleton(new CoreMRAnswer(anchor.Sequence, value_3(scoreOpt), undefined));
                             }
                         }
-                        case "1_yes_2_no": {
+                        case 26:
+                        case 40:
+                        case 41:
+                        case 143: {
+                            const choicesWithBitPos: FSharpList<[string, int32]> = map_1<CoreMRChoiceAnchor, [string, int32]>((c_2: CoreMRChoiceAnchor): [string, int32] => {
+                                const bit: int32 = defaultArg(c_2.BitPosition, c_2.Sequence - 1) | 0;
+                                return [getFieldOptionKeyGuid(c_2.FieldOptionKey), bit] as [string, int32];
+                            }, anchor.Choices);
+                            if (isEmpty(choicesWithBitPos)) {
+                                throw new Error(`🚨 ItemTypeId ${anchor.ItemTypeId} bitmask field ${anchor.FieldKey} has no choices`);
+                            }
+                            else {
+                                const selectedKeys: FSharpList<string> = choose<string, string>((selectedValue: string): Option<string> => {
+                                    const canonicalSelected: string = Helpers_canonicalizeFieldKey(selectedValue);
+                                    return map<Shared_FieldOption, string>((opt_2: Shared_FieldOption): string => getFieldOptionKeyGuid(opt_2.OptionKey), tryFind<Shared_FieldOption>((opt_1: Shared_FieldOption): boolean => (Helpers_canonicalizeFieldKey(opt_1.Value) === canonicalSelected), options));
+                                }, singleton(answer.Value));
+                                const bitPositions: FSharpList<int32> = choose<[string, int32], int32>((tupledArg: [string, int32]): Option<int32> => {
+                                    if (contains<string>(tupledArg[0], selectedKeys, {
+                                        Equals: (x: string, y: string): boolean => (x === y),
+                                        GetHashCode: stringHash,
+                                    })) {
+                                        return tupledArg[1];
+                                    }
+                                    else {
+                                        return undefined;
+                                    }
+                                }, choicesWithBitPos);
+                                if (isEmpty(bitPositions)) {
+                                    throw new Error(`🚨 No matching bitmask choice found for ItemTypeId ${anchor.ItemTypeId} field ${anchor.FieldKey} answer '${answer.Value}'`);
+                                }
+                                return singleton(new CoreMRAnswer(anchor.Sequence, fold<int32, int64>((acc: int64, bit_1: int32): int64 => toInt64(op_BitwiseOr(acc, toInt64(op_LeftShift(1n, bit_1)))), 0n, bitPositions), undefined));
+                            }
+                        }
+                        case 30:
+                        case 31: {
                             const valStr: string = canonicalizeForYesNo(answer.Value);
-                            return singleton(new CoreMRAnswer(anchor.Sequence, (((valStr === "yes") ? true : (valStr === "true")) ? true : (valStr === "1")) ? (1n) : (2n), undefined));
+                            return singleton(new CoreMRAnswer(anchor.Sequence, (((valStr === "yes") ? true : (valStr === "true")) ? true : (valStr === "1")) ? (1n) : (2n), supportsTextContent(anchor) ? answer.Value : undefined));
                         }
-                        case "zero":
-                        case "scaffold":
-                        case "unknown":
+                        case 50:
+                        case 51:
+                        case 60:
                             return singleton(new CoreMRAnswer(anchor.Sequence, 0n, supportsTextContent(anchor) ? answer.Value : undefined));
+                        case 61:
+                            return empty<CoreMRAnswer>();
+                        case 110:
+                        case 120:
+                        case 121:
+                        case 130:
+                        case 131:
+                        case 132:
+                        case 133:
+                        case 134:
+                        case 135:
+                        case 138:
+                        case 140:
+                            return empty<CoreMRAnswer>();
                         default:
-                            return singleton(new CoreMRAnswer(anchor.Sequence, 0n, supportsTextContent(anchor) ? answer.Value : undefined));
+                            throw new Error(`🚨 UNKNOWN CoreMR ItemTypeId ${anchor.ItemTypeId} for field ${anchor.FieldKey} - cannot encode Single answer. Add support for this type in CoreMREncoder.fs!`);
                     }
                 }
             }
         }
         else {
-            const matchValue_1: string = anchor.Encoding.ValueEncoding;
+            const matchValue_1: int32 = anchor.ItemTypeId | 0;
             switch (matchValue_1) {
-                case "1_yes_2_no":
+                case 1:
+                case 2:
+                    return empty<CoreMRAnswer>();
+                case 20:
+                case 21:
+                case 25:
+                case 32:
+                    return empty<CoreMRAnswer>();
+                case 26:
+                case 40:
+                case 41:
+                case 143:
+                    return empty<CoreMRAnswer>();
+                case 30:
+                case 31:
                     return singleton(new CoreMRAnswer(anchor.Sequence, 2n, undefined));
-                case "choice_score":
-                    if (isEmpty(anchor.Choices)) {
-                        return empty<CoreMRAnswer>();
-                    }
-                    else {
-                        return singleton(new CoreMRAnswer(anchor.Sequence, 0n, undefined));
-                    }
-                case "zero":
-                    return singleton(new CoreMRAnswer(anchor.Sequence, 0n, undefined));
-                default:
+                case 50:
+                case 51:
+                case 60:
                     return empty<CoreMRAnswer>();
+                case 61:
+                    return empty<CoreMRAnswer>();
+                case 110:
+                case 120:
+                case 121:
+                case 130:
+                case 131:
+                case 132:
+                case 133:
+                case 134:
+                case 135:
+                case 138:
+                case 140:
+                    return empty<CoreMRAnswer>();
+                default:
+                    throw new Error(`🚨 UNKNOWN CoreMR ItemTypeId ${anchor.ItemTypeId} for field ${anchor.FieldKey} - cannot encode without user selection. Add support for this type in CoreMREncoder.fs!`);
             }
         }
     }
@@ -254,16 +486,16 @@ function buildFieldByKeyMap(spec: Spec_FormSpec$1<Spec_FieldType_$union>): FShar
     });
 }
 
-function anchorToAnswers(fieldMap: FSharpMap<string, Spec_FormField$1<Spec_FieldType_$union>>, anchor: CoreMRFieldAnchor): FSharpList<CoreMRAnswer> {
+function anchorToAnswers(fieldMap: FSharpMap<string, Spec_FormField$1<Spec_FieldType_$union>>, vitalsIdOpt: Option<int64>, anchor: CoreMRFieldAnchor): FSharpList<CoreMRAnswer> {
     const field: Option<Spec_FormField$1<Spec_FieldType_$union>> = tryFind_1<string, Spec_FormField$1<Spec_FieldType_$union>>(getFieldKeyGuid(anchor.FieldKey), fieldMap);
     if (anchor.Encoding.IsSkip) {
         return empty<CoreMRAnswer>();
     }
     else if (anchor.Encoding.IsScaffold) {
-        return singleton(new CoreMRAnswer(anchor.Sequence, 2n, undefined));
+        return empty<CoreMRAnswer>();
     }
     else if (field != null) {
-        return fieldToAnswers(value_2(field), anchor);
+        return fieldToAnswers(value_3(field), vitalsIdOpt, anchor);
     }
     else {
         const matchValue: string = anchor.Encoding.ValueEncoding;
@@ -285,13 +517,55 @@ function anchorToAnswers(fieldMap: FSharpMap<string, Spec_FormField$1<Spec_Field
     }
 }
 
+/**
+ * 🩺 Encode filled FormSpec to CoreMR form-insert payload WITH VITALS COORDINATION.
+ * Uses provided flow_vitals.id for Type 130 vitals fields.
+ * This is the NEW smart coordination function that handles vitals references.
+ */
+export function encodeToFormAnswersWithVitals(provenancePayload: string, filledFormSpec: Spec_FormSpec$1<Spec_FieldType_$union>, vitalsIdOpt: Option<int64>, scaffoldMode: boolean, dryRun: boolean): FSharpResult$2_$union<CoreMRFormInsertRequest, string> {
+    let msg: string, acc: FSharpList<CoreMRAnswer>;
+    const matchValue: FSharpResult$2_$union<CoreMRSourceMap, string> = tryDecodeSourceMap(provenancePayload);
+    if (matchValue.tag === /* Ok */ 0) {
+        const sourceMap: CoreMRSourceMap = matchValue.fields[0];
+        const formName: string = defaultArg(sourceMap.FormName, `CORE-${sourceMap.FormId}`);
+        const fieldMap: FSharpMap<string, Spec_FormField$1<Spec_FieldType_$union>> = buildFieldByKeyMap(filledFormSpec);
+        try {
+            return FSharpResult$2_Ok<CoreMRFormInsertRequest, string>(new CoreMRFormInsertRequest(sourceMap.FormId, formName, scaffoldMode ? undefined : ((acc = collect<CoreMRFieldAnchor, CoreMRAnswer>((anchor: CoreMRFieldAnchor): FSharpList<CoreMRAnswer> => anchorToAnswers(fieldMap, vitalsIdOpt, anchor), collect<CoreMRStepMap, CoreMRFieldAnchor>((step: CoreMRStepMap): FSharpList<CoreMRFieldAnchor> => step.FieldAnchors, sourceMap.Steps)), isEmpty(acc) ? undefined : acc)), dryRun));
+        }
+        catch (matchValue_1: any) {
+            const activePatternResult: Option<string> = Operators_FailurePattern(matchValue_1);
+            return (activePatternResult != null) ? ((msg = value_3(activePatternResult), FSharpResult$2_Error<CoreMRFormInsertRequest, string>(`CoreMR encoding failed: ${msg}`))) : FSharpResult$2_Error<CoreMRFormInsertRequest, string>(`Unexpected error during CoreMR encoding: ${matchValue_1.message}`);
+        }
+    }
+    else {
+        return FSharpResult$2_Error<CoreMRFormInsertRequest, string>(`Invalid provenance payload: ${matchValue.fields[0]}`);
+    }
+}
+
+/**
+ * 🚀 SMART COORDINATION: Extract vitals and form data for two-phase bridge submission
+ * Returns (vitalsOpt, formRequest) where vitalsOpt should be sent to /vitals endpoint first
+ * and formRequest should be sent to /forms endpoint with vitalsId reference
+ */
+export function extractVitalsAndFormData(provenancePayload: string, filledFormSpec: Spec_FormSpec$1<Spec_FieldType_$union>, scaffoldMode: boolean, dryRun: boolean): FSharpResult$2_$union<[Option<ExtractedVitals>, CoreMRFormInsertRequest], string> {
+    const vitalsOpt: Option<ExtractedVitals> = extractVitalsFromFormSpec(filledFormSpec);
+    const matchValue: FSharpResult$2_$union<CoreMRFormInsertRequest, string> = encodeToFormAnswersWithVitals(provenancePayload, filledFormSpec, undefined, scaffoldMode, dryRun);
+    if (matchValue.tag === /* Ok */ 0) {
+        return FSharpResult$2_Ok<[Option<ExtractedVitals>, CoreMRFormInsertRequest], string>([vitalsOpt, matchValue.fields[0]] as [Option<ExtractedVitals>, CoreMRFormInsertRequest]);
+    }
+    else {
+        return FSharpResult$2_Error<[Option<ExtractedVitals>, CoreMRFormInsertRequest], string>(matchValue.fields[0]);
+    }
+}
+
 /**
  * Encode filled FormSpec to CoreMR form-insert payload.
  * scaffoldMode: when true, omit answers (scaffold mode — all items get value=2).
  * Iterates over provenance anchors (source of truth) so we never omit required items.
+ * LEGACY: Use extractVitalsAndFormData for new smart coordination.
  */
 export function encodeToFormAnswers(provenancePayload: string, filledFormSpec: Spec_FormSpec$1<Spec_FieldType_$union>, scaffoldMode: boolean, dryRun: boolean): FSharpResult$2_$union<CoreMRFormInsertRequest, string> {
-    let acc: FSharpList<CoreMRAnswer>;
+    let msg: string, acc: FSharpList<CoreMRAnswer>;
     const matchValue: FSharpResult$2_$union<CoreMRSourceMap, string> = tryDecodeSourceMap(provenancePayload);
     if (matchValue.tag === /* Ok */ 0) {
         const sourceMap: CoreMRSourceMap = matchValue.fields[0];
@@ -303,7 +577,13 @@ export function encodeToFormAnswers(provenancePayload: string, filledFormSpec: S
             const value = `CORE-${sourceMap.FormId}`;
             formName = defaultArg(orElse(sourceMap.FormName, isNullOrWhiteSpace(filledFormSpec.Title) ? undefined : filledFormSpec.Title), value);
             const fieldMap: FSharpMap<string, Spec_FormField$1<Spec_FieldType_$union>> = buildFieldByKeyMap(filledFormSpec);
-            return FSharpResult$2_Ok<CoreMRFormInsertRequest, string>(new CoreMRFormInsertRequest(sourceMap.FormId, formName, scaffoldMode ? undefined : ((acc = collect<CoreMRFieldAnchor, CoreMRAnswer>((anchor: CoreMRFieldAnchor): FSharpList<CoreMRAnswer> => anchorToAnswers(fieldMap, anchor), collect<CoreMRStepMap, CoreMRFieldAnchor>((step: CoreMRStepMap): FSharpList<CoreMRFieldAnchor> => step.FieldAnchors, sourceMap.Steps)), isEmpty(acc) ? undefined : acc)), dryRun));
+            try {
+                return FSharpResult$2_Ok<CoreMRFormInsertRequest, string>(new CoreMRFormInsertRequest(sourceMap.FormId, formName, scaffoldMode ? undefined : ((acc = collect<CoreMRFieldAnchor, CoreMRAnswer>((anchor: CoreMRFieldAnchor): FSharpList<CoreMRAnswer> => anchorToAnswers(fieldMap, undefined, anchor), collect<CoreMRStepMap, CoreMRFieldAnchor>((step: CoreMRStepMap): FSharpList<CoreMRFieldAnchor> => step.FieldAnchors, sourceMap.Steps)), isEmpty(acc) ? undefined : acc)), dryRun));
+            }
+            catch (matchValue_1: any) {
+                const activePatternResult: Option<string> = Operators_FailurePattern(matchValue_1);
+                return (activePatternResult != null) ? ((msg = value_3(activePatternResult), FSharpResult$2_Error<CoreMRFormInsertRequest, string>(`CoreMR encoding failed: ${msg}`))) : FSharpResult$2_Error<CoreMRFormInsertRequest, string>(`Unexpected error during CoreMR encoding: ${matchValue_1.message}`);
+            }
         }
     }
     else {

package/src/FormSpec.FS/Integrations/Adapters/CorEMR/CoreMRSourceMap.ts

@@ -12,7 +12,7 @@ import { CoreMRFormData, CoreMRItem, CoreMRChoice, CoreMRTag_$reflection, CoreMR
 import { List_groupBy } from "@fable-org/fable-library-js/Seq2.js";
 import { detectHeadings, groupItemsByHeadings, Section, HeadingItem } from "./CorEMRSectioning.js";
 import { convertToFormSpec } from "./CorEMRTemplateToFormSpec.js";
-import { Auto_generateBoxedEncoder_437914C6, toString } from "../../../../Thoth.Json/packages/Thoth.Json/Encode.js";
+import { Auto_generateBoxedEncoder_437914C6, toString } from "../../../../libs/Thoth.Json/packages/Thoth.Json/Encode.js";
 import { IntegrationProvenance } from "../../../Provenance.js";
 
 export class ValueEncodingInfo extends Record implements IEquatable<ValueEncodingInfo>, IComparable<ValueEncodingInfo> {

package/src/FormSpec.FS/Integrations/Adapters/CorEMR/FormSpecToCoreMRInsert.ts

@@ -9,10 +9,10 @@ import { defaultArg, toArray, value as value_6, map, bind, Option } from "@fable
 import { map as map_1, choose, mapIndexed, collect, head, tail, isEmpty, ofArray, empty, tryFind, FSharpList } from "@fable-org/fable-library-js/List.js";
 import { Helpers_canonicalizeFieldKey } from "../../../Helpers.js";
 import { isNullOrWhiteSpace } from "@fable-org/fable-library-js/String.js";
-import { object, toString } from "../../../../Thoth.Json/packages/Thoth.Json/Encode.js";
-import { keyValuePairs, map as map_2, fromString, IOptionalGetter, list as list_4, IRequiredGetter, IGetters, int, object as object_1, string, fail, succeed, andThen, guid, index, field as field_1, oneOf } from "../../../../Thoth.Json/packages/Thoth.Json/Decode.js";
+import { object, toString } from "../../../../libs/Thoth.Json/packages/Thoth.Json/Encode.js";
+import { keyValuePairs, map as map_2, fromString, IOptionalGetter, list as list_4, IRequiredGetter, IGetters, int, object as object_1, string, fail, succeed, andThen, guid, index, field as field_1, oneOf } from "../../../../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
 import { FSharpResult$2_$union } from "@fable-org/fable-library-js/Result.js";
-import { ErrorReason_$union } from "../../../../Thoth.Json/packages/Thoth.Json/Types.js";
+import { ErrorReason_$union } from "../../../../libs/Thoth.Json/packages/Thoth.Json/Types.js";
 import { tryParse } from "@fable-org/fable-library-js/Guid.js";
 import { IntegrationProvenance } from "../../../Provenance.js";
 

package/src/FormSpec.FS/Integrations/CorEMR/TemplateManifestDecoder.ts

@@ -6,11 +6,11 @@ import { int32ToString, uncurry2, comparePrimitives, IComparable, IEquatable } f
 import { class_type, list_type, bool_type, record_type, option_type, string_type, int64_type, int32_type, TypeInfo } from "@fable-org/fable-library-js/Reflection.js";
 import { filter, length, sumBy as sumBy_1, empty, collect, map as map_2, isEmpty, FSharpList } from "@fable-org/fable-library-js/List.js";
 import { toSeq, ofList, FSharpMap } from "@fable-org/fable-library-js/Map.js";
-import { Auto_generateBoxedDecoder_Z6670B51 } from "../../../Thoth.Json/packages/Thoth.Json/Decode.js";
+import { Auto_generateBoxedDecoder_Z6670B51 } from "../../../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
 import { FSharpResult$2_$union } from "@fable-org/fable-library-js/Result.js";
-import { ErrorReason_$union } from "../../../Thoth.Json/packages/Thoth.Json/Types.js";
+import { ErrorReason_$union } from "../../../libs/Thoth.Json/packages/Thoth.Json/Types.js";
 import { isNullOrEmpty, toConsole, printf, toText } from "@fable-org/fable-library-js/String.js";
-import { fromString, list as list_5, bool, IOptionalGetter, IGetters, string, int, IRequiredGetter, object, map, keyValuePairs } from "../../../Thoth.Json/packages/Thoth.Json/Decode.js";
+import { fromString, list as list_5, bool, IOptionalGetter, IGetters, string, int, IRequiredGetter, object, map, keyValuePairs } from "../../../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
 import { CoreMRFormData, CoreMRTag, CoreMRTrigger, CoreMRFormMetadata, CoreMRItem, CoreMRChoice } from "./CoreMRTypes.js";
 import { sumBy } from "@fable-org/fable-library-js/Seq.js";
 

package/src/FormSpec.FS/Interop/FormSpec.Api.Helpers.ts

@@ -1,16 +1,16 @@
 import { map, unwrap, value as value_19, orElseWith, orElse, defaultArgWith as defaultArgWith_1, Option, defaultArg as defaultArg_1 } from "@fable-org/fable-library-js/Option.js";
 import { exists, sortBy, toArray as toArray_1, length as length_1, tryPick, filter, mapIndexed as mapIndexed_1, isEmpty, map as map_3, empty, ofArray as ofArray_1, ofSeq, fold, singleton, collect, tryFind, FSharpList } from "@fable-org/fable-library-js/List.js";
 import { isNullOrEmpty, toText, join, isNullOrWhiteSpace, printf, toConsole } from "@fable-org/fable-library-js/String.js";
-import { Auto_generateBoxedEncoder_437914C6, toString } from "../../Thoth.Json/packages/Thoth.Json/Encode.js";
+import { Auto_generateBoxedEncoder_437914C6, toString } from "../../libs/Thoth.Json/packages/Thoth.Json/Encode.js";
 import { Spec_SingleChoiceInfo, Spec_ClinicalInstrumentInfo, Spec_FormClassification_$union, ClinicalPathway_StateType_$union, ClinicalPathway_TaskPriority_$union, ClinicalPathway_AlertSeverity_$union, ClinicalPathway_ReferralUrgency_$union, ClinicalPathway_ActionInfo_$union, ClinicalPathway_NavigateToFormAction, ClinicalPathway_ProblemAction, ClinicalPathway_AlertAction, ClinicalPathway_EducationAction, ClinicalPathway_ProcedureAction, ClinicalPathway_TestAction, ClinicalPathway_DocumentationAction, ClinicalPathway_FieldValueSource_$union, ClinicalPathway_SetFieldValueAction, ClinicalPathway_PrescriptionAction, ClinicalPathway_MedicationAction, ClinicalPathway_ReferralAction, Shared_FieldValue, Shared_FieldValue_$union, ClinicalPathway_ClinicalPathwaySpec, ClinicalPathway_PathRequirement, ClinicalPathway_ConstraintDefinition, ClinicalPathway_PathwayExecutionMode_SinglePathway, ClinicalPathway_SinglePathwayConfig, ClinicalPathway_SelectionStrategy_HighestPriority, ClinicalPathway_TransitionDefinition, ClinicalPathway_TransitionCondition_FieldCondition, Shared_ConditionValue_Single, ClinicalPathway_FieldEvaluator_Equals, Shared_TransitionKey, ClinicalPathway_StateType_Terminal, ClinicalPathway_TerminalInfo, ClinicalPathway_StateDefinition, ClinicalPathway_StateType_Action, ClinicalPathway_ActionInfo_Task, ClinicalPathway_TaskAction, ClinicalPathway_DueDate_Today, ClinicalPathway_TaskPriority_Medium, ClinicalPathway_TaskPriority_Low, ClinicalPathway_TaskPriority_High, Shared_StateKey, Spec_FieldType_PluginField, Spec_PluginFieldConfig, Spec_FieldType_Matrix, Spec_MatrixInfo, Spec_FormClassification_General, Spec_FormLifecycle_Blueprint, Spec_FieldType_Text, Spec_TextInfo, Spec_FieldType_CheckboxList, Spec_MultiChoiceInfo, Shared_FieldOptionKey, Spec_FieldType_Checkbox, Spec_BooleanInfo, Shared_FieldKey, Shared_FieldOption, Shared_FieldValue_Single, Shared_FieldValue_PluginData, Shared_PluginDataProperty, Shared_PluginPropertyKey, Shared_FieldValue_Matrix, Shared_MatrixAnswer, Shared_MatrixItemKey, Shared_FieldValue_Multiple, Shared_FieldAnswer, Spec_FormStep$1, Spec_FormField$1, Spec_FieldType_$union, Spec_FormSpec$1, Spec_FormSpec$1_$reflection, Spec_FieldType_$reflection } from "../FormSpec.js";
-import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../../Thoth.Json/packages/Thoth.Json/Decode.js";
+import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
 import { comparePrimitives, int32ToString, int64ToString, defaultOf, equals, createObj, stringHash, compare, IDisposable, disposeSafe, IEnumerator, getEnumerator, IMap, isArrayLike, uncurry2 } from "@fable-org/fable-library-js/Util.js";
 import { FSharpResult$2_Ok, FSharpResult$2_Error, FSharpResult$2_$union } from "@fable-org/fable-library-js/Result.js";
 import { newGuid, parse, tryParse } from "@fable-org/fable-library-js/Guid.js";
 import { Union, FSharpRef } from "@fable-org/fable-library-js/Types.js";
 import { array_type, string_type, obj_type, union_type, TypeInfo } from "@fable-org/fable-library-js/Reflection.js";
-import { array as array_7, at, IOptionalGetter, IGetters, dict as dict_1, string, IRequiredGetter, object, fromString as fromString_1 } from "../../Thoth.Json/packages/Thoth.Json/Decode.js";
-import { ErrorReason_$union } from "../../Thoth.Json/packages/Thoth.Json/Types.js";
+import { array as array_7, at, IOptionalGetter, IGetters, dict as dict_1, string, IRequiredGetter, object, fromString as fromString_1 } from "../../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
+import { ErrorReason_$union } from "../../libs/Thoth.Json/packages/Thoth.Json/Types.js";
 import { tryFind as tryFind_1, empty as empty_2, count, ofSeq as ofSeq_1, toList, FSharpMap } from "@fable-org/fable-library-js/Map.js";
 import { addToDict } from "@fable-org/fable-library-js/MapUtil.js";
 import { int32 } from "@fable-org/fable-library-js/Int32.js";

package/src/FormSpec.FS/Interop/FormSpec.Api.Option.ts

@@ -7,9 +7,9 @@ import { Spec_FormSpec$1_$reflection, Spec_FieldType_$reflection, Spec_FormClass
 import { tryParse } from "@fable-org/fable-library-js/Guid.js";
 import { ofArray, reverse, empty, FSharpList, cons, map, toArray } from "@fable-org/fable-library-js/List.js";
 import { sumBy, tryFind, collect, map as map_1, fold } from "@fable-org/fable-library-js/Array.js";
-import { Auto_generateBoxedEncoder_437914C6, toString } from "../../Thoth.Json/packages/Thoth.Json/Encode.js";
+import { Auto_generateBoxedEncoder_437914C6, toString } from "../../libs/Thoth.Json/packages/Thoth.Json/Encode.js";
 import { FSharpResult$2_$union, Result_ToOption } from "@fable-org/fable-library-js/Result.js";
-import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../../Thoth.Json/packages/Thoth.Json/Decode.js";
+import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
 import { printf, toConsole } from "@fable-org/fable-library-js/String.js";
 
 export class Types_FieldKeyTS extends Record implements IEquatable<Types_FieldKeyTS>, IComparable<Types_FieldKeyTS> {

package/src/FormSpec.FS/Interop/FormSpec.Values.Api.Option.ts

@@ -13,9 +13,9 @@ import { ofArray, empty as empty_1, add as add_1, FSharpSet, toList as toList_1
 import { resultStepsMapToFormSpec, formSpecToResultStepsMap, formSpecToMetadata, FormSpecMetadata, FieldDetails$1 } from "../FormSpecValues.js";
 import { tryParse as tryParse_1, minValue, toString } from "@fable-org/fable-library-js/Date.js";
 import { buildFormSpecFromResultStepsMap } from "../FormSpecHelpers.js";
-import { Auto_generateBoxedEncoder_437914C6, toString as toString_1 } from "../../Thoth.Json/packages/Thoth.Json/Encode.js";
+import { Auto_generateBoxedEncoder_437914C6, toString as toString_1 } from "../../libs/Thoth.Json/packages/Thoth.Json/Encode.js";
 import { FSharpResult$2_$union, Result_ToOption } from "@fable-org/fable-library-js/Result.js";
-import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../../Thoth.Json/packages/Thoth.Json/Decode.js";
+import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
 
 export class ValuesTypes_FieldAnswerTS extends Record implements IEquatable<ValuesTypes_FieldAnswerTS>, IComparable<ValuesTypes_FieldAnswerTS> {
     readonly FieldKey: Types_FieldKeyTS;

package/src/FormSpec.FS/Migrator.ts

@@ -1,7 +1,7 @@
 import { Union } from "@fable-org/fable-library-js/Types.js";
 import { string_type, union_type, TypeInfo } from "@fable-org/fable-library-js/Reflection.js";
 import { Spec_FieldType_$union, Spec_FieldType_$reflection, Spec_FormSpec$1_$reflection, Spec_FormSpec$1 } from "./FormSpec.js";
-import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../Thoth.Json/packages/Thoth.Json/Decode.js";
+import { Auto_generateBoxedDecoder_Z6670B51, fromString } from "../libs/Thoth.Json/packages/Thoth.Json/Decode.js";
 import { uncurry2 } from "@fable-org/fable-library-js/Util.js";
 import { FSharpResult$2_$union } from "@fable-org/fable-library-js/Result.js";