Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
BAORadio
AnaPAON4
Commits
4752b661
Commit
4752b661
authored
May 19, 2015
by
Reza ANSARI
Browse files
petites corrections ds placx.pic , Reza 19/05/2015
parent
a277f2c3
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
7 additions
and
6 deletions
+7
-6
placx.pic
placx.pic
+7
-6
No files found.
placx.pic
View file @
4752b661
...
...
@@ -12,7 +12,7 @@ setaxesatt 'font=helvetica,bold,16 fixedfontsize minorticks'
# Ouvrir le fichier
openppf $flnm.ppf
set DT $flnm
print $DT
print $DT
1
## Facteur de normalisation entre les voies x 1.e-4
## 1 1/3.48 1.06 0.92 1 0.98 0.377 1.32
...
...
@@ -27,7 +27,7 @@ plot2d $DT time/3600 p1*$FNORM[0] 1 " nsta cpts notit $COLS[0] "
### trace de p2 ... p8
for i 1:8
j = i+1
plot2d $
N
T time/3600 p$j*$FNORM[i] 1 "nsta cpts same notit $COLS[i] "
plot2d $
D
T time/3600 p$j*$FNORM[i] 1 "nsta cpts same notit $COLS[i] "
end
### Axes et titres
setaxelabels 'Time (hours)' 'P1...P8 (arb.units)' 'font=helvetica,bolditalic,16 black'
...
...
@@ -40,21 +40,22 @@ plot2d $DT time/3600 p1HI*$FNORM[0] 1 " nsta cpts notit $COLS[0] "
### trace de p2 ... p8
for i 1:8
j = i+1
plot2d $
N
T time/3600 p$
j
HI*$FNORM[i] 1 "nsta cpts same notit $COLS[i] "
plot2d $
D
T time/3600 p$
{j}
HI*$FNORM[i] 1 "nsta cpts same notit $COLS[i] "
end
### Axes et titres
setaxelabels 'Time (hours)' 'P1...P8 (arb.units)' 'font=helvetica,bolditalic,16 black'
settitle "$titre @1420 MHz" ' ' 'font=helvetica,bold,18 black'
###### Trace des 6 cross-correlations
set XCORNORM ( 1.e-3 1.e-3 1.e-3 1.e-3 1.e-3 1.e-3 )
set XCOR ( xh1h2 xh1h3 xh1h4 xh2h3 xh2h4 xh3h4 )
set XCORTIT ( 1H-2H 1H-3H 1H-4H 2H-3H 2H-4H 3H-4H )
## On trace p1 en fct du temps
newwin 3 2 900 600
for i 0:6
plot2d $DT time/3600
sqrt(pow(
$XCOR[i].real
,2)+pow($XCOR[i].imag,2))
1 " nsta cpts notit
black
"
plot2d $DT time/3600 $XCOR[i].real 1 " nsta cpts notit same bl
ue
"
plot2d $DT time/3600 $XCOR[i].imag 1 " nsta cpts notit same red "
plot2d $DT time/3600 $XCOR[i].real
*$XCORNORM[i]
1 " nsta cpts notit
same blue
"
plot2d $DT time/3600
sqrt(pow(
$XCOR[i].real
,2)+pow($XCOR[i].imag,2))*$XCORNORM[i]
1 " nsta cpts notit same bl
ack
"
plot2d $DT time/3600 $XCOR[i].imag
*$XCORNORM[i]
1 " nsta cpts notit same red "
setaxelabels 'Time (hours)' 'Cross-Corr (arb.units)' 'font=helvetica,bolditalic,16 black'
settitle "$titre $XCORTIT[i]" ' ' 'font=helvetica,bold,18 black'
end
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment