It came in radians due to automatic conversion. Not the same for walls.

Author: Miguel Angel

kratos.gid/apps/CDEM/write/writeMDPA_Parts.tcl

@@ -483,8 +483,7 @@ proc DEM::write::writeMaterialsParts { } {
                 if {$prop eq "ConstitutiveLaw"} {
                     write::WriteString "    DEM_CONTINUUM_CONSTITUTIVE_LAW_NAME $val"
                 } elseif {$prop eq "FRICTION"} {
-                    set pi $MathUtils::PI
-                    set propvalue [expr {tan($val*$pi/180.0)}]
+                    set propvalue [expr {tan($val)}]
                     write::WriteString "    FRICTION $propvalue"
                 } else {
                     write::WriteString "    $prop $val"

kratos.gid/apps/DEM/write/writeMDPA_Parts.tcl

@@ -367,8 +367,7 @@ proc DEM::write::writeMaterialsParts { } {
                     if {$prop eq "ConstitutiveLaw"} {
                         write::WriteString "    DEM_DISCONTINUUM_CONSTITUTIVE_LAW_NAME $val"
                     } elseif {$prop eq "FRICTION"} {
-                        set pi $MathUtils::PI
-                        set propvalue [expr {tan($val*$pi/180.0)}]
+                        set propvalue [expr {tan($val)}]
                         write::WriteString "    FRICTION $propvalue"
                     } else {
                         write::WriteString "    $prop $val"