op1lib.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	sum2vxd (vec, sum2, dim)
	all these subroutine are part of the heidelberg mctdh package please see the source code for details
subroutine	sum2vxz (vec, sum2, dim)
subroutine	sum2mxd (mat, sum2, dim1, dim2)
subroutine	sum2qtz (mat, sum2, dim)
subroutine	normvxd (vec, norm, dim)
subroutine	normvxz (vec, norm, dim)
subroutine	trhxz (mat, trace, dim)
subroutine	trqxd (mat, trace, dim)
subroutine	trqxz (mat, trace, dim)
subroutine	trmmcxzz (a, b, trace, dim1, dim2)
subroutine	trmmaxzz (a, b, trace, dim1, dim2)
subroutine	trmmaxzza (a, b, scal, dim1, dim2)
subroutine	trtxz (ten, vec, dim1, dim2)
subroutine	zeromxz (mat, dim1, dim2)
subroutine	zeromxd (mat, dim1, dim2)
subroutine	zeromxi (mat, dim1, dim2)
subroutine	zeromxl (mat, dim1, dim2)
subroutine	zerovxz (vec, dim)
subroutine	zerovxd (vec, dim)
subroutine	zerovxs (vec, dim)
subroutine	zerovxi (vec, dim)
subroutine	zerovxl (vec, dim)
subroutine	unitqxz (mat, dim)
subroutine	unitqxd (mat, dim)
subroutine	cpqxd (a, c, dim)
subroutine	cpqxd1 (a, c, phdim, dim)
subroutine	cpqxz (a, c, dim)
subroutine	cpqxdz (a, c, dim)
subroutine	cpqaz (a, c, dim)
subroutine	cpqtz (a, c, dim)
subroutine	cpmtz (a, c, dim1, dim2)
subroutine	cpmaz (a, c, dim1, dim2)
subroutine	cpmxz (a, c, dim1, dim2)
subroutine	cpmxd (a, c, dim1, dim2)
subroutine	cpmxi (a, c, dim1, dim2)
subroutine	cpvxd (v, w, dim)
subroutine	cpvxz (v, w, dim)
subroutine	cpvcz (v, w, dim)
subroutine	cpvxdz (v, w, dim)
subroutine	cpvxzd (v, w, dim)
subroutine	cpvxi (v, w, dim)
subroutine	cpvxi2 (v, w, dim)
subroutine	cpvxl (v, w, dim)
subroutine	initvxz (vec, dim)
subroutine	initvxd (vec, dim)
subroutine	initvxi (vec, dim)
subroutine	initvxl (vec, dim)
subroutine	initmxz (a, dim1, dim2)
subroutine	initmxd (a, dim1, dim2)
subroutine	initmxl (a, dim1, dim2)
subroutine	overmxz (a, c, dim1, dim2)
subroutine	overmcz (a, c, dim1, dim2)
subroutine	tranmxz (a, c, dim1, dim2)
subroutine	tranmxd (a, c, dim1, dim2)
subroutine	tranqxz (a, dim)
subroutine	tranqxd (a, dim)
subroutine	cpvxz_s (v, w, index1, index2, dim1, dim2)
subroutine	cuttxd2 (t, m, dim1, dim2, dim3, jcut)

---

Function Documentation

subroutine cpmaz	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim2,dim1)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1094 of file op1lib.f.

subroutine cpmtz	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim2,dim1)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1069 of file op1lib.f.

