d^n Seniority Sp(10)⊃SU(2)*SO(5) fortran66.hatenablog.comso5.fn gr sp10 enter rv1 dim[rv1] gr 2 su2 so5 rule [rv1*0] sk 1 with a rule last sum i 1 eq 2 rule last sk 2 with d sup false std last dim last stopDP> readfn 1 'so5.fn' =- =- =- =-…