Question: Convert a matlab file to Maple file

Hi,

I have a matlab file and i want to use this one in Maple.

Is there a way to convert a m.file to a maple file?

The matlab code is this:

%Parameter values
lambda=0.00755834; %Sheath loss factor
Re = 26.5 %Outer cable radius [mm]
Delta = 5.9E-7 %Thermal diffusivity of soil[m^2/s]
alfa = 0.00403 %Temp coefficient of conductor material [K^-1]
R20 = 0.321 %AC resistivity of conductor material at 20 °C [Ohm/m]
RHOs = 0.8 %Thermal resistivity of soil [Km/W]
timestep =1 %Number of intermediate values per hour
D_1=1500
D_2=3000
D_3=6000
%Read data from text file
[InputT, I, D, Ta]=textread(('C:\Program Files\MATLAB\R2011b\bin\Omgevingtemp\Omgevingtemp40diepte.txt'),'%d %d %d %d','delimiter',','); %Inputcolumns: No, Current,Ambienttemperature*100]

%Memory allocation
Rt=zeros(1,length(I)); %Conductor steady state resistance vector
Wc=zeros(1,length(I)); %Conductor losses vector
Ws=zeros(1,length(I)); %Screen losses vector
time=zeros(1,timestep*length(I)); %Time vector
Tamb=zeros(1,timestep*length(I)); %Ambient temperature vector

SoilTemp=zeros(3,timestep*length(I)); %Cable-soil interface temperature matrix
SoilTemp_1=zeros(3,timestep*length(I)); %Cable-soil interface temperature matrix
SoilTemp_2=zeros(3,timestep*length(I)); %Cable-soil interface temperature matrix
TempPlot=zeros(4,timestep*length(I)); %Matrix for temperature components for plotting
Wtottrans=zeros(1,length(I)); %Transient total losses
EiA=zeros(1,timestep*length(I)); %Vector for exponential integral values
EiB=zeros(1,timestep*length(I)); %Vector for exponential integral values
EiA_1=zeros(1,timestep*length(I)); %Vector for exponential integral values
EiB_1=zeros(1,timestep*length(I)); %Vector for exponential integral values
EiB_2=zeros(1,timestep*length(I)); %Vector for exponential integral values
EiB_3=zeros(1,timestep*length(I)); %Vector for exponential integral values
%Make time vector for plotting
for cc=1:length(InputT)
for i=1:timestep
time((cc-1)*timestep+i) = (cc - 1) + i / timestep;
end
end

%Expand I for plotting and put in TempPlot(3,:). Furthermore expand Ta (input ambient temp) into Tamb (ambient temp for calculation)
for c=1:length(I)
for i=1:timestep
TempPlot(4,(c-1)*timestep+i)=I(c);
Tamb((c-1)*timestep+i) = Ta(c)/100;
end