#include<bits/stdc++.h>
#define sqr(x) ((x)*(x))
#define ll long long
#define ull unsigned long long
#define ui unsigned int
#define ld long double
#define vi vector<int>
#define all(a) a.begin(),a.end()
#define HEAP(...) priority_queue<__VA_ARGS__ >
#define heap(...) priority_queue<__VA_ARGS__,vector<__VA_ARGS__ >,greater<__VA_ARGS__ > > 
#define pii pair<int,int> 
#define pb push_back
#define mp make_pair
#define debuge cerr<<"isok"<<endl
#define debug(x) cerr<<#x<<"="<<x<<endl
#define dprintf(...) fprintf(stderr,__VA_ARGS__)
#define SS second
#define FF first
#define ls (k<<1)
#define rs (k<<1|1)
#define clr(a,x) memset(a,x,sizeof(a))
#define cpy(a,x) memcpy(a,x,sizeof(a))
#define file(x) freopen(x".in","r",stdin),freopen(x".out","w",stdout)
#define SZ(x) ((int)x.size())
using namespace std;
template<class T> inline void gmin(T &x,const T &y){x=x>y?y:x;}
template<class T> inline void gmax(T &x,const T &y){x=x<y?y:x;}
template<class T> inline bool Gmin(T &x,const T &y){return x>y?x=y,1:0;}
template<class T> inline bool Gmax(T &x,const T &y){return x<y?x=y,1:0;}
const int BufferSize=1<<16;
char buffer[BufferSize],*Bufferhead,*Buffertail;
bool Terminal;
inline char Getchar(){
	if(Bufferhead==Buffertail){
		int l=fread(buffer,1,BufferSize,stdin);
		if(!l){Terminal=1;return 0;}
		Buffertail=(Bufferhead=buffer)+l;
	}
	return *Bufferhead++;
}
template<class T>inline bool read(T &x){
	x=0;char c=Getchar(),rev=0;
	while(c<'0'||c>'9'){rev|=c=='-';c=Getchar();if(Terminal)return 0;}
	while(c>='0'&&c<='9') x=x*10+c-'0',c=Getchar();
	if(c=='.'){
		c=Getchar();double t=0.1;
		while(c>='0'&&c<='9') x=x+(c-'0')*t,c=Getchar(),t=t/10;
	}
	x=rev?-x:x;
	return 1;
}
template<class T1,class T2> inline bool read(T1 &x,T2 &y){return read(x)&read(y);}
template<class T1,class T2,class T3> inline bool read(T1 &x,T2 &y,T3 &z){return read(x)&read(y)&read(z);}
template<class T1,class T2,class T3,class T4> inline bool read(T1 &x,T2 &y,T3 &z,T4 &w){return read(x)&read(y)&read(z)&read(w);}
inline bool reads(char *x){
	char c=Getchar();
	while(c<33||c>126){c=Getchar();if(Terminal)return 0;}
	while(c>=33&&c<=126) (*x++)=c,c=Getchar();
	*x=0;return 1;
}
template<class T>inline void print(T x,const char c='\n'){
	if(!x){putchar('0');putchar(c);return;}
	if(x<0) putchar('-'),x=-x;
	int m=0,a[20];
	while(x) a[m++]=x%10,x/=10;
	while(m--) putchar(a[m]+'0');
	putchar(c);
}
//--------------------------------head---------------------------------------------

const int inf=0x3f3f3f3f;
const int N=2005,M=100005,mod=1e9+7;
template<class T,class S> inline void ch(T &x,const S y){x=(x+y)%mod;}
inline int exp(int x,int y,const int mod=::mod){
	int ans=1;
	while(y){
		if(y&1) ans=(ll)ans*x%mod;
		x=(ll)x*x%mod;y>>=1;
	}return ans;
}

int n,cnt,a[N],p[N],dep[N],seq[N],red[N],top[N],good_cnt;
bool good[N];
vi g[N],ans;

inline void rotate(int x){
	ans.pb(x);
	int last=a[x];a[x]=a[0];
	while(x) x=p[x],swap(a[x],last);
}

int main(){
#ifdef rqgao2014
	assert(freopen("input.txt","r",stdin));
#endif
	scanf("%d",&n);
	dep[0]=1;
	for(int i=1;i<n;i++){
		int x;scanf("%d",&x);
		p[i]=x;g[x].pb(i);
		dep[i]=dep[x]+1;
	}
	for(int i=0;i<n;i++)
		scanf("%d",&a[i]);
	while(good_cnt<n){
		clr(red,-1);cnt=0;
		for(int i=n-1;~i;i--){
			if(good[i]) continue;
			seq[++cnt]=i;
			int isok=0,id=0;
			for(int j:g[i])
				if(!good[j]) isok++,id=j;
			if(!isok) red[i]=i,top[i]=i; else if(isok==1&&~red[id]) red[i]=red[id];
		}
//		for(int i=0;i<n;i++)
//			dprintf("%d ",red[i]);dprintf("\n");
//		for(int i=1;i<=cnt;i++)
//			dprintf("%d ",seq[i]);dprintf("\n");
		sort(seq+1,seq+cnt+1,[&](int x,int y){return mp(red[x],dep[x])>mp(red[y],dep[y]);});
		int it=1;
		while(it<=cnt){
			int k=a[0];
			if(~red[k]){
				int to=red[k];
				while(good[to]&&a[to]>k) to=p[to];
				rotate(to);to=red[k];
				good[top[to]]=1;good_cnt++;
				top[to]=p[top[to]];
			}
			else{
				while(it<=cnt&&good[seq[it]]) it++;
				assert(it<=cnt);
				rotate(seq[it]);
				it++;
			}
			while(it<=cnt&&good[seq[it]]) it++;
		}
	}
	assert(SZ(ans)<250000);
	for(int i=0;i<n;i++)
		assert(a[i]==i);
	printf("%d\n",SZ(ans));
	for(int i:ans)
		printf("%d\n",i);
	return 0;
}