[go: up one dir, main page]

Menu

[r34]: / ErrorCalculus / modules.f90  Maximize  Restore  History

Download this file

50 lines (47 with data), 1.5 kB

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
module moduleImageCreator
integer,dimension(:,:),allocatable::imga,imgb
integer::nx,ny
character(256)::fileNamea,fileNameb
real,dimension(:),allocatable::spotLocX,spotLocY,spotLocDX,spotLocDY
integer::nbSpots,intensity_min,intensity_max
real::particleDensity,particleSize
real::GlobalShiftX,GlobalShiftY,BurgerRadius,BurgerCentreX,BurgerCentreY
real::BurgerCirculation
endmodule moduleImageCreator
module MODEXCHG
integer::M,nbpp,pngx,pngy
byte,dimension(4096*4096*2)::IN
character(120)::path2,path
end module MODEXCHG
module modnetcdf
integer,dimension(:),allocatable::v_user1_1,v_user1_2
integer::user1_1,user1_2
real,dimension(:,:),allocatable::V,VD,V2,VD2
integer::nb_coord,nb_dim,constant_pixcm,hart
integer::nb_vectors,nb_vectors2
integer::civ2=0
integer::fix=0
integer::fix2=0
integer::patch=0
integer::patch2=0
integer::nb_vec_patch,nb_vec2_patch
real::pixcmx,pixcmy,T0,T02,dt,dt2,kc,kc2,pixcmx_out,pixcmy_out
real(8)::ro,ro2
character(1)::img1,img2,img3,img4
integer::patch_nx,patch_ny,patch2_nx,patch2_ny
logical:: verbose
integer::nbMasked,nbAvgLessThan,nbAvgNull,nbAvgLessThanANDMaxCorrLessThan
integer::nbInstable,nbIsTooSmall,nbInstableHart,nbCptError,nbHartPrefered
integer::nbdiffCIV1CIV2
!= 0 Masked Hard-BLACK
!=3 AvgLessThan (imgA)
!=3.1 AvgNull (imgB)
!=3.2 AvgLessThanANDMaxCorrLessThan
!=3.3 Instable (sfit1)
!=-2 IsToosmall
!=9 InstableHart
!=9.1 InstableHartBis
!=2 HartPrefered
!=4.1 CptError
!=4 DiffCIV2CIV1
end module modnetcdf