Changeset 2640 in Sophya for trunk/SophyaLib/Samba/harmspher.cc


Ignore:
Timestamp:
Dec 2, 2004, 5:37:51 PM (21 years ago)
Author:
cmv
Message:

gain de precision a petit theta cmv 02/12/04

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/SophyaLib/Samba/harmspher.cc

    r2635 r2640  
    3939----------------------------------------------------------------
    4040*/
    41 
    42 double HarmSph_array(int lmax,int m,double x,double *xlm)
    43 {
    44  if(x>1.) x=1.; else if(x<-1.) x=-1.;
    45  return HarmSph_array_teta(lmax,m,acos(x),xlm);
    46 }
    4741
    4842double HarmSph_array_teta(int lmax,int m,double teta,double *xlm)
Note: See TracChangeset for help on using the changeset viewer.