subroutine cpmxd	(	real*8,dimension(dim1,dim2)	a,
		real*8,dimension(dim1,dim2)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1143 of file op1lib.f.

subroutine cpmxi	(	integer,dimension(dim1,dim2)	a,
		integer,dimension(dim1,dim2)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1167 of file op1lib.f.

subroutine cpmxz	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim1,dim2)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1120 of file op1lib.f.

subroutine cpqaz	(	complex*16,dimension(dim,dim)	a,
		complex*16,dimension(dim,dim)	c,
		integer	dim
	)

Definition at line 1020 of file op1lib.f.

subroutine cpqtz	(	complex*16,dimension(dim,dim)	a,
		complex*16,dimension(dim,dim)	c,
		integer	dim
	)

Definition at line 1044 of file op1lib.f.

subroutine cpqxd	(	real*8,dimension(dim,dim)	a,
		real*8,dimension(dim,dim)	c,
		integer	dim
	)

Definition at line 924 of file op1lib.f.

subroutine cpqxd1	(	real*8,dimension(phdim,dim)	a,
		real*8,dimension(phdim,dim)	c,
		integer	phdim,
		integer	dim
	)

Definition at line 949 of file op1lib.f.

subroutine cpqxdz	(	real*8,dimension(dim,dim)	a,
		complex*16,dimension(dim,dim)	c,
		integer	dim
	)

Definition at line 995 of file op1lib.f.

subroutine cpqxz	(	complex*16,dimension(dim,dim)	a,
		complex*16,dimension(dim,dim)	c,
		integer	dim
	)

Definition at line 972 of file op1lib.f.

subroutine cpvcz	(	complex*16,dimension(dim)	v,
		complex*16,dimension(dim)	w,
		integer	dim
	)

Definition at line 1228 of file op1lib.f.

subroutine cpvxd	(	real*8,dimension(dim)	v,
		real*8,dimension(dim)	w,
		integer	dim
	)

Definition at line 1190 of file op1lib.f.

Here is the caller graph for this function:

subroutine cpvxdz	(	real*8,dimension(dim)	v,
		complex*16,dimension(dim)	w,
		integer	dim
	)

Definition at line 1250 of file op1lib.f.

subroutine cpvxi	(	integer,dimension(dim)	v,
		integer,dimension(dim)	w,
		integer	dim
	)

Definition at line 1290 of file op1lib.f.

subroutine cpvxi2	(	integer,dimension(dim)	v,
		integer,dimension(dim)	w,
		integer	dim
	)

Definition at line 1309 of file op1lib.f.

subroutine cpvxl	(	logical,dimension(dim)	v,
		logical,dimension(dim)	w,
		integer	dim
	)

Definition at line 1330 of file op1lib.f.

subroutine cpvxz	(	complex*16,dimension(dim)	v,
		complex*16,dimension(dim)	w,
		integer	dim
	)

Definition at line 1209 of file op1lib.f.

subroutine cpvxz_s	(	complex*16,dimension(dim1)	v,
		complex*16,dimension(dim2)	w,
		integer,dimension(dim1)	index1,
		integer,dimension(dim2)	index2,
		integer	dim1,
		integer	dim2
	)

Definition at line 1678 of file op1lib.f.

subroutine cpvxzd	(	complex*16,dimension(dim)	v,
		real*8,dimension(dim)	w,
		integer	dim
	)

Definition at line 1270 of file op1lib.f.

subroutine cuttxd2	(	real*8,dimension(dim1,dim2,dim3)	t,
		real*8,dimension(dim1,dim3)	m,
		integer	dim1,
		integer	dim2,
		integer	dim3,
		integer	jcut
	)

Definition at line 1714 of file op1lib.f.

subroutine initmxd	(	real*8,dimension(dim1,dim2)	a,
		integer	dim1,
		integer	dim2
	)

Definition at line 1455 of file op1lib.f.

subroutine initmxl	(	logical,dimension(dim1,dim2)	a,
		integer	dim1,
		integer	dim2
	)

Definition at line 1478 of file op1lib.f.

subroutine initmxz	(	complex*16,dimension(dim1,dim2)	a,
		integer	dim1,
		integer	dim2
	)

Definition at line 1432 of file op1lib.f.

subroutine initvxd	(	real*8,dimension(dim)	vec,
		integer	dim
	)

Definition at line 1370 of file op1lib.f.

subroutine initvxi	(	integer,dimension(dim)	vec,
		integer	dim
	)

Definition at line 1391 of file op1lib.f.

subroutine initvxl	(	logical,dimension(dim)	vec,
		integer	dim
	)

Definition at line 1411 of file op1lib.f.

subroutine initvxz	(	complex*16,dimension(dim)	vec,
		integer	dim
	)

Definition at line 1349 of file op1lib.f.

subroutine normvxd	(	real*8,dimension(dim)	vec,
		real*8	norm,
		integer	dim
	)

Definition at line 421 of file op1lib.f.

Here is the caller graph for this function:

subroutine normvxz	(	complex*16,dimension(dim)	vec,
		real*8	norm,
		integer	dim
	)

Definition at line 444 of file op1lib.f.

Here is the caller graph for this function:

subroutine overmcz	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim2,dim2)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1544 of file op1lib.f.

subroutine overmxz	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim2,dim2)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1503 of file op1lib.f.

subroutine sum2mxd	(	real*8,dimension(dim1,dim2)	mat,
		real*8	sum2,
		integer	dim1,
		integer	dim2
	)

Definition at line 372 of file op1lib.f.

