!# Pro/TABLE
!# 
![] W  8;
![] S 92;
![A] W 10;
![B] W 10;

"!"
"! Berechnung der gestreckten Laenge L in Anlehnung an DIN 6935    "
"! Erzeugt am 27.10.2000 von "
"!"
"!"
"! L = gestreckte Laenge"
"! R = Innenradius (R !> 0)"
"! T = Materialdicke (T !> 0)"
"! ANGLE = Biegewinkel (ANGLE !> 0) "
"!"
"! Achtung: Pro/Sheetmetal verlangt beim Biegen die Eingabe des Biegewinkels."
"! Dies steht im Kontrast zum Berechnungsgang nach DIN 6935, bei dem der"
"! Oeffnungswinkel verwendet wird! Nachfolgend wird der Biegewinkel verwand."
"!"
"FORMULA"
"IF (R/T) > 3.8 "
"L = (T/2*1.0+R)*PI*(ANGLE)/180"
"ENDIF"
"IF (R/T) >2.4 & (R/T) <= 3.8"
"L = (T/2*0.9+R)*PI*(ANGLE)/180"
"ENDIF"
"IF (R/T) > 1.5 & (R/T) <= 2.4"
"L = (T/2*0.8+R)*PI*(ANGLE)/180"
"ENDIF"
"IF (R/T) > 1.0 & (R/T) <= 1.5"
"L = (T/2*0.7+R)*PI*(ANGLE)/180"
"ENDIF"
"IF (R/T) <= 1.0"
"L = (T/2*0.6+R)*PI*(ANGLE)/180"
"ENDIF"
"END FORMULA"
"!"
"START MATERIALS"
"END MATERIALS"
"!"
"! Die nachfolgende Tabelle ist eine Alibi-Tabelle, die praktisch nicht "
"! verwendet wird, da sie nur fuer Radien- und Dickenwerte von 0.001mm zum"
"! Zuge kaeme - in allen anderen Faellen wird die gestreckte Laenge ueber o.g. "
"! Formeln ermittelt! Dieses Tabellenfragment ist hier nur noch vorhanden, weil"
"! ich durch das Entfernen eine Fehlermeldung erhalte und nicht weiss wie"
"! das zu vermeiden ist."
"!"
"TABLE" 	
"!" 	
" " 0.001
"!Dicke (D)" 	
0.001 0.058