Ignore:
Timestamp:
04/01/13 19:31:21 (11 years ago)
Author:
leila_ocean
Message:

Friday's afternoon modifications

File:
1 edited

Legend:

Unmodified
Added
Removed

  • altifloat/src/Yworkdir/Y2floater_delta.h

    r84 r86  
    28162816Ytps = Ytttt_pdt(0, YTemps, YidTraj); 
    28172817         Yting[15]=YS8_xinter( Yi, Ytps); 
    2818          Yting[16]=YS1_r_float_d( Yi, YTemps-1); 
    2819          Yting[17]=YS2_r_float_d( Yi, YTemps-1); 
     2818Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     2819         Yting[16]=YS1_r_float( Yi, Ytps); 
     2820Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     2821         Yting[17]=YS2_r_float( Yi, Ytps); 
    28202822         Yur_d(Yi)->forward( Yting[0], Yting[1], Yting[2], Yting[3], Yting[4], Yting[5], Yting[6], Yting[7], Yting[8], Yting[9], Yting[10], Yting[11], Yting[12], Yting[13], Yting[14], Yting[15], Yting[16], Yting[17] ); 
    28212823         Yting[0]=YS1_r_float_d( Yi, YTemps-1); 
    … …  
    28632865Ytps = Ytttt_pdt(0, YTemps, YidTraj); 
    28642866         Yting[15]=YS8_xinter( Yi, Ytps); 
    2865          Yting[16]=YS1_r_float_d( Yi, YTemps-1); 
    2866          Yting[17]=YS2_r_float_d( Yi, YTemps-1); 
     2867Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     2868         Yting[16]=YS1_r_float( Yi, Ytps); 
     2869Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     2870         Yting[17]=YS2_r_float( Yi, Ytps); 
    28672871         Ytbeta[0]=YG1_uinter_d( Yi, YTemps); 
    28682872         Ytbeta[1]=YG2_uinter_d( Yi, YTemps); 
    … …  
    28892893Ytps = Ytttt_pdt(0, YTemps, YidTraj); 
    28902894         Ytbeta[15]=YG8_xinter( Yi, Ytps); 
    2891          Ytbeta[16]=YG1_r_float_d( Yi, YTemps-1); 
    2892          Ytbeta[17]=YG2_r_float_d( Yi, YTemps-1); 
     2895Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     2896         Ytbeta[16]=YG1_r_float( Yi, Ytps); 
     2897Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     2898         Ytbeta[17]=YG2_r_float( Yi, Ytps); 
    28932899         memset(Yjac, 0, 36*sizeof(double)); 
    28942900         Yur_d(Yi)->backward( Yting[0], Yting[1], Yting[2], Yting[3], Yting[4], Yting[5], Yting[6], Yting[7], Yting[8], Yting[9], Yting[10], Yting[11], Yting[12], Yting[13], Yting[14], Yting[15], Yting[16], Yting[17] ); 
    … …  
    29582964Ytps = Ytttt_pdt(0, YTemps, YidTraj); 
    29592965         Yting[15]=YS8_xinter( Yi, Ytps); 
    2960          Yting[16]=YS1_r_float_d( Yi, YTemps-1); 
    2961          Yting[17]=YS2_r_float_d( Yi, YTemps-1); 
     2966Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     2967         Yting[16]=YS1_r_float( Yi, Ytps); 
     2968Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     2969         Yting[17]=YS2_r_float( Yi, Ytps); 
    29622970        if (!strcmp(nmmod, "ur_d") || All) 
    29632971        { 
    … …  
    30233031Ytps = Ytttt_pdt(0, YTemps, YidTraj); 
    30243032         Yting[15]=YS8_xinter( Yi, Ytps); 
    3025          Yting[16]=YS1_r_float_d( Yi, YTemps-1); 
    3026          Yting[17]=YS2_r_float_d( Yi, YTemps-1); 
     3033Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     3034         Yting[16]=YS1_r_float( Yi, Ytps); 
     3035Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     3036         Yting[17]=YS2_r_float( Yi, Ytps); 
    30273037        if (!strcmp(nmmod, "ur_d") || All) 
    30283038        { 
    … …  
    31133123Ytps = Ytttt_pdt(0, YTemps, YidTraj); 
    31143124         Yting[15]=YS8_xinter( Yi, Ytps); 
    3115          Yting[16]=YS1_r_float_d( Yi, YTemps-1); 
    3116          Yting[17]=YS2_r_float_d( Yi, YTemps-1); 
     3125Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     3126         Yting[16]=YS1_r_float( Yi, Ytps); 
     3127Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     3128         Yting[17]=YS2_r_float( Yi, Ytps); 
    31173129         memset(Yjac, 0, 36*sizeof(double)); 
    31183130         Yur_d(Yi)->backward( Yting[0], Yting[1], Yting[2], Yting[3], Yting[4], Yting[5], Yting[6], Yting[7], Yting[8], Yting[9], Yting[10], Yting[11], Yting[12], Yting[13], Yting[14], Yting[15], Yting[16], Yting[17] ); 
    … …  
    31423154Ytps = Ytttt_pdt(0, YTemps, YidTraj); 
    31433155         YG8_xinter( Yi, Ytps) += Ytbeta[15]; 
    3144          YG1_r_float_d( Yi, YTemps-1) += Ytbeta[16]; 
    3145          YG2_r_float_d( Yi, YTemps-1) += Ytbeta[17]; 
     3156Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     3157         YG1_r_float( Yi, Ytps) += Ytbeta[16]; 
     3158Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     3159         YG2_r_float( Yi, Ytps) += Ytbeta[17]; 
    31463160         if (Ytestad_module) { 
    31473161                        Yting[0]=YD1_uinter_d( Yi, YTemps); 
    … …  
    31693183Ytps = Ytttt_pdt(0, YTemps, YidTraj); 
    31703184                        Yting[15]=YD8_xinter( Yi, Ytps); 
    3171                         Yting[16]=YD1_r_float_d( Yi, YTemps-1); 
    3172                         Yting[17]=YD2_r_float_d( Yi, YTemps-1); 
     3185Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     3186                        Yting[16]=YD1_r_float( Yi, Ytps); 
     3187Ytps = Ytttt_pdt(0, YTemps-1, YidTraj); 
     3188                        Yting[17]=YD2_r_float( Yi, Ytps); 
    31733189                        YLTRes = Yprosca(&YD1Y_ur_d, &YG1Y_ur_d, YNBS_ur_d); 
    31743190                        YAdRes = Yprosca(Yting, Ytbeta, YNBI_ur_d); 
Note: See TracChangeset for help on using the changeset viewer.