#!perl #
#
# Perl script to compile package FORMS by means of Perl script 'f.pl'
# ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  @OPTIONS=@ARGV;
  @ARGV=();
  require 'f.pl';
#
  &COMPILE('iniwrl'  ,@OPTIONS);
  &COMPILE('ptswrl'  ,@OPTIONS);
  &COMPILE('linwrl'  ,@OPTIONS);
  &COMPILE('srfwrl'  ,@OPTIONS);
  &COMPILE('grdwrl'  ,@OPTIONS);
  &COMPILE('plgn'    ,@OPTIONS);
  &COMPILE('trgl'    ,@OPTIONS);
  &COMPILE('trglsort',@OPTIONS);
  &COMPILE('trglnorm',@OPTIONS);
  &COMPILE('trglps'  ,@OPTIONS);
  &COMPILE('tsurf'   ,@OPTIONS);
  &COMPILE('pictures',@OPTIONS);
  &COMPILE('pallet'  ,@OPTIONS);
  &COMPILE('ss'      ,@OPTIONS);
  &COMPILE('sp'      ,@OPTIONS);
  &COMPILE('srp'     ,@OPTIONS);
  &COMPILE('linden'  ,@OPTIONS);
  &COMPILE('grdpts'  ,@OPTIONS);
  &COMPILE('mgrd'    ,@OPTIONS);
  &COMPILE('grdtrans',@OPTIONS);
  &COMPILE('grdnew'  ,@OPTIONS);
  &COMPILE('grdmerge',@OPTIONS);
  &COMPILE('grdcal'  ,@OPTIONS);
  &COMPILE('grdnorm' ,@OPTIONS);
  &COMPILE('grdfft'  ,@OPTIONS);
  &COMPILE('grdfd'   ,@OPTIONS);
  &COMPILE('grd2d3d' ,@OPTIONS);
  &COMPILE('grdiso'  ,@OPTIONS);
  &COMPILE('grdran2d',@OPTIONS);
  &COMPILE('grdran'  ,@OPTIONS);
  &COMPILE('grdcor'  ,@OPTIONS);
  &COMPILE('grdstat' ,@OPTIONS);
  &COMPILE('grdckn'  ,@OPTIONS);
  &COMPILE('grdte'   ,@OPTIONS);
  &COMPILE('binasc'  ,@OPTIONS);
  &COMPILE('ascbin'  ,@OPTIONS);
  &COMPILE('swap'    ,@OPTIONS);
  &COMPILE('ptsgrd'  ,@OPTIONS);
  &COMPILE('grdps'   ,@OPTIONS);
  &COMPILE('gmt'     ,@OPTIONS);
  &COMPILE('gmgm'    ,@OPTIONS);
  &COMPILE('smgm'    ,@OPTIONS);
  &COMPILE('dmgm'    ,@OPTIONS);
  &COMPILE('smsm'    ,@OPTIONS);
# &COMPILE('dmsm'    ,@OPTIONS);
# &COMPILE('gmsmgmt' ,@OPTIONS);
  &COMPILE('smsmsm'  ,@OPTIONS);
  &COMPILE('gmdmgmt' ,@OPTIONS);
# &COMPILE('smdmsm'  ,@OPTIONS);
# &COMPILE('dmsmdm'  ,@OPTIONS);
  &COMPILE('sminv'   ,@OPTIONS);
  &COMPILE('smpower' ,@OPTIONS);
  &COMPILE('smeigen' ,@OPTIONS);
  &COMPILE('trsmsm'  ,@OPTIONS);
  &COMPILE('cremove' ,@OPTIONS);
  &COMPILE('do-test' ,@OPTIONS);
1;                                                               #