Skip to content
Snippets Groups Projects

Introduce an algorithm class

Merged Micael Oliveira requested to merge algorithms into develop
@@ -393,6 +393,10 @@ contains
select case (operation%id)
case (SKIP)
! Do nothing
case (STORE_CURRENT_STATUS)
! For the moment we do nothing
case (EXPMID_START)
SAFE_ALLOCATE(this%rs_current_density_ext_t1(1:this%gr%mesh%np_part,1:this%st%dim))
SAFE_ALLOCATE(this%rs_current_density_ext_t2(1:this%gr%mesh%np_part,1:this%st%dim))
Loading