subroutine sum2qtz	(	complex*16,dimension(dim,dim)	mat,
		complex*16	sum2,
		integer	dim
	)

Definition at line 397 of file op1lib.f.

subroutine sum2vxd	(	real*8,dimension(dim)	vec,
		real*8	sum2,
		integer	dim
	)

all these subroutine are part of the heidelberg mctdh package please see the source code for details

Definition at line 303 of file op1lib.f.

subroutine sum2vxz	(	complex*16,dimension(dim)	vec,
		complex*16	sum2,
		integer	dim
	)

Definition at line 326 of file op1lib.f.

subroutine tranmxd	(	real*8,dimension(dim1,dim2)	a,
		real*8,dimension(dim2,dim1)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1602 of file op1lib.f.

subroutine tranmxz	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim2,dim1)	c,
		integer	dim1,
		integer	dim2
	)

Definition at line 1579 of file op1lib.f.

subroutine tranqxd	(	real*8,dimension(dim,dim)	a,
		integer	dim
	)

Definition at line 1650 of file op1lib.f.

Here is the caller graph for this function:

subroutine tranqxz	(	complex*16,dimension(dim,dim)	a,
		integer	dim
	)

Definition at line 1625 of file op1lib.f.

subroutine trhxz	(	complex*16,dimension(dim,dim)	mat,
		real*8	trace,
		integer	dim
	)

Definition at line 471 of file op1lib.f.

Here is the caller graph for this function:

subroutine trmmaxzz	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim1,dim2)	b,
		complex*16	trace,
		integer	dim1,
		integer	dim2
	)

Definition at line 572 of file op1lib.f.

subroutine trmmaxzza	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim1,dim2)	b,
		complex*16	scal,
		integer	dim1,
		integer	dim2
	)

Definition at line 605 of file op1lib.f.

subroutine trmmcxzz	(	complex*16,dimension(dim1,dim2)	a,
		complex*16,dimension(dim2,dim1)	b,
		complex*16	trace,
		integer	dim1,
		integer	dim2
	)

Definition at line 542 of file op1lib.f.

subroutine trqxd	(	real*8,dimension(dim,dim)	mat,
		real*8	trace,
		integer	dim
	)

Definition at line 494 of file op1lib.f.

subroutine trqxz	(	complex*16,dimension(dim,dim)	mat,
		complex*16	trace,
		integer	dim
	)

Definition at line 516 of file op1lib.f.

subroutine trtxz	(	complex*16,dimension(dim1,dim2,dim2)	ten,
		complex*16,dimension(dim1)	vec,
		integer	dim1,
		integer	dim2
	)

Definition at line 631 of file op1lib.f.

Here is the call graph for this function:

subroutine unitqxd	(	real*8,dimension(dim,dim)	mat,
		integer	dim
	)

Definition at line 898 of file op1lib.f.

subroutine unitqxz	(	complex*16,dimension(dim,dim)	mat,
		integer	dim
	)

Definition at line 872 of file op1lib.f.

subroutine zeromxd	(	real*8,dimension(dim1,dim2)	mat,
		integer	dim1,
		integer	dim2
	)

Definition at line 679 of file op1lib.f.

subroutine zeromxi	(	integer,dimension(dim1,dim2)	mat,
		integer	dim1,
		integer	dim2
	)

Definition at line 725 of file op1lib.f.

subroutine zeromxl	(	logical,dimension(dim1,dim2)	mat,
		integer	dim1,
		integer	dim2
	)

Definition at line 748 of file op1lib.f.

subroutine zeromxz	(	complex*16,dimension(dim1,dim2)	mat,
		integer	dim1,
		integer	dim2
	)

Definition at line 656 of file op1lib.f.

Here is the caller graph for this function:

subroutine zerovxd	(	real*8,dimension(dim)	vec,
		integer	dim
	)

Definition at line 791 of file op1lib.f.

subroutine zerovxi	(	integer,dimension(dim)	vec,
		integer	dim
	)

Definition at line 831 of file op1lib.f.

subroutine zerovxl	(	logical,dimension(dim)	vec,
		integer	dim
	)

Definition at line 851 of file op1lib.f.

subroutine zerovxs	(	real*4,dimension(dim)	vec,
		integer	dim
	)

Definition at line 811 of file op1lib.f.

subroutine zerovxz	(	complex*16,dimension(dim)	vec,
		integer	dim
	)

Definition at line 771 of file op1lib.f.

Here is the caller graph for this function: