/[MITgcm]/MITgcm/optim/blas1.h
ViewVC logotype

Contents of /MITgcm/optim/blas1.h

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1.2.1 - (show annotations) (download)
Tue Feb 5 20:34:34 2002 UTC (22 years, 10 months ago) by heimbach
Branch: ecco-branch
CVS Tags: ecco_c50_e32, ecco_c50_e33, ecco_c50_e30, ecco_c50_e31, ecco_c51_e34d, ecco_c51_e34e, ecco_c51_e34f, ecco_c51_e34g, ecco_c51_e34a, ecco_c51_e34b, ecco_c51_e34c, icebear5, icebear4, icebear3, icebear2, ecco_c50_e29, ecco_c50_e28, ecco_c44_e19, ecco_c44_e18, ecco_c44_e17, ecco_c44_e16, ecco_c50_e33a, ecco_c51_e34, ecco_ice2, ecco_ice1, ecco_c44_e25, ecco_c44_e22, ecco_c44_e23, ecco_c44_e20, ecco_c44_e21, ecco_c44_e26, ecco_c44_e27, ecco_c44_e24, ecco-branch-mod1, ecco-branch-mod2, ecco-branch-mod3, ecco-branch-mod4, ecco-branch-mod5
Branch point for: c24_e25_ice, icebear
Changes since 1.1: +17 -0 lines
File MIME type: text/plain
o Updating adjoint/makefile to ECCO code
o Adding optim and lsopt for line search optimization.
o Adding verif. experiments for ECCO
Code will be tagged ecco-branch-mod1.

1
2 #ifndef BLAS1_H
3 #define BLAS1_H
4
5 #ifdef IS_DOUBLE
6 # define SDOT ddot
7 # define SNRM2 dnrm2
8 # define SSUM dsum
9 # define SSCAL dscal
10 #else
11 # define SDOT sdot
12 # define SNRM2 snrm2
13 # define SSUM ssum
14 # define SSCAL sscal
15 #endif
16
17 #endif

  ViewVC Help
Powered by ViewVC 1.1.22