XCOUNT

=LAMBDA(reference,[count_type],[rows],[columns],[match_criteria],[total_excluding],
   LET(
      ref,reference,
      ct,count_type,
      tet,total_excluding,
      rs,rows,
      cs,columns,
      mtc,IFERROR(match_criteria,0),
         IF(OR(IF(AND(NIO(count_type),ct<>0),ISERROR(MATCH(ct,AllTypes,0))),IF(NIO(total_excluding),ISERROR(MATCH(tet,{0,1},0))),IF(NIO(rows),ISERROR(MATCH(rs,{0,1},0))),IF(NIO(columns),ISERROR(MATCH(cs,{0,1},0))),AND(rs=1,cs=1),AND(OR(IO(count_type),ct=0),NIO(match_criteria))),
         XERROR(7),
            IF(AND(OR(IO(rows),rs=0),OR(IO(columns),cs=0)),
               LET(
                  t,COLUMNS(ref)*ROWS(ref),
                  exp,IF(OR(IO(count_type),ct=0),t,IF(AND(ct>=1,ct<=16),SUM(ISXTYPE(ref,ct,,mtc,1)),SUM(ISXTYPE(ref,,ct,mtc,1)))),
                     IF(OR(IO(total_excluding),tet=0),exp,t-exp)),IF(AND(OR(IO(columns),cs=0),rs=1),
                        LET(
                           tr,ROWS(ref),
                           IF(OR(IO(count_type),ct=0),IF(OR(IO(total_excluding),tet=0),tr,0),LET(a,IF(ct<=16,ISXTYPE(ref,ct,,mtc,1),ISXTYPE(ref,,ct,mtc,1)),rexp,SUM(IF(MMULT(a,SEQUENCE(COLUMNS(a),,1,0)),1,0)),IF(OR(IO(total_excluding),tet=0),rexp,tr-rexp)))),
                              IF(AND(OR(IO(rows),rs=0),cs=1),
                                 IF(OR(IO(count_type),ct=0),
                                    IF(OR(IO(total_excluding),tet=0),COLUMNS(ref),0),
                                       LET(
                                          tref,TRANSPOSE(ref),
                                          tr,ROWS(tref),
                                          tmtc,TRANSPOSE(mtc),
                                          a,IF(ct<=16,IF(IO(match_criteria),ISXTYPE(tref,ct,,,1),ISXTYPE(tref,ct,,tmtc,1)),IF(IO(match_criteria),ISXTYPE(tref,,ct,,1),ISXTYPE(tref,,ct,tmtc,1))),
                                          rexp,SUM(IF(MMULT(a,SEQUENCE(COLUMNS(a),,1,0)),1,0)),
                                             IF(OR(IO(total_excluding),tet=0),
                                                rexp,
                                                tr-rexp)
                                       )
                                    )
                                 )
                              )
            )
         )
   )
)

=LAMBDA(parameter,ISOMITTED(parameter))

=LAMBDA(parameter,NOT(ISOMITTED(parameter)))

={1,2,3,4,16,31,32,41,42,160,161,162,163,164,165,166,167,168,169,1610,1611,1612,1613,1614}

=LAMBDA(reference,[types],[rows],[columns],[match_criteria],[total_excluding],
   LET(
      y,PLM(PO0(types),1),
      r,PLSL(rows),
      c,PLSL(columns),
      e,PLSL(total_excluding),
      m,IFERROR(match_criteria,0),
      d,IFS(AND(c=0,r=0),0,AND(c=0,r=1),1,AND(c=1,r=0),2),
      h,ISXTYPE(reference,FILTER(y,y>0),m,1),
      w,ROWS(reference)*COLUMNS(reference),
      i,IF(
         SUM(T1F0(MAP(y,LAMBDA(a,NOT(ISERROR(MATCH(a,{0},0))))))),
         SWITCH(d,
            0,w,
            1,ROWS(reference),
            2,COLUMNS(reference)),
         SWITCH(d,
            0,SUM(h),
            1,SUM(IF(BYROW(h,LAMBDA(a,SUM(a))),1,0)),
            2,SUM(IF(BYCOL(h,LAMBDA(a,SUM(a))),1,0)))
         ),
      SWITCH(d,
         0,LET(l,w,IF(e,l-i,i)),
         1,LET(m,ROWS(reference),IF(e,m-i,i)),
         2,LET(n,COLUMNS(reference),IF(e,n-i,i))
      )
   )
)

=LAMBDA(types,advanced_types_array,
   LET(
      basic_types_array,SWITCH(advanced_types_array,1,1,2,2,31,3,32,3,41,4,42,4,16),
      MAP(advanced_types_array,LAMBDA(a,OR(a=types)))+MAP(basic_types_array,LAMBDA(a,OR(a=types)))
   )
)

=LAMBDA([reference],LET(r,IFERROR(IF(reference="","",reference),""),IF(IO(reference),FALSE,IF(ROWS(r)*COLUMNS(r)>1,TRUE,FALSE))))

=LAMBDA(reference,IF(IO(reference),FALSE,IF(SUM(IF(ISERROR(reference),1,0)),TRUE,FALSE)))

=LAMBDA(reference,IF(IO(reference),NA(),IF(SUM(IF(IFERROR(reference,0)="",1,0)),TRUE,FALSE)))

=LAMBDA(reference,IF(ISERROR(IF(reference="",NA(),reference)),NA(),IFERROR(IF(reference,0,FALSE),NA())))

=LAMBDA(reference,IF(ISERROR(IF(reference="",NA(),reference)),NA(),IFERROR(IF(reference,1,TRUE),NA())))

=LAMBDA(parameter,[unique],
   IF(
      IF(OR(IO(parameter),JAO(parameter),JAP(parameter)),TRUE,IF(OR(ROWS(parameter)=1,COLUMNS(parameter)=1),FALSE,TRUE)),
      NA(),
      LET(
         u,PLSL(unique),
         IF(u,UNIQUE(parameter,1),parameter)
      )
   )
)

=LAMBDA(parameter,INDEX(IF(OR(JAN(parameter),JAO(parameter),JAP(parameter)),NA(),parameter),1))

=LAMBDA([parameter],IF(IO(parameter),0,IF(JAN(parameter),NA(),LET(p,INDEX(parameter,1),IF(ISERROR(p),NA(),T1F0(p))))))

=LAMBDA([parameter],IF(IO(parameter),0,parameter))

=LAMBDA(expression,IF(ISNUMBER(expression)+ISLOGICAL(expression),IF(expression,1,0),NA()))