program essai
use usegenplot
implicit none
! integer :: foo, bar
write(0, *) "------------ essai graf anim ---------------"
call init_genplot('essai.genplot')
end program