885       subroutine ramg_dump_matlab_A(acolm,arowp,alhs,an,annz,redun,  argument
893       integer :: an,annz,redun  local
894       integer,dimension(an+1) :: acolm
913       do i=1,an
927       subroutine ramg_dump_matlab_map(acolm,arowp,alhs,an,annz,redun,  argument
934       integer :: an,annz,redun  local
935       integer,dimension(an+1) :: acolm
949           call ramg_dump_matlab_A(acolm,arowp,alhs,an,annz,redun,
963       do i=1,an
976       subroutine ramg_dump_mupad_A(acolm,arowp,alhs,an,annz,  argument
978       integer :: an,annz  local
979       integer,dimension(an+1) :: acolm
993       write(264,*)mAname,':= matrix(',an,',',an,'):'
994       do i=1,an