|
Last change
on this file since 211 was
85,
checked in by aslmd, 14 years ago
|
|
LMD_MM_MARS et LMD_LES_MARS: ajout des routines IDL pour tracer les sorties --> voir mesoscale/PLOT
|
|
File size:
408 bytes
|
| Line | |
|---|
| 1 | ;;# |
|---|
| 2 | ;;# @coeffw |
|---|
| 3 | ;;# |
|---|
| 4 | |
|---|
| 5 | ye2, r, t |
|---|
| 6 | |
|---|
| 7 | ;;1.2 |
|---|
| 8 | yeyeye = where(t le 1.5) & r0 = r[yeyeye] & t0 = t[yeyeye] |
|---|
| 9 | |
|---|
| 10 | ;;r0 = r & t0 = t |
|---|
| 11 | |
|---|
| 12 | rerr = replicate(1.e-10,n_elements(r0)) |
|---|
| 13 | start = [mean(r0), max(r0)-min(r0), (max(t0)-min(t0))*mean(r0)] |
|---|
| 14 | start = [2.53,0.73,0] |
|---|
| 15 | expr = 'FONC2(X, P)' |
|---|
| 16 | result = MPFITEXPR(expr,t0,r0,rerr,start) |
|---|
| 17 | |
|---|
| 18 | plot, r, t, psym=5, yrange=[0,1.5] & oplot, fonc2(t, result), t |
|---|
| 19 | ;oplot, fonc2(t, [2.53,0.73,0.]), t |
|---|
| 20 | |
|---|
Note: See
TracBrowser
for help on using the repository browser.
