Ok, I have a simple Do While loop running in VB. I guess I have a bit of an issue with the program as given in Din5480 Part 15. It describes the program as follows:
10 PRINT "inv(BETA)"
20 Input B
30 V=0.5
40 A=1/TAN(V)-1/(V+B)
50 If ABS(A)>0.000001 then V-A+V:GOTO 40
60 BETA=(A+V)*57.29577951...
Thanks for the suggestion. I will admit, that's not something I have done before in Excel / VB. Any further guidance or instruction would be useful. How would one interpret the computer program as described in DIN 5480 into VB, and where does the involute function feature in this? Apologies...
Now i've done a search on this site and have seen numerous threads around this subject, but they don't seem to fully answer my question (as they often revert to looking up values from the tables in DIN 5480-2). I'm putting together a spreadsheet that automatically calculates all the data that...
Hi, does anyone have any idea where I might find useful information (i.e. formulas, theory, etc) that will enable me to calculate a compound shrink fit for 3 or more cylinders? That is a cylinder fitted in a cylinder fitted in a cylinder?
Many thanks
Hi all, long time listener, first time poster. It's been a while since my uni days of performign heat transfer calculations, so any guidance with a suitable method for the follwoing problem would be appreciated.
I have a solid rotor wrapped in a carbon sleeve. I know the k for both stator...
