/dports/science/aircraft-datcom/aircraft-datcom-ed877bb/src/ |
H A D | wbclb.f | 2 1 ALPB,WINGIN,XC,TAPR,ALIW,KWB,KBW,CLBN14,CNAM14,CLBLFB, argument 32 CLI = CLAW*ALIW 42 1 CLAW*(ALP(J)-ALIW)
|
H A D | inftgm.f | 14 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 25 COSAIW=COS(ALIW/RAD) 28 SINAIW=SIN(ALIW/RAD)
|
H A D | jetpwe.f | 17 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 118 COSAIW=COS(DEG*ALIW) 125 1 -WINGIN(2)))-JIALOC)*COS(DEG*ALIW)/CRJ 130 XBARJ=(XW+A(38)*JELLOC +CRJ/4.0-JIALOC)*COS(DEG*ALIW)/CRJ 248 EPSLON=DEUDA*(ALIW+ALSCHD(J)-ALPHA0)
|
H A D | setup1.f | 13 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 36 TMP=ALIW
|
H A D | supwb.f | 40 4 (ALIW,SYNA(4)),(BETA,SWB(6)),(CLAW,WING(101)), 215 IF(ALIW.EQ.0.0.OR.(ALIW.EQ.UNUSED))GO TO 1080 227 1080 CLI=CLAW*ALIW 243 DELXW=(SPAN-SPANS)*TANLE*COS(ALIW/RAD)
|
H A D | suphb.f | 40 4(ALIW,SYNA(8)),(BETA,SHB(6)),(CLAW,HT(101)), 214 IF(ALIW.EQ.0.0.OR.(ALIW.EQ.UNUSED))GO TO 1080 226 1080 CLI=CLAW*ALIW 242 DELXW=(SPAN-SPANS)*TANLE*COS(ALIW/RAD)
|
H A D | wgeotl.f | 13 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 52 Z0=A(12)-(A(24)-A(80)*BVTO2)*TAN((FLC(J+22)+ALIW)/RAD)
|
H A D | seclev.f | 10 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 54 2 A(27),ALIW,SWB(35),SWB(11),SEC(6),SEC(9),SEC(5),
|
H A D | prpwef.f | 12 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 305 1)*COS(DEG*ALIW) 310 XBARP=(XW+A(62)*YP+CRP/4.0-PHALOC)*COS(DEG*ALIW) 321 COSAIW=COS(DEG*ALIW) 356 ALPHAP=AIETLP+DEUDA*(ALIW-ALPHA0) 491 ALPHAP =ALPHAT +DEUDA*(ALIW+ALSCHD(J)-ALPHA0)
|
H A D | trawbt.f | 49 1,(ALIW,SYNA(4)),(ALCLM,A(127)),(ALP0,A(126)) 99 ARG1=ALIW-ALP0
|
H A D | dwash.f | 22 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 148 XLH=(XH-AHT(161)*COS(ALIH/RAD))-(XW-A(161)*COS(ALIW/RAD))
|
H A D | syndim.f | 12 COMMON /SYNTSS/ XCG, XW, ZW, ALIW, ZCG, XH, ZH, ALIH, XV, local
|
H A D | wbaero.f | 14 COMMON /SYNTSS/ XCG, XW, ZW, ALIW, ZCG, XH, ZH, ALIH, XV, local 60 1 WING(121),ALIW,BD(81),ZW,WING(41),FACT(1),ZCG)
|
H A D | sdwash.f | 8 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 51 ALPHA(J) = FLC(J+22)+ALIW
|
H A D | supwbt.f | 23 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local 210 Z0=A(12)-(A(24)-A(80)*BVTO2)*TAN((FLC(J+22)+ALIW)/RAD) 318 CMWBT(J)=CMAWBT(J)*FLC(J+22)+(SLG(136)/RAD)*(SWB(2)+SWB(37))*ALIW
|
H A D | m04o04.f | 15 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX,XVF, local
|
H A D | m18o22.f | 7 COMMON /SYNTSS/ XCG, XW, ZW, ALIW, ZCG, XH, ZH, ALIH, XV, local
|
H A D | m19o23.f | 15 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIHXV,VERTUP,HINAX, local
|
H A D | clwbt.f | 14 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ZH,ALIH,XV,VERTUP,HINAX, local
|
H A D | m02o02.f | 7 COMMON /SYNTSS/ XCG, XW, ZW, ALIW, ZCG, XH, ZH, ALIH, XV, local
|
H A D | supcm0.f | 9 COMMON /SYNTSS/ XCG, XW, ZW, ALIW, ZCG, XH, ZH, ALIH, XV, local
|
H A D | m06o06.f | 14 COMMON /SYNTSS/ XCG,XW,ZW,ALIW,ZCG,XH,ALIH,XV,VERTUP,HINAX, local
|
H A D | tracm0.f | 9 COMMON /SYNTSS/ XCG, XW, ZW, ALIW, ZCG, XH, ZH, ALIH, XV, local
|
/dports/science/aircraft-datcom/aircraft-datcom-ed877bb/data/ |
H A D | sprob.in | 32 $SYNTHS XW=3.61,ZW=-.80,ALIW=2.0,XCG=4.14$ 59 $SYNTHS XCG=2.60,ZCG=0.0,XW=1.70,ZW=0.0,ALIW=0.0,XH=3.93, 129 $SYNTHS XW=8.064,ZW=0.0,ALIW=0.0$ 156 $SYNTHS XW=3.4579,ZW=0.0,ALIW=0.0$ 171 $SYNTHS XCG=2.60,ZCG=0.0,XW=1.70,ZW=0.0,ALIW=0.0$ 195 $SYNTHS XCG=2.60,ZCG=0.0,XW=1.70,ZW=0.0,ALIW=0.0$ 219 $SYNTHS XCG=2.60,ZCG=0.0,XW=1.70,ZW=0.0,ALIW=0.0,XH=3.93,ZH=0.0,ALIH=0.0, 246 $SYNTHS XCG=2.60,ZCG=0.0,XW=1.70,ZW=0.0,ALIW=0.0,XH=3.93,ZH=0.0,ALIH=0.0,
|
H A D | for005.dat | 5 $SYNTHS XCG=320.65,ZCG=0.0,XW=213.43,ZW=0.0,ALIW=0.0,
|