add sub dimension

2024-02-01 18:42:44 +01:00
parent c417c7aece
commit e195aee3b8
5 changed files with 45 additions and 1 deletions
@@ -34,6 +34,23 @@ TEST(rank){
  EXPECT_EQ(D->rank, 180);

 }
+TEST(SubDim){
+  dimension *D=create_dim(4);
+  D->perm[0]=2;
+  D->perm[1]=3;
+  D->perm[2]=5;
+  D->perm[3]=6;
+
+  dimension *d_head2 = sub_dim_head(D,2);
+  
+  
+  EXPECT_EQ(d_head2->rank, 2*3);
+
+  dimension *d_tail2 = sub_dim_tail(D,2);
+  EXPECT_EQ(d_tail2->rank, 5*6);
+
+}
+

 TEST(Coord_linear){
  dimension *D=create_dim(4);