function AnomaliaPrec( args )
    arq1   = subwrd( args, 1 )
    arq2   = subwrd( args, 2 )
    CI     = subwrd( args, 3 )
    Prev   = subwrd( args, 4 )
    Fileout= subwrd( args, 5 )
   'sdfopen 'arq1
   'sdfopen 'arq2
   'run PlotaDiff.gs'
   'draw title Anomalia Precipitacao (mm) \ CI: '%CI' Prev. '%Prev
   'run cbarn'
   'printim '%Fileout'.png'

'quit'
return
