(in-package :sheet-advisor)

(sha-define-shop-table "p_bend_form_allow"
  :TABLE-TITLE "Amada-Einzugswerte"

  :COLUMNS
    ;;    material key     tool key
    (:MATERIAL	:THICK	     :ANGLE	    :RADIUS	  :PISTON_RAD      :DIE_WIDTH 	:ALLOWANCE)
  :COLUMN-NAMES 
    ("Material" "Blechdicke" "Aussenwinkel" "Biegeradius" "Stempel Radius" "Matrize"    "Abzugswert")
  :UNITS
    (nil        :mm          :deg            :mm           :mm              :mm         :mm )
  :CONTENTS
  (    
   ;; DC 01 A 1.50
   
   ("DC 01 A" 1.50   90.0   0.800010   0.8 10 -2.60)
   ("DC 01 A" 1.50   60.0   0.800010   0.8 10 -1.35)
   ("DC 01 A" 1.50   45.0   0.800010   0.8 10 -0.80)
     
   ("DX51D+Z275 MA-C" 1.50   90.0   0.800010   0.8 10 -2.60)
   ("DX51D+Z275 MA-C" 1.50   60.0   0.800010   0.8 10 -1.35)
   ("DX51D+Z275 MA-C" 1.50   45.0   0.800010   0.8 10 -0.80)
  
   ;; EN AW 5754 H22/32 1.50
                                       
   ("EN AW 5754 H22/32" 1.50  90.0   0.800010   0.8 10 -2.60)
   ("EN AW 5754 H22/32" 1.50  75.0   0.800010   0.8 10 -1.95)
   ("EN AW 5754 H22/32" 1.50  60.0   0.800010   0.8 10 -1.35)
  
   ("EN AW 5754 H111" 1.50  90.0   0.800010   0.8 10 -2.60)
   ("EN AW 5754 H111" 1.50  75.0   0.800010   0.8 10 -1.95)
   ("EN AW 5754 H111" 1.50  60.0   0.800010   0.8 10 -1.35)
    )    

  :KEY
    (:MATERIAL :THICK :ANGLE :PISTON_RAD :DIE_WIDTH :RADIUS )
  :DISPLAY 
   (:MATERIAL  :THICK  :ANGLE  :RADIUS :PISTON_RAD :DIE_WIDTH  :ALLOWANCE)
  :BROWSER-ICON  "icon_table"	
)