Commit 2b3cf473 authored by Dany Dumont's avatar Dany Dumont
Browse files

on poursuit le debogage

parent ded89f24
File mode changed from 100755 to 100644
......@@ -183,7 +183,7 @@ switch modelID
end
time = dat(nstart:nend);
time = dat0(nstart:nend);
[lon,lat,~] = xpyp2ll(iii,k,'gsl5km');
if numel(time) ~= numel(lat)
......
function transport(spotID,modelID)
datadir = '/Users/dany/Documents/MATLAB/sdm/data';
%datadir = '/Users/dany/Documents/MATLAB/sdm/data';
datadir = '/home/dumoda01/matlab/sdm/data';
spotfile = [datadir,'/spot',spotID,'.mat'];
load(spotfile);
......
......@@ -58,18 +58,18 @@ function [lon,lat,status,mgrid,proj] = xpyp2ll(xp,yp,domain)
y = x1*sin(theta)+y1*cos(theta);
x = x+x_centre;
y = y+y_centre;
[lat,lon] = mintran(proj, x, y );
[lat,lon] = minvtran(proj, x, y );
end
if strcmp(domain,'sag100') | strcmp(domain,'stl400') | strcmp(domain,'min400') | strcmp(domain,'djc2km') | strcmp(domain,'stl4++')
x = yp*mgrid.dl + mgrid.x0;
y = mgrid.y0 - xp*mgrid.dl;
[x, y] = rotate_vector(x,y,proj.theta);
[lat,lon] = mintran(proj, x, y );
[lat,lon] = minvtran(proj, x, y );
end
if strcmp(domain,'omg10m') % Origine de la grille en bas a gauche
x = yp*mgrid.dl + mgrid.x0;
y = xp*mgrid.dl + mgrid.y0 ;
[lat,lon] = mintran(proj, x, y );
[lat,lon] = minvtran(proj, x, y );
end
if strcmp(domain,'hb10km') | strcmp(domain,'ivu400') | strcmp(domain,'ivu2km') | strcmp(domain,'dec400') | strcmp(domain,'dec2km') ...
| strcmp(domain,'qua400') | strcmp(domain,'qua2km') | strcmp(domain,'kuj2km') | strcmp(domain,'kuj400') | strcmp(domain,'aup2km') ...
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment