Changeset 1960 for trunk/source/atom_seq_beryllium.cpp

Timestamp:

04/21/08 12:36:51 (9 months ago)

Author:

gary

Message:

tidy up code - no change in any executable statements

upgrade lint, removed lint directives no longer needed
removed unused header files
extra ; removed in lines ending in ;;

Files:

• trunk/source/atom_seq_beryllium.cpp (modified) (1 diff)

trunk/source/atom_seq_beryllium.cpp

@@ -216 +216 @@
         nerror = 0;
 
-        /*lint -e740 unusual cast */
         getrf_wrapper(4, 4, (double*)amat, 4, ipiv, &nerror);
         getrs_wrapper('N', 4, 1, (double*)amat, 4, ipiv, bvec, 4, &nerror);
-        /*lint +e740 unusual cast */
-
-        /*DGETRF(4,4,(double*)amat,4,ipiv,&nerror);*/
-        /*DGETRS('N',4,1,(double*)amat,4,ipiv,bvec,4,&nerror);*/
+
         if( nerror != 0 )
         {