Script File
sommers.at
Definitions in source order
partition_sum
partition_sum(Partition P,Partition Q) = Partitionmultiplicity
multiplicity = multiplicity(=@(int,int))also defined in basic.at
add_one
add_one(Partition P) = Partitionsubtract_one
subtract_one(Partition P) = Partitiondual_orbit
dual_orbit(Partition P)complex_nilpotent_from_partition
complex_nilpotent_from_partition(RootDatum rd, Partition p) = ComplexNilpotentdim_nilpotent_partition
dim_nilpotent_partition(RootDatum rd,Partition p)star
star (bool b) = stringreturn a star if the condition is met, else empty
print_nilpotent_orbit_partitions
print_nilpotent_orbit_partitions(RootDatum rd)also in this file at line 66
print_nilpotent_orbit_partitions_special_only
print_nilpotent_orbit_partitions_special_only(RootDatum rd)print_nilpotent_orbit_partitions
print_nilpotent_orbit_partitions(RootDatum rd,[vec] orbits)also in this file at line 31
print_nilpotent_orbit_partition
print_nilpotent_orbit_partition(RootDatum rd,vec orbit)ClassicalOrbitSymbol type
set_type ClassicalOrbitSymbol=(int,([int,int,bool]),int)
OrbitSymbol type
set_type OrbitSymbol=([(int,int)],ClassicalOrbitSymbol)
first
first(ClassicalOrbitSymbol (a,,))last
last(ClassicalOrbitSymbol (,,a))middle
middle(ClassicalOrbitSymbol (,a,))also in this file at line 147
GL_part
GL_part(OrbitSymbol (pairs,)) = [(int,int)]also in this file at line 266
classical_part
classical_part(OrbitSymbol (,qdsymbol)) = ClassicalOrbitSymbolsum 2 overloads
sum(ClassicalOrbitSymbol S)sum(OrbitSymbol S)also defined in basic.at
root_datum
root_datum(OrbitSymbol S)also in this file at line 195; also defined in basic.at, W_reps.at, K_Nilpotent.at
partitions_all_even_parts
partitions_all_even_parts(int n)partitions_all_odd_parts
partitions_all_odd_parts(int n)cores
cores(int n)underlying_orbit
underlying_orbit(OrbitSymbol S)first
first(ClassicalOrbitSymbol (b,,)) = intlast
last(ClassicalOrbitSymbol (,,a)) = intmiddle
middle(ClassicalOrbitSymbol (,middle,)) = [(int,int,bool)]also in this file at line 83
validate_signs
validate_signs(int first,[(int,int,bool)] m,int last) = boolrank
rank(ClassicalOrbitSymbol (first,middle,last)) = intalso defined in basic.at, combinatorics.at
core
core(ClassicalOrbitSymbol (a,b,c))validate 2 overloads
validate(ClassicalOrbitSymbol (first,middle,last)) = boolvalidate(OrbitSymbol S) = boolroot_datum
root_datum(ClassicalOrbitSymbol S)also in this file at line 94; also defined in basic.at, W_reps.at, K_Nilpotent.at
signs
signs((int,[(int,int,bool)],int) S)valid_signs
valid_signs((int,[(int,int)],int) S)dual_data
dual_data(int n)dual_symbols
dual_symbols(int n)q
q(ClassicalOrbitSymbol S) = Partitionalso defined in L_packet.at
p
p(ClassicalOrbitSymbol S)dual_orbit 2 overloads
dual_orbit(ClassicalOrbitSymbol S)dual_orbit(OrbitSymbol S) = Partitionalso in this file at line 14
GL_part
GL_part(Partition P)also in this file at line 85
parts_C
parts_C(Partition P)parts_B
parts_B(Partition P)classical_part_C
classical_part_C(Partition P)classical_part_B
classical_part_B(Partition P)default_orbit_symbol_C
default_orbit_symbol_C(Partition P)default_orbit_symbol_B
default_orbit_symbol_B(Partition P)default_orbit_symbol
default_orbit_symbol(Partition P)ungroup
ungroup(ClassicalOrbitSymbol S)regroup
regroup(Partition P)delete_all 2 overloads
delete_all(int i,[int] list)delete_all([int] deletes,[int] list)variants_C
variants_C(ClassicalOrbitSymbol S)also in this file at line 405
variants_B
variants_B(ClassicalOrbitSymbol S)also in this file at line 410
sort
sort([(int,int)] list)variants_C
variants_C(OrbitSymbol S)also in this file at line 361
variants_B
variants_B(OrbitSymbol S)also in this file at line 381
orbit_symbols_C
orbit_symbols_C(Partition P)orbit_symbols_B
orbit_symbols_B(Partition P)orbit_symbols
orbit_symbols(Partition P)also in this file at line 441
sort_by_dual_orbit
sort_by_dual_orbit = ([OrbitSymbol]->[OrbitSymbol])birational_induction 2 overloads
birational_induction(OrbitSymbol S)birational_induction(OrbitSymbol S)orbit_symbols
orbit_symbols(RootDatum rd) = [OrbitSymbol]also in this file at line 425
valid_symbols
valid_symbols(RootDatum rd) = [OrbitSymbol]chain
chain(int a, int b)infinitesimal_character_old
infinitesimal_character_old(OrbitSymbol S)let v=##(##([a,b,c,d])) then (num,denom)=%v in ratvec:reverse_sort(for a in num do abs(a) od)/denomL468
infinitesimal_character
infinitesimal_character(OrbitSymbol S)also defined in basic.at, modules.at
is_distinguished
is_distinguished(OrbitSymbol S) = booland all(for (,,x) in cl.middle do not x od)L491
is_birigid
is_birigid(Partition P) = booltest
test(RootDatum rd)also in this file at line 539; also defined in test_unitarity.at, all_finite_order.at, nilpotent_centralizer.at
test_valid_only
test_valid_only(RootDatum rd)test
test(RootDatum rd,Partition P)also in this file at line 495; also defined in test_unitarity.at, all_finite_order.at, nilpotent_centralizer.at
Generated from atlas-scripts at commit 7e1b958 (2026-09-17).