Subroutine cheb_to_leg

subroutine cheb_to_leg

        ! Variables
    integer, intent(in) :: N
    integer, intent(in) :: m1
    integer, intent(in) :: m2
    double precision, intent(in), dimension (0:N,0:N) :: cheb
    double precision, intent(in), dimension (0:m1,0:m1) :: A1
    double precision, intent(in), dimension (0:m2,0:m2) :: A2
    double precision, intent(out), dimension (0:N,0:N) :: leg
    integer :: i
    integer :: j
    integer :: k
    integer :: h
    double precision, dimension (0:m1,0:N) :: cheb1
    double precision, dimension (0:m2,0:N) :: cheb2
    double precision, dimension (0:N,0:m1) :: hep1
    double precision, dimension (0:N,0:m2) :: hep2
    character :: lside
    character :: rside
    character :: uplo
    character :: ytrans
    character :: ntrans
    character :: diag

end subroutine cheb_to_leg

Computes the transformation from chebychev to legendre space using the method devised by Shen. Require A1 and A2 from nycheb_leg_disk

Author: B.P Tjostheim

Version: 0.7

Description of Variables

N

integer, intent(in) :: N

m1

integer, intent(in) :: m1

m2

integer, intent(in) :: m2

cheb

double precision, intent(in), dimension (0:N,0:N) :: cheb

A1

double precision, intent(in), dimension (0:m1,0:m1) :: A1

A2

double precision, intent(in), dimension (0:m2,0:m2) :: A2

leg

double precision, intent(out), dimension (0:N,0:N) :: leg

i

integer :: i

j

integer :: j

k

integer :: k

h

integer :: h

cheb1

double precision, dimension (0:m1,0:N) :: cheb1

cheb2

double precision, dimension (0:m2,0:N) :: cheb2

hep1

double precision, dimension (0:N,0:m1) :: hep1

hep2

double precision, dimension (0:N,0:m2) :: hep2

lside

character :: lside

rside

character :: rside

uplo

character :: uplo

ytrans

character :: ytrans

ntrans

character :: ntrans

diag

character :: diag