File: aaricc.spl

package info (click to toggle)
maxima 5.6-17
  • links: PTS
  • area: main
  • in suites: woody
  • size: 30,572 kB
  • ctags: 47,715
  • sloc: ansic: 154,079; lisp: 147,553; asm: 45,843; tcl: 16,744; sh: 11,057; makefile: 7,198; perl: 1,842; sed: 334; fortran: 24; awk: 5
file content (5 lines) | stat: -rw-r--r-- 190 bytes parent folder | download 
1
2
3
4
5
 
LR1[Q1,Q2]:=RATSIMP(
SUM(SUM(MCS[K,L,K]*MCS[Q1,Q2,L]-MCS[Q1,K,L]*MCS[Q2,L,K],L,1,DIM),K,1,DIM))$

LR2[Q1,Q2]:=RATSIMP(
SUM(DIFF(MCS[Q1,Q2,K],OMEGA[K])-DIFF(MCS[Q2,K,K],OMEGA[Q1]),K,1,DIM))$