Directory of image this file is from
This file as a plain text file

4094
609@XLG@TT@+Z%.'@
15
3840@O?7.1<8=8??+???@=I;
1344J"ENG1 IS A SET OF ENGINEERING PROGRAMS. EACH PROGRAM HAS A"%@U@L"CAL-NO.; IN ORDER TO ACCESS ANY PROGRAM IN THIS SET, USER"%@U@N"SHOULD TYPE IN THE DESIGNATED CAL-NO. WHEN REQUESTED BY THE"%@U@O"COMPUTER."%@8%U@P"INDE: 1"%@8"DIRE: 2"%@8"AMPR: 3"%@8"STAF: 4"%@U@R"RAMP: 5"%@8"PIPE: 6"%@8"CONR: 7"%@8"BEAM: 8"%@U@^%8"CAL-NO."
@8T@AW@U@ P@A@7CGE1H+PTRIUO]R
C
1345Z%8"PLEASE CHECK THE CAL-NO."%8YB]UA$"PROGRAM TO CALCULATE THE INDUCTANCE OF A SHORT SQUARE COIL."%@UA%"INDUCTANCE IN MH."
@8T@DW@8"SIDE OF COIL IN CM."
@8T@GW@UA&"LENGTH IN CM."
@8T@JW@8P?<P@GCQ@M@8P@MP@JDQ@P@8P?9P@PDQ@S@UA'P@P)E@P?6AP?3P@SCAP?0P@SP?-@ECB@P?*P@SP?'@ECBQ@V@UA(P@DP@GP@VCP?$CD)FQ@Y@8"REQUIRED TURNS = "
P@Y!
8P@Y@P?!A@)HQ@\@UA)"OR"
P@\!
"TURNS"%@8[3KUA*%8YC(UA."THIS PROGRAM CALCULATES SEMICONDUCTOR DIODE BODY RESISTANCE."%UA/"FWD. DIODE CURRENT (A)"
8T@
W@8"REV. SAT. CURRENT (A)"
@UA0T@"W@8"FWD. BIAS VOLT. (V)"
@8T@%W@8"JUNCTION TEMP. (K)"
UA1T@(W@8P?^Q@+@8P?[Q@.@8P@+P@(CP@.DP@
P@"DP?9A@)ECQ@18P@%P@1BP@
DQ@P@UA2%8"VOLT. ACROSS THE JUNCT. OF THE DIODE: "
P@1!
"VOLTS"%@UA3"DIODE'S OHMIC RESISTANCE: "
P@P!
"OHMS"%8[3KUA4%8YFRUA8"THIS PROGRAM CALCULATES THE VOLTAGE AND CURRENT GAIN AND"%UA9"THE INPUT AND OUTPUT RESISTANCE OF A TRANSISTOR AMPLIFIER"%@UA:"STAGE GIVEN THE H PARAMETERS OF THE TRANSISTOR, THE LOAD"%UA;"RESISTANCE, AND THE SOURCE RESISTANCE."%UA<"SIX INPUTS WILL BE REQUESTED AND THEY SHOULD BE ENTERRED IN"%@UA="A SAME LINE SEPARATED BY COMMAS. THEY ARE: HI (INPUT RES."%@UA>"W/OUTPUT SHORT CIRCUITED) IN OHMS; HO (OUTPUT CONDUCT."%UA?"W/INPUT OPEN-CIRCUITED) IN MHOS; HF (SHORT-CIRCUIT FWD.CURR."%UB@"GAIN); HR (REVERSE OPEN-CIRCUIT VOLT. AMPL.); RL (LOAD"%UBA"RES.) IN OHMS; RS(SOURCE RES.) IN OHMS."%@UBB%8%8T@4T@7T@:T@=T@STA@WUBCP@4P@7CP@:P@=CBQ@M@8P@:@P?9P@7P@SCADQAC8P@4P@MP@SCA@P?9P@7P@SCADQAFUBDP@:P@SCFP@4P@MP@SCADQAI8P@4PA@AP@MP@7PA@CADQAL@8%8%UBE"HI = "
P@4!%8"HO = "
P@7!%8"HF = "
P@:!%8"HR = "
P@=!%UBFP?XPAI@)M)ECQAO8"CURRENT GAIN:"
PAC!%8"VOLTAGE GAIN:"
@UBGPAI!%8"INPUT RESISTANCE:"
PAF!
"OHMS"%@8"OUTPUT"
UBH" RESISTANCE:"
PAL!
"OHMS"%8"DB. VOLT. GAIN:"
PAO!%8[3KUBI%8YMTUBL"STAF WILL CALCULATE THE STABILIZATION FACTOR OF A COMMON"%UBN"EMMITTER TRANSISTOR STAGE WITH SELF BIAS."%@8%UBP"BETA"
8T@JW@UBR"RB IN OHMS"
8T@SW@8"RE IN OHMS"
8TA@W@UBTP?9P@JA@P?9P@SPA@DACP?9P@JAP@SPA@DADQ@G8"S="
P@G!%@8[3K8%8YQLUBV"RAMP CALCULATES THE CRITICAL TIME REQUIRED FOR A"%UBX"VEHICLE TO SAFELY ENTER THE TRAFFIC STREAM OF A HIGHWAY."%UBZ%8"ANGLE BETWEEN RAMP AND HWY. IN DEG."
@8TARW@UB\"NORMALIZED LENGTH OF THE ACCELERATION LANE/100FT."
@8T@MW@UB^"RAMP SHAPE, 1 FOR TAPERED, AND 0 FOR PARALLEL."
8T@GW@UB P?U@P?RPARCAP?OP@MCBP?LP@MCP@MCAP?IPARCPARCBP?FP@GCBQ@(UB""CRITICAL TIME GAP = "
P@(!
"SECONDS"%@8[3K8%8YSCUB*"PIPE CALCULATES OPTIMUM PIPE SIZE FOR FLUID FLOW BASED ON"%@UB,"MINIMUM OPERATING COST."%@8%8"MASS FLOW RATE"
8TAUW@UB."VISCOSITY"
@8T@%W@8"FUILD SP. WEIGHT"
8TAXW@UB0"OPERATION PERIOD/YEAR"
@8TA[W@8"ELECT. COST, $/KWH."
@UB2T@+W@8"FRICTION LOSS IN %"
8TA^W@8"YEARLY COST AS %"
UB4" OF INSTALLATION COST"
@8TA!W@8"YEARLY MAINTENANCE COST"
@UB6" AS % OF INST. COST"
@8T@JW@8"RATIO OF COST OF FITTINGS"
@UB8" + COST OF ERECTION TO COST OF PIPE"
@8T@VW@8"COST OF"
@UB9" 1-IN STANDARD STEEL PIPE, $/FT."
8TA$W@8"EFFICENCY "
UB:"OF MOTOR-PUMP COMBINATION"
@8TA'W@UB;PAU@P?CDP?@@EP@%P>=@ECPAX@P>:@EDQAO8PAO@P>7PA[CP@+C@P?9PA^ACP>4@ECQA*UB<PA*PA!P@JAP@V@P?9ACPA$CPA'C@P>4@EDQ@MUB=P@M@P>1(B@ZZ.8P?9Q@G@8Y\'UB>P@M@P>.(B@ZZ<8P>+Q@G@8Y\'UB?P@M@P>((B@Z[J8P>%Q@G@8Y\'UC@P@M@P>"(B@Z[X8P?-Q@G@8Y\'UCAP@M@P>
(B@Z[&8P>\Q@G@8Y\'UCBP@M@P>Y(B@Z[48P>VQ@G@8Y\'UCCP@M@P>S(B@Z\B8P>PQ@G@8Y\'UCDP@M@P>M(B@Z\P8P?'Q@G@8Y\'UCE%8"REQUIRED I.D. = "
P@M!
"IN."%@8[3K8%8YVKUCF%8"REQUIRED I.D. = "
P@M!
"IN."%@8"USE"
P@G!
"INCH STANDARD"
UCG" PIPE"%@8[3K8%8YVKUCH"CONR CALCULATES THE REQUIRED WATER TAMPERATURE FOR MIXING"%@UCJ"CONCRETE DURING COLD WEATHER. TEMPERATURE SHOULD BE IN DEGREE "%UCL"F, AND WEIGHT SHOULD BE IN LB."%8%UCN"DESIRED TEMP. OF MIX."
@8TARW@8"TEMP. OF DRY AGGREGATE"
UCPTA-W@8"TEMP. OF DRY CEMENT"
@8TA0W@8"TEMP. OF MOIST. "
UCR"IN THE AGGREGATE"
8TA3W@8"WEIGHT OF DRY AGGR."
@8TA6W@UCT"WEIGHT OF DRY CEM."
8TA9W@8"WEIGHT OF MIX. H2O"
8TA<W@UCV"WEIGHT OF MOIST. IN AGGR."
@8TA?W@8%UCXPARPA6PA9AP>JDPA?APA<ACPA-PA6CPA0PA9CAP>JDBPA3PA?CBPA<DQ@(@8P>GP@(BQBB@UCZPBB@P>D(D@Z!$8PBB@P>D(C@Z"'UC\%8"REQUIRED H2O TEMP. = "
P@(!
"IS EXCESSIVE. AGGREGATE MUST"%@UC^"BE PREHEATED OR DESIRED TEMP. OF MIXTURE REDUCED."%@UC
[3K8%8Y^'UC "REQUIRED H2O TEMP. IS"
P@(!
"DEGREES F."%@8[3K8%8Y^'UC&"BEAM CALCULATES SIMPLE DEFLECTION PRODUCED BY SINGLE"%UC'"CONCENTRATED LOAD AT:"%@UC("1.  SINGLE POINT."%@8"2.  SEVERAL POINTS."%@UC)"3.  MAXIMUM DEFLECTION."%@8%UC*"PLEASE SELECT YOUR OPTION"
@8TBEW@8PBE@7$0(3-N
1347,"APPL. LOAD (LB.)"
8TBHW@8"LEFT, DIST. TO LOAD (IN.)"
@UC.TA!W@8"BEAM LENGTH (IN.)"
@8TBKW@8"MOD. OF ELASTICITY "
@UC0"(LB/SQ.IN.)"
@8TA'W@8"2ND OF CROSS SEC."
@8TBNW@UC2"POS. OF BEAM MEAS. FROM ORIGIN"
8TA$W@8%UC4PBKPA!BQ@J@8PA!PA$BQAC@8PAC@P>D(D@Z&18Y'VUC6PBHPA!CPBKPA$BC@P?-PBKCP@JBP@JCPBKPA$BP?-@EBC@P>APA'CPBNCPBKCDFQA[@8Y';UC8PBHP@JCPA$C@P?-PBKCPBKPA$BCP@JP@JCBPBKPA$BP?-@EBC@P>APA'CPBNCPBKCDFQA[@UC:"POSITION ON THE BEAM MEASURED FROM THE ORIGIN"
PA$!
"IN."%UC;"DEFLECTION AT LOCATION"
PA[!
"IN."%@8[3K8%8Y$VUC<"APPL. LOAD (LB.)"
8TBHW@8"LEFT, DIST. TO LOAD (IN.)"
@UC=TA!W@8"BEAM LENGTH (IN.)"
@8TBKW@8"MOD. OF ELASTICITY "
@UC>"(LB/SQ.IN.)"
@8TA'W@8"2ND OF CROSS SEC."
@8TBNW@UC?"NO. OF POINTS AT WHICH DEFLECTION IS TO BE DETERMINE"
8T@YW@UD@%8%8"POSITION ON THE BEAM"
@P=>)K!
"DEFLECTION"%@8%UDAPBKPA!BQ@J@8P@Y@P?9AQ@G8P?9Q@
P@YP'4@V+ZP@
@]-H8P@
PBKCP@GDQA$@8PA!PA$BQAC@8PAC@P>D(C@Z,VUDBPBHPA!CPBKPA$BC@P?-PBKCP@JBP@JCPBKPA$BP?-@EBC@P>APA'CPBNCPBKCDFQA[@8Y,;UDCPBHP@JCPA$C@P?-PBKCPBKPA$BCP@JP@JCBPBKPA$BP?-@EBC@P>APA'CPBNCPBKCDFQA[@UDDPA$!
@P=>)K!
PA[!%@8X@
UDF[3K8%8Y$VUDH"APPL. LOAD (LB.)"
8TBHW@8"LEFT, DIST. TO LOAD (IN.)"
@UDITA!W@8"BEAM LENGTH (IN.)"
@8TBKW@8"MOD. OF ELASTICITY "
@UDJ"(LB/SQ.IN.)"
@8TA'W@8"2ND OF CROSS SEC."
@8TBNW@UDK"DIVISOR FOR BEAM LENGTH"
@8T@MW@UDLP>DQBQ@8PBKQBT@8PBH@P>APA'CPBNCPBKCDFQ@V@8PBKPA!BQ@J@UDMP?-PBQCPBTA@P>VDQBW8PBQ@P?-PBTCAP>VDQBZ8P?9Q@Y@8PBWQA$@8PA!PA$BQAC@UDNPAC@P>D(C@Z0W8P@VPA!CPBKPA$BC@P?-PBKCP@JBP@JCPBKPA$BP?-@EBCQA[@8Y05UDOP@VP@JCPA$C@P?-PBKCPBKPA$BCP@JP@JCBPBKPA$BP?-@EBCQA[@8Y05UDPP@Y@P?-(A@Z1K8PA[QB]@8P?-Q@Y@8PBZQA$@8Y/4UDQPA[QB @8PBTPBQBPBKP@MDBQB
@8PB
@P>D(E@Z2J8PB])MPB @)MBQB&UDRPB&@P>D(A@Z1>8PB&@P>D(B@Z2C8PBWQBQ@8Y/QUDSPBWQBQ@UDTPBZQBT@8Y/QUDUPB&@P>D(B@Z2\8PB QB)@8PBZQB,@8Y2%UDXPB]QB)@8PBWQB,@UD]"LOC. OF MAX. DEFLECTION: "
PB,!%UD
"MAX. DEFLECTION: "
PB)!%UD"[3K8%8Y-NU
P"RERUN"
@8'&TB/W@8&PB/&@P=;(A@Z35U
Z"NEXT PROGRAM"
8'&TB/W@8&PB/&@P=8(A@Z37U
$YB]U
8GU
>O/0
0:&4@
1071 @
1054
0
0
1093T@
1053
0P]C@ 1PW
0P\C=<;PV
0PWFIM4PU
0PVH-C%PT<BCDPN
0PTH$7RPM
0PN\JOWPM!Q:8O5C%XDO]<F=)O=B
50O^Y&Y&O?J0HLQW4@
10301*
/O%XDFIO%0(=\PLK@ 1PF';96P]
@ 1P$U<;YHU92!BF,J;$(PD
0NDL[7(P\
0O
[H-CPT
0OWT%Q O?"-*9O>D V<PL
0PM(=\J=@CYTE AND ONE SECONDARY OOCYTE FROM EACH PRIMARY"
640PRINT "OOCYTE. EACH SPERMATOCYTE CONTAINS THE FOLLOWING CHROMOSOMES:" 
650 PRINT "A1 A2, B1 B2.    EACH OOCYTE HAS A3 A4, B3 B4." 
660 PRINT
670 PRINT "TH