monocle-ts-esm/es6/Index/NonEmptyArray.js

A porting of scala monocle library to TypeScript

/**
 * @since 1.5.0
 */
import { Index, Optional } from '..';
import { updateAt } from 'fp-ts-esm/NonEmptyArray';
import { lookup } from 'fp-ts-esm/Array';
import { isNone } from 'fp-ts-esm/Option';
/**
 * @category constructor
 * @since 1.5.0
 */
export function indexNonEmptyArray() {
    return new Index((i) => new Optional((s) => lookup(i, s), (a) => (nea) => {
        const onea = updateAt(i, a)(nea);
        if (isNone(onea)) {
            return nea;
        }
        else {
            return onea.value;
        }
    }));
}