| 1 |
C $Header: /u/gcmpack/MITgcm_contrib/mlosch/optim_m1qn3/mlis3_common.h,v 1.2 2012/04/27 12:00:50 mlosch Exp $ |
| 2 |
C $Name: $ |
| 3 |
|
| 4 |
common /mlis3_l/ t_increased |
| 5 |
common /mlis3_i/ indica,indicd |
| 6 |
common /mlis3_rl/ tesf,tesd,fa,fpa,fn,barmin,barmul,barmax,barr, |
| 7 |
& tg,fg,fpg,td,ta,d2,fp,ffn,fd, |
| 8 |
& fpd,z,test,gauche,droite |
| 9 |
logical t_increased |
| 10 |
integer indica,indicd |
| 11 |
double precision tesf,tesd,fa,fpa,fn,barmin,barmul,barmax,barr |
| 12 |
double precision tg,fg,fpg,td,ta,d2,fp,ffn,fd, |
| 13 |
& fpd,z,test,gauche,droite |