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

Annotation of /MITgcm/optim/blas1.h

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


Revision 1.1.2.1 - (hide annotations) (download)
Tue Feb 5 20:34:34 2002 UTC (22 years, 2 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 heimbach 1.1.2.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