mxm_std.f File Reference

Functions/Subroutines
subroutine	mxmf2 (A, N1, B, N2, C, N3)
subroutine	mxf1 (a, n1, b, n2, c, n3)
subroutine	mxf2 (a, n1, b, n2, c, n3)
subroutine	mxf3 (a, n1, b, n2, c, n3)
subroutine	mxf4 (a, n1, b, n2, c, n3)
subroutine	mxf5 (a, n1, b, n2, c, n3)
subroutine	mxf6 (a, n1, b, n2, c, n3)
subroutine	mxf7 (a, n1, b, n2, c, n3)
subroutine	mxf8 (a, n1, b, n2, c, n3)
subroutine	mxf9 (a, n1, b, n2, c, n3)
subroutine	mxf10 (a, n1, b, n2, c, n3)
subroutine	mxf11 (a, n1, b, n2, c, n3)
subroutine	mxf12 (a, n1, b, n2, c, n3)
subroutine	mxf13 (a, n1, b, n2, c, n3)
subroutine	mxf14 (a, n1, b, n2, c, n3)
subroutine	mxf15 (a, n1, b, n2, c, n3)
subroutine	mxf16 (a, n1, b, n2, c, n3)
subroutine	mxf17 (a, n1, b, n2, c, n3)
subroutine	mxf18 (a, n1, b, n2, c, n3)
subroutine	mxf19 (a, n1, b, n2, c, n3)
subroutine	mxf20 (a, n1, b, n2, c, n3)
subroutine	mxf21 (a, n1, b, n2, c, n3)
subroutine	mxf22 (a, n1, b, n2, c, n3)
subroutine	mxf23 (a, n1, b, n2, c, n3)
subroutine	mxf24 (a, n1, b, n2, c, n3)
subroutine	mxm44_0 (a, m, b, k, c, n)
subroutine	mxm44_2 (a, m, b, k, c, n)
subroutine	mxm_test_all (nid, ivb)
subroutine	initab (a, b, n)
subroutine	mxms (a, n1, b, n2, c, n3)
subroutine	mxmu4 (a, n1, b, n2, c, n3)
subroutine	madd (a, n1, b, n2, c, n3)
subroutine	mxmur2 (a, n1, b, n2, c, n3)
subroutine	mxmur2_1 (a, n1, b, n2, c, n3)
subroutine	mxmur2_2 (a, n1, b, n2, c, n3)
subroutine	mxmur2_3 (a, n1, b, n2, c, n3)
subroutine	mxmur2_4 (a, n1, b, n2, c, n3)
subroutine	mxmur2_5 (a, n1, b, n2, c, n3)
subroutine	mxmur2_6 (a, n1, b, n2, c, n3)
subroutine	mxmur2_7 (a, n1, b, n2, c, n3)
subroutine	mxmur2_8 (a, n1, b, n2, c, n3)
subroutine	mxmur2_9 (a, n1, b, n2, c, n3)
subroutine	mxmur2_10 (a, n1, b, n2, c, n3)
subroutine	mxmur2_11 (a, n1, b, n2, c, n3)
subroutine	mxmur2_12 (a, n1, b, n2, c, n3)
subroutine	mxmur2_13 (a, n1, b, n2, c, n3)
subroutine	mxmur2_14 (a, n1, b, n2, c, n3)
subroutine	mxmur2_15 (a, n1, b, n2, c, n3)
subroutine	mxmur2_16 (a, n1, b, n2, c, n3)
subroutine	mxmur3 (a, n1, b, n2, c, n3)
subroutine	mxmur3_16 (a, n1, b, n2, c, n3)
subroutine	mxmur3_15 (a, n1, b, n2, c, n3)
subroutine	mxmur3_14 (a, n1, b, n2, c, n3)
subroutine	mxmur3_13 (a, n1, b, n2, c, n3)
subroutine	mxmur3_12 (a, n1, b, n2, c, n3)
subroutine	mxmur3_11 (a, n1, b, n2, c, n3)
subroutine	mxmur3_10 (a, n1, b, n2, c, n3)
subroutine	mxmur3_9 (a, n1, b, n2, c, n3)
subroutine	mxmur3_8 (a, n1, b, n2, c, n3)
subroutine	mxmur3_7 (a, n1, b, n2, c, n3)
subroutine	mxmur3_6 (a, n1, b, n2, c, n3)
subroutine	mxmur3_5 (a, n1, b, n2, c, n3)
subroutine	mxmur3_4 (a, n1, b, n2, c, n3)
subroutine	mxmur3_3 (a, n1, b, n2, c, n3)
subroutine	mxmur3_2 (a, n1, b, n2, c, n3)
subroutine	mxmur3_1 (a, n1, b, n2, c, n3)
subroutine	mxmd (a, n1, b, n2, c, n3)
subroutine	mxmfb (a, n1, b, n2, c, n3)
subroutine	mxmfb_1 (a, n1, b, n2, c, n3)
subroutine	mxmfb_2 (a, n1, b, n2, c, n3)
subroutine	mxmfb_3 (a, n1, b, n2, c, n3)
subroutine	mxmfb_4 (a, n1, b, n2, c, n3)
subroutine	mxmfb_5 (a, n1, b, n2, c, n3)
subroutine	mxmfb_6 (a, n1, b, n2, c, n3)
subroutine	mxmfb_7 (a, n1, b, n2, c, n3)
subroutine	mxmfb_8 (a, n1, b, n2, c, n3)
subroutine	mxmfb_9 (a, n1, b, n2, c, n3)
subroutine	mxmfb_10 (a, n1, b, n2, c, n3)
subroutine	mxmfb_11 (a, n1, b, n2, c, n3)
subroutine	mxmfb_12 (a, n1, b, n2, c, n3)
subroutine	mxmfb_13 (a, n1, b, n2, c, n3)
subroutine	mxmfb_14 (a, n1, b, n2, c, n3)
subroutine	mxmfb_15 (a, n1, b, n2, c, n3)
subroutine	mxmfb_16 (a, n1, b, n2, c, n3)
subroutine	mxmfb_17 (a, n1, b, n2, c, n3)
subroutine	mxmfb_18 (a, n1, b, n2, c, n3)
subroutine	mxmfb_19 (a, n1, b, n2, c, n3)
subroutine	mxmfb_20 (a, n1, b, n2, c, n3)
subroutine	mxmfb_21 (a, n1, b, n2, c, n3)
subroutine	mxmfb_22 (a, n1, b, n2, c, n3)
subroutine	mxmfb_23 (a, n1, b, n2, c, n3)
subroutine	mxmfb_24 (a, n1, b, n2, c, n3)
subroutine	mxmf3 (a, n1, b, n2, c, n3)
subroutine	mxmf3_1 (a, n1, b, n2, c, n3)
subroutine	mxmf3_2 (a, n1, b, n2, c, n3)
subroutine	mxmf3_3 (a, n1, b, n2, c, n3)
subroutine	mxmf3_4 (a, n1, b, n2, c, n3)
subroutine	mxmf3_5 (a, n1, b, n2, c, n3)
subroutine	mxmf3_6 (a, n1, b, n2, c, n3)
subroutine	mxmf3_7 (a, n1, b, n2, c, n3)
subroutine	mxmf3_8 (a, n1, b, n2, c, n3)
subroutine	mxmf3_9 (a, n1, b, n2, c, n3)
subroutine	mxmf3_10 (a, n1, b, n2, c, n3)
subroutine	mxmf3_11 (a, n1, b, n2, c, n3)
subroutine	mxmf3_12 (a, n1, b, n2, c, n3)
subroutine	mxmf3_13 (a, n1, b, n2, c, n3)
subroutine	mxmf3_14 (a, n1, b, n2, c, n3)
subroutine	mxmf3_15 (a, n1, b, n2, c, n3)
subroutine	mxmf3_16 (a, n1, b, n2, c, n3)
subroutine	mxmf3_17 (a, n1, b, n2, c, n3)
subroutine	mxmf3_18 (a, n1, b, n2, c, n3)
subroutine	mxmf3_19 (a, n1, b, n2, c, n3)
subroutine	mxmf3_20 (a, n1, b, n2, c, n3)
subroutine	mxmf3_21 (a, n1, b, n2, c, n3)
subroutine	mxmf3_22 (a, n1, b, n2, c, n3)
subroutine	mxmf3_23 (a, n1, b, n2, c, n3)
subroutine	mxmf3_24 (a, n1, b, n2, c, n3)
subroutine	mxm44 (a, n1, b, n2, c, n3)
subroutine	mxm44_0_t (a, m, b, k, c, n)
subroutine	mxm44_2_t (a, m, b, k, c, n)
subroutine	mxmtest (s, nn, cn, mxmt, name, k, ivb)
subroutine	mxm_analyze (s, a, nn, c, nt, ivb)
subroutine	out_anal (s, a, nn, c, nt, itmax, name8, k, ivb)
subroutine	mxma (a, n1, b, n2, c, n3)
subroutine	mxma2 (a, n1, b, n2, c, n3)
subroutine	mxa1 (a, n1, b, n2, c, n3)
subroutine	mxa2 (a, n1, b, n2, c, n3)
subroutine	mxa3 (a, n1, b, n2, c, n3)
subroutine	mxa4 (a, n1, b, n2, c, n3)
subroutine	mxa5 (a, n1, b, n2, c, n3)
subroutine	mxa6 (a, n1, b, n2, c, n3)
subroutine	mxa7 (a, n1, b, n2, c, n3)
subroutine	mxa8 (a, n1, b, n2, c, n3)
subroutine	mxa9 (a, n1, b, n2, c, n3)
subroutine	mxa10 (a, n1, b, n2, c, n3)
subroutine	mxa11 (a, n1, b, n2, c, n3)
subroutine	mxa12 (a, n1, b, n2, c, n3)
subroutine	mxa13 (a, n1, b, n2, c, n3)
subroutine	mxa14 (a, n1, b, n2, c, n3)
subroutine	mxa15 (a, n1, b, n2, c, n3)
subroutine	mxa16 (a, n1, b, n2, c, n3)
subroutine	mxa17 (a, n1, b, n2, c, n3)
subroutine	mxa18 (a, n1, b, n2, c, n3)
subroutine	mxa19 (a, n1, b, n2, c, n3)
subroutine	mxa20 (a, n1, b, n2, c, n3)
subroutine	mxa21 (a, n1, b, n2, c, n3)
subroutine	mxa22 (a, n1, b, n2, c, n3)
subroutine	mxa23 (a, n1, b, n2, c, n3)
subroutine	mxa24 (a, n1, b, n2, c, n3)
subroutine	mxm44_0a (a, m, b, k, c, n)
subroutine	mxm44_2a (a, m, b, k, c, n)

Function/Subroutine Documentation

initab()

subroutine initab	(	real, dimension(1)	a,
		real, dimension(1)	b,
			n
	)

madd()

subroutine madd	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa1()

subroutine mxa1	(	real, dimension(n1,1)	a,
			n1,
		real, dimension(1,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa10()

subroutine mxa10	(	real, dimension(n1,10)	a,
			n1,
		real, dimension(10,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa11()

subroutine mxa11	(	real, dimension(n1,11)	a,
			n1,
		real, dimension(11,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa12()

subroutine mxa12	(	real, dimension(n1,12)	a,
			n1,
		real, dimension(12,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa13()

subroutine mxa13	(	real, dimension(n1,13)	a,
			n1,
		real, dimension(13,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa14()

subroutine mxa14	(	real, dimension(n1,14)	a,
			n1,
		real, dimension(14,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa15()

subroutine mxa15	(	real, dimension(n1,15)	a,
			n1,
		real, dimension(15,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa16()

subroutine mxa16	(	real, dimension(n1,16)	a,
			n1,
		real, dimension(16,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa17()

subroutine mxa17	(	real, dimension(n1,17)	a,
			n1,
		real, dimension(17,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa18()

subroutine mxa18	(	real, dimension(n1,18)	a,
			n1,
		real, dimension(18,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa19()

subroutine mxa19	(	real, dimension(n1,19)	a,
			n1,
		real, dimension(19,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa2()

subroutine mxa2	(	real, dimension(n1,2)	a,
			n1,
		real, dimension(2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa20()

subroutine mxa20	(	real, dimension(n1,20)	a,
			n1,
		real, dimension(20,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa21()

subroutine mxa21	(	real, dimension(n1,21)	a,
			n1,
		real, dimension(21,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa22()

subroutine mxa22	(	real, dimension(n1,22)	a,
			n1,
		real, dimension(22,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa23()

subroutine mxa23	(	real, dimension(n1,23)	a,
			n1,
		real, dimension(23,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa24()

subroutine mxa24	(	real, dimension(n1,24)	a,
			n1,
		real, dimension(24,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa3()

subroutine mxa3	(	real, dimension(n1,3)	a,
			n1,
		real, dimension(3,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa4()

subroutine mxa4	(	real, dimension(n1,4)	a,
			n1,
		real, dimension(4,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa5()

subroutine mxa5	(	real, dimension(n1,5)	a,
			n1,
		real, dimension(5,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa6()

subroutine mxa6	(	real, dimension(n1,6)	a,
			n1,
		real, dimension(6,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa7()

subroutine mxa7	(	real, dimension(n1,7)	a,
			n1,
		real, dimension(7,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa8()

subroutine mxa8	(	real, dimension(n1,8)	a,
			n1,
		real, dimension(8,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxa9()

subroutine mxa9	(	real, dimension(n1,9)	a,
			n1,
		real, dimension(9,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf1()

subroutine mxf1	(	real, dimension(n1,1)	a,
			n1,
		real, dimension(1,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf10()

subroutine mxf10	(	real, dimension(n1,10)	a,
			n1,
		real, dimension(10,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf11()

subroutine mxf11	(	real, dimension(n1,11)	a,
			n1,
		real, dimension(11,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf12()

subroutine mxf12	(	real, dimension(n1,12)	a,
			n1,
		real, dimension(12,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf13()

subroutine mxf13	(	real, dimension(n1,13)	a,
			n1,
		real, dimension(13,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf14()

subroutine mxf14	(	real, dimension(n1,14)	a,
			n1,
		real, dimension(14,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf15()

subroutine mxf15	(	real, dimension(n1,15)	a,
			n1,
		real, dimension(15,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf16()

subroutine mxf16	(	real, dimension(n1,16)	a,
			n1,
		real, dimension(16,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf17()

subroutine mxf17	(	real, dimension(n1,17)	a,
			n1,
		real, dimension(17,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf18()

subroutine mxf18	(	real, dimension(n1,18)	a,
			n1,
		real, dimension(18,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf19()

subroutine mxf19	(	real, dimension(n1,19)	a,
			n1,
		real, dimension(19,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf2()

subroutine mxf2	(	real, dimension(n1,2)	a,
			n1,
		real, dimension(2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf20()

subroutine mxf20	(	real, dimension(n1,20)	a,
			n1,
		real, dimension(20,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf21()

subroutine mxf21	(	real, dimension(n1,21)	a,
			n1,
		real, dimension(21,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf22()

subroutine mxf22	(	real, dimension(n1,22)	a,
			n1,
		real, dimension(22,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf23()

subroutine mxf23	(	real, dimension(n1,23)	a,
			n1,
		real, dimension(23,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf24()

subroutine mxf24	(	real, dimension(n1,24)	a,
			n1,
		real, dimension(24,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf3()

subroutine mxf3	(	real, dimension(n1,3)	a,
			n1,
		real, dimension(3,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf4()

subroutine mxf4	(	real, dimension(n1,4)	a,
			n1,
		real, dimension(4,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf5()

subroutine mxf5	(	real, dimension(n1,5)	a,
			n1,
		real, dimension(5,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf6()

subroutine mxf6	(	real, dimension(n1,6)	a,
			n1,
		real, dimension(6,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf7()

subroutine mxf7	(	real, dimension(n1,7)	a,
			n1,
		real, dimension(7,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf8()

subroutine mxf8	(	real, dimension(n1,8)	a,
			n1,
		real, dimension(8,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxf9()

subroutine mxf9	(	real, dimension(n1,9)	a,
			n1,
		real, dimension(9,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxm44()

subroutine mxm44	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxm44_0()

subroutine mxm44_0	(	real, dimension(m,k)	a,
			m,
		real, dimension(k,n)	b,
			k,
		real, dimension(m,n)	c,
			n
	)

mxm44_0_t()

subroutine mxm44_0_t	(	real, dimension(m,k)	a,
			m,
		real, dimension(k,n)	b,
			k,
		real, dimension(m,n)	c,
			n
	)

mxm44_0a()

subroutine mxm44_0a	(	real, dimension(m,k)	a,
			m,
		real, dimension(k,n)	b,
			k,
		real, dimension(m,n)	c,
			n
	)

mxm44_2()

subroutine mxm44_2	(	real, dimension(m,2)	a,
			m,
		real, dimension(2,n)	b,
			k,
		real, dimension(m,n)	c,
			n
	)

mxm44_2_t()

subroutine mxm44_2_t	(	real, dimension(m,2)	a,
			m,
		real, dimension(2,n)	b,
			k,
		real, dimension(m,n)	c,
			n
	)

mxm44_2a()

subroutine mxm44_2a	(	real, dimension(m,2)	a,
			m,
		real, dimension(2,n)	b,
			k,
		real, dimension(m,n)	c,
			n
	)

mxm_analyze()

subroutine mxm_analyze	(	real, dimension(nn,2,nt,3)	s,
		real, dimension(nn,2,nt,3)	a,
			nn,
		character*5, dimension(3,nt)	c,
			nt,
			ivb
	)

mxm_test_all()

subroutine mxm_test_all	(		nid,
			ivb
	)

mxma()

subroutine mxma	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxma2()

subroutine mxma2	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmd()

subroutine mxmd	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf2()

subroutine mxmf2	(	real, dimension(n1,n2)	A,
			N1,
		real, dimension(n2,n3)	B,
			N2,
		real, dimension(n1,n3)	C,
			N3
	)

mxmf3()

subroutine mxmf3	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_1()

subroutine mxmf3_1	(	real, dimension(n1,1)	a,
			n1,
		real, dimension(1,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_10()

subroutine mxmf3_10	(	real, dimension(n1,10)	a,
			n1,
		real, dimension(10,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_11()

subroutine mxmf3_11	(	real, dimension(n1,11)	a,
			n1,
		real, dimension(11,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_12()

subroutine mxmf3_12	(	real, dimension(n1,12)	a,
			n1,
		real, dimension(12,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_13()

subroutine mxmf3_13	(	real, dimension(n1,13)	a,
			n1,
		real, dimension(13,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_14()

subroutine mxmf3_14	(	real, dimension(n1,14)	a,
			n1,
		real, dimension(14,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_15()

subroutine mxmf3_15	(	real, dimension(n1,15)	a,
			n1,
		real, dimension(15,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_16()

subroutine mxmf3_16	(	real, dimension(n1,16)	a,
			n1,
		real, dimension(16,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_17()

subroutine mxmf3_17	(	real, dimension(n1,17)	a,
			n1,
		real, dimension(17,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_18()

subroutine mxmf3_18	(	real, dimension(n1,18)	a,
			n1,
		real, dimension(18,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_19()

subroutine mxmf3_19	(	real, dimension(n1,19)	a,
			n1,
		real, dimension(19,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_2()

subroutine mxmf3_2	(	real, dimension(n1,2)	a,
			n1,
		real, dimension(2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_20()

subroutine mxmf3_20	(	real, dimension(n1,20)	a,
			n1,
		real, dimension(20,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_21()

subroutine mxmf3_21	(	real, dimension(n1,21)	a,
			n1,
		real, dimension(21,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_22()

subroutine mxmf3_22	(	real, dimension(n1,22)	a,
			n1,
		real, dimension(22,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_23()

subroutine mxmf3_23	(	real, dimension(n1,23)	a,
			n1,
		real, dimension(23,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_24()

subroutine mxmf3_24	(	real, dimension(n1,24)	a,
			n1,
		real, dimension(24,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_3()

subroutine mxmf3_3	(	real, dimension(n1,3)	a,
			n1,
		real, dimension(3,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_4()

subroutine mxmf3_4	(	real, dimension(n1,4)	a,
			n1,
		real, dimension(4,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_5()

subroutine mxmf3_5	(	real, dimension(n1,5)	a,
			n1,
		real, dimension(5,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_6()

subroutine mxmf3_6	(	real, dimension(n1,6)	a,
			n1,
		real, dimension(6,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_7()

subroutine mxmf3_7	(	real, dimension(n1,7)	a,
			n1,
		real, dimension(7,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_8()

subroutine mxmf3_8	(	real, dimension(n1,8)	a,
			n1,
		real, dimension(8,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmf3_9()

subroutine mxmf3_9	(	real, dimension(n1,9)	a,
			n1,
		real, dimension(9,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb()

subroutine mxmfb	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_1()

subroutine mxmfb_1	(	real, dimension(n1,1)	a,
			n1,
		real, dimension(1,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_10()

subroutine mxmfb_10	(	real, dimension(n1,10)	a,
			n1,
		real, dimension(10,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_11()

subroutine mxmfb_11	(	real, dimension(n1,11)	a,
			n1,
		real, dimension(11,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_12()

subroutine mxmfb_12	(	real, dimension(n1,12)	a,
			n1,
		real, dimension(12,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_13()

subroutine mxmfb_13	(	real, dimension(n1,13)	a,
			n1,
		real, dimension(13,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_14()

subroutine mxmfb_14	(	real, dimension(n1,14)	a,
			n1,
		real, dimension(14,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_15()

subroutine mxmfb_15	(	real, dimension(n1,15)	a,
			n1,
		real, dimension(15,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_16()

subroutine mxmfb_16	(	real, dimension(n1,16)	a,
			n1,
		real, dimension(16,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_17()

subroutine mxmfb_17	(	real, dimension(n1,17)	a,
			n1,
		real, dimension(17,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_18()

subroutine mxmfb_18	(	real, dimension(n1,18)	a,
			n1,
		real, dimension(18,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_19()

subroutine mxmfb_19	(	real, dimension(n1,19)	a,
			n1,
		real, dimension(19,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_2()

subroutine mxmfb_2	(	real, dimension(n1,2)	a,
			n1,
		real, dimension(2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_20()

subroutine mxmfb_20	(	real, dimension(n1,20)	a,
			n1,
		real, dimension(20,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_21()

subroutine mxmfb_21	(	real, dimension(n1,21)	a,
			n1,
		real, dimension(21,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_22()

subroutine mxmfb_22	(	real, dimension(n1,22)	a,
			n1,
		real, dimension(22,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_23()

subroutine mxmfb_23	(	real, dimension(n1,23)	a,
			n1,
		real, dimension(23,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_24()

subroutine mxmfb_24	(	real, dimension(n1,24)	a,
			n1,
		real, dimension(24,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_3()

subroutine mxmfb_3	(	real, dimension(n1,3)	a,
			n1,
		real, dimension(3,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_4()

subroutine mxmfb_4	(	real, dimension(n1,4)	a,
			n1,
		real, dimension(4,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_5()

subroutine mxmfb_5	(	real, dimension(n1,5)	a,
			n1,
		real, dimension(5,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_6()

subroutine mxmfb_6	(	real, dimension(n1,6)	a,
			n1,
		real, dimension(6,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_7()

subroutine mxmfb_7	(	real, dimension(n1,7)	a,
			n1,
		real, dimension(7,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_8()

subroutine mxmfb_8	(	real, dimension(n1,8)	a,
			n1,
		real, dimension(8,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmfb_9()

subroutine mxmfb_9	(	real, dimension(n1,9)	a,
			n1,
		real, dimension(9,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxms()

subroutine mxms	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmtest()

subroutine mxmtest	(	real, dimension(nn,2)	s,
			nn,
		character*5	cn,
		external	mxmt,
		character*5	name,
			k,
			ivb
	)

mxmu4()

subroutine mxmu4	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2()

subroutine mxmur2	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_1()

subroutine mxmur2_1	(	real, dimension(n1,1)	a,
			n1,
		real, dimension(1,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_10()

subroutine mxmur2_10	(	real, dimension(n1,10)	a,
			n1,
		real, dimension(10,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_11()

subroutine mxmur2_11	(	real, dimension(n1,11)	a,
			n1,
		real, dimension(11,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_12()

subroutine mxmur2_12	(	real, dimension(n1,12)	a,
			n1,
		real, dimension(12,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_13()

subroutine mxmur2_13	(	real, dimension(n1,13)	a,
			n1,
		real, dimension(13,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_14()

subroutine mxmur2_14	(	real, dimension(n1,14)	a,
			n1,
		real, dimension(14,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_15()

subroutine mxmur2_15	(	real, dimension(n1,15)	a,
			n1,
		real, dimension(15,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_16()

subroutine mxmur2_16	(	real, dimension(n1,16)	a,
			n1,
		real, dimension(16,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_2()

subroutine mxmur2_2	(	real, dimension(n1,2)	a,
			n1,
		real, dimension(2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_3()

subroutine mxmur2_3	(	real, dimension(n1,3)	a,
			n1,
		real, dimension(3,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_4()

subroutine mxmur2_4	(	real, dimension(n1,4)	a,
			n1,
		real, dimension(4,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_5()

subroutine mxmur2_5	(	real, dimension(n1,5)	a,
			n1,
		real, dimension(5,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_6()

subroutine mxmur2_6	(	real, dimension(n1,6)	a,
			n1,
		real, dimension(6,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_7()

subroutine mxmur2_7	(	real, dimension(n1,7)	a,
			n1,
		real, dimension(7,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_8()

subroutine mxmur2_8	(	real, dimension(n1,8)	a,
			n1,
		real, dimension(8,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur2_9()

subroutine mxmur2_9	(	real, dimension(n1,9)	a,
			n1,
		real, dimension(9,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur3()

subroutine mxmur3	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,n3)	b,
			n2,
		real, dimension(n1,n3)	c,
			n3
	)

mxmur3_1()

subroutine mxmur3_1	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,1)	b,
			n2,
		real, dimension(n1,1)	c,
			n3
	)

mxmur3_10()

subroutine mxmur3_10	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,10)	b,
			n2,
		real, dimension(n1,10)	c,
			n3
	)

mxmur3_11()

subroutine mxmur3_11	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,11)	b,
			n2,
		real, dimension(n1,11)	c,
			n3
	)

mxmur3_12()

subroutine mxmur3_12	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,12)	b,
			n2,
		real, dimension(n1,12)	c,
			n3
	)

mxmur3_13()

subroutine mxmur3_13	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,13)	b,
			n2,
		real, dimension(n1,13)	c,
			n3
	)

mxmur3_14()

subroutine mxmur3_14	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,14)	b,
			n2,
		real, dimension(n1,14)	c,
			n3
	)

mxmur3_15()

subroutine mxmur3_15	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,15)	b,
			n2,
		real, dimension(n1,15)	c,
			n3
	)

mxmur3_16()

subroutine mxmur3_16	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,16)	b,
			n2,
		real, dimension(n1,16)	c,
			n3
	)

mxmur3_2()

subroutine mxmur3_2	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,2)	b,
			n2,
		real, dimension(n1,2)	c,
			n3
	)

mxmur3_3()

subroutine mxmur3_3	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,3)	b,
			n2,
		real, dimension(n1,3)	c,
			n3
	)

mxmur3_4()

subroutine mxmur3_4	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,4)	b,
			n2,
		real, dimension(n1,4)	c,
			n3
	)

mxmur3_5()

subroutine mxmur3_5	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,5)	b,
			n2,
		real, dimension(n1,5)	c,
			n3
	)

mxmur3_6()

subroutine mxmur3_6	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,6)	b,
			n2,
		real, dimension(n1,6)	c,
			n3
	)

mxmur3_7()

subroutine mxmur3_7	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,7)	b,
			n2,
		real, dimension(n1,7)	c,
			n3
	)

mxmur3_8()

subroutine mxmur3_8	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,8)	b,
			n2,
		real, dimension(n1,8)	c,
			n3
	)

mxmur3_9()

subroutine mxmur3_9	(	real, dimension(n1,n2)	a,
			n1,
		real, dimension(n2,9)	b,
			n2,
		real, dimension(n1,9)	c,
			n3
	)

out_anal()

subroutine out_anal	(	real, dimension(nn,2,nt,3)	s,
		real, dimension(nn,2,nt,3)	a,
			nn,
		character*5, dimension(3,nt)	c,
			nt,
		integer, dimension(200)	itmax,
		character*8	name8,
			k,
			ivb
